antipauli

Podrías echarle un vistazo a los programas de ejemplo de ICS en: http://overbyte.delphicenter.com/frame_index.html Además, tienes otros recursos Winsock en: www.winsock.com www.sockets.com Siento no poder ayudarte más.

Para este típico problema, ya sea dejar el eje de coordenadas del canvas en el centro del canvas, o que no nos interesa que las y vayan al revés de lo esperado, etc. yo me construyo funciones de conversión en el que se pasa el Rect y el canvas y se...

Para usar MySQL debes bajarte el driver que puedes encontrar en www.mysql.org e instalarlo a través de pequeño programita. Si no quieres que tus usuarios tengan que instalar MyODBC entero, les puedes copiar el archivo "myodbc.dll" a windows\system y...

Emorales2003 creo que el problema que tienes es que se ejecuta la query pero no retorna ningún registro y por eso te peta cuando intentas hacer algo. Prueba de usar lo siguiente para ver si tienes registros si el Query. Recordcount no te funciona....

Aquí te paso una idea que, aunque primaria, quizá te pueda ayudar. La cuestión es mover un image de un panel a otro. El problema es que los paneles al ser twincontrols (contenedores) y el image no, no lo podemos mover alegremente a menos que le...

Te recomiendo estas 2 webs sobre automatización, están muy bien: http://www.djpate.freeserve.co.uk/Index.htm http://freespace.virgin.net/graham.marshall/excel.htm#excel.htm En www.delphi3000.com encontrarás también ejemplos de ello. Registrarte es...

1. Lo puedes hacer mediante una consulta SQL. SELECT COUNT(*) AS NUMHOMBRES FROM NOMBRETABLA WHERE HOMBRE=TRUE En el código: query1.open; numnombres := query1.fieldbyname('numhombres').AsInteger; 2. O si no recorriendo el dataset. Para hacer eso, yo...

Tienes exactamente eso en las demos/clx/stopwatch de Delphi6.

var cad1 : String; cad2 : String; begin cad1 := '$ 2,50'; cad2 := Copy(cad1, 3, length(cad1)-2); showmessage(cad2); end; function Copy(cadena : String; Index, Count: Integer): string; Index: Posición desde donde quieras empezar a copiar. El 1 es el...

Prueba esto: procedure EnumNetResources(List: TStrings); procedure EnumFunc(NetResource: PNetResource); var Enum: THandle; Count, BufferSize: DWORD; Buffer: array[0..16384 div SizeOf(TNetResource)] of TNetResource; i: Integer; CommaText: String;...