Foro: API de Windows
31-03-2008
|
|
Respuestas: 2
Visitas: 849
var
VMess : HWND;
procedure...
var
VMess : HWND;
procedure TForm1.FormCreate(Sender: TObject);
begin
VMess := FindWindow(nil, 'Windows Live Messenger');
Timer1.Interval := 50;
end;
procedure TForm1.Timer1Timer(Sender:...
|
|
Foro: OOP
05-03-2008
|
|
Respuestas: 16
Visitas: 8.589
Pero con TextOut le indicas la posición X e Y...
Pero con TextOut le indicas la posición X e Y donde está el texto por lo que ahí sí que podrías centrar:
procedure TForm1.ComboBox1DrawItem(Control: TWinControl; Index: Integer;
Rect: TRect; State:...
|
|
Foro: Varios
03-03-2008
|
|
Respuestas: 29
Visitas: 2.194
|
|
Foro: Varios
29-02-2008
|
|
Respuestas: 4
Visitas: 1.840
Pues hoy que he tenido algo del tiempo en el...
Pues hoy que he tenido algo del tiempo en el curro me piqué con esto y me salió este código:
unit Unit1;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
...
|
|
Foro: SQL
18-02-2008
|
|
Respuestas: 22
Visitas: 2.811
Vaya proveedor raro. ¿Que base de datos y...
Vaya proveedor raro. ¿Que base de datos y proveedor estás usando? De todas formas supongo que si cierras el otro recordset que tengas abierto (imagino que ADOQuery1) debería funcionarte éste.
|
|
Foro: SQL
18-02-2008
|
|
Respuestas: 22
Visitas: 2.811
Esto me pasa por escribir sin probar nada....
Esto me pasa por escribir sin probar nada. Evidentemente no puedes meter ahí el StrToInt, ya que no compilará.
Lo correcto sería:
ADOQuery2.SQL.Text := 'INSERT INTO INCIDENCIA (numero, cod) ' +
...
|
|
Foro: Varios
18-02-2008
|
|
Respuestas: 10
Visitas: 2.468
|
|
Foro: SQL
18-02-2008
|
|
Respuestas: 22
Visitas: 2.811
|
|
Foro: Varios
14-02-2008
|
|
Respuestas: 25
Visitas: 7.229
|
|
Foro: SQL
14-02-2008
|
|
Respuestas: 2
Visitas: 658
|
|
Foro: SQL
14-02-2008
|
|
Respuestas: 9
Visitas: 996
No entiendo esto.
Supongo que te devolverá el...
No entiendo esto.
Supongo que te devolverá el mismo valor que tiene el idObra de ObraVarios.
No sé, hace años que no uso el SQL Server. De todas formas cada gestor de base de datos te devolverá lo...
|
|
Foro: SQL
14-02-2008
|
|
Respuestas: 9
Visitas: 996
Ahora que me fijo en la consulta... los valores...
Ahora que me fijo en la consulta... los valores de b.idObra siempre serán los mismos que los de a.idObra, y como las campos se llaman igual, pues te devuelve un segundo campo idObra_1 que debe ser el...
|
|
Foro: SQL
14-02-2008
|
|
Respuestas: 9
Visitas: 996
|
|
Foro: Gráficos
14-02-2008
|
|
Respuestas: 2
Visitas: 1.694
procedure TForm1.FormCreate(Sender:...
procedure TForm1.FormCreate(Sender: TObject);
begin
Image1.Canvas.Brush.Color := Form1.Color;
end;
procedure TForm1.Image1MouseLeave(Sender: TObject);
begin
...
|
|
Foro: Varios
01-02-2008
|
|
Respuestas: 62
Visitas: 6.452
BuRtOn así lo que estás haciendo es que en cada...
BuRtOn así lo que estás haciendo es que en cada procedimiento use su propia variable "r1" cuando éstas variables deberían ser globales para poder acceder desde distintos procedimientos. O sea que se...
|
|
Foro: Varios
01-02-2008
|
|
Respuestas: 62
Visitas: 6.452
|
|
Foro: Varios
01-02-2008
|
|
Respuestas: 2
Visitas: 1.965
Buenas julyus, pues la verdad es que no hay...
Buenas julyus, pues la verdad es que no hay muchos colores para escoger: rojo, verde, azul y la suma de ellos (bueno, y la ausencia que es el negro). Eso sí tienen una "variante" brillante:
un...
|
|
Foro: Varios
23-01-2008
|
|
Respuestas: 7
Visitas: 1.223
Está en inglés y en orden archivos, directorios...
Está en inglés y en orden archivos, directorios porque lo copié de un código mío que tenía a mano al que le quité unas líneas que no venían al caso y le metí las tuyas de imprimir. El nombre "Tree"...
|
|
Foro: Varios
23-01-2008
|
|
Respuestas: 7
Visitas: 1.223
Al listar los directorios muestra los archivos...
Al listar los directorios muestra los archivos porque tras encontrar el primer directorio no compruebas que los siguientes archivos que encuentre sean directorios. Vamos que ésta línea:
If not...
|
|
Foro: Varios
22-01-2008
|
|
Respuestas: 3
Visitas: 2.131
|
|
Foro: Varios
18-01-2008
|
|
Respuestas: 6
Visitas: 1.604
|
|
Foro: Varios
17-01-2008
|
|
Respuestas: 3
Visitas: 1.009
|
