Foro: OOP
14-05-2006
|
Respuestas: 4
Visitas: 2.277
Pues...
Desde el formulario principal consulta el valor de MDIChildCount.
Te recomiendo que el chequeo lo hagas en el evento onCloseQuery del formulario principal.
Espero haberte ayudado...
|
Foro: Conexión con bases de datos
14-05-2006
|
Respuestas: 12
Visitas: 2.045
Pues ....
Usa LIKE.
Ejemplo: SELECT * FROM TBCLIENTES WHERE NAME LIKE '%lopez%'
Espero haberte ayudado
|
Foro: Conexión con bases de datos
11-05-2006
|
Respuestas: 3
Visitas: 4.071
Se me olvidaba ...
para usar Enter en vez de Tab en los TEdit:
procedure TForm1.FormKeyPress(Sender: TObject; var Key: Char);
begin
if TForm(Sender).ActiveControl is TEdit then
if key = #13 then begin
...
|
Foro: Conexión con bases de datos
11-05-2006
|
Respuestas: 3
Visitas: 4.071
Pues ...
No te hace falta hacer tal cosa.
En el evento onBeforePost del Dataset haz el mismo cálculo que haces en el evento OnCalcFields sobre el campo calculado pero usando el campo de la tabla en donde...
|
Foro: Varios
11-05-2006
|
Respuestas: 3
Visitas: 6.405
Pues ...
Debido a que el Enabled/Disabled de los botones del DBNavigator es controlado por el Datasource(y Dataset) asociado, sólo te queda la opción de hacerlos visibles/invisibles para que no puedan...
|
Foro: OOP
11-05-2006
|
Respuestas: 7
Visitas: 2.866
perdón ...
Usa ControlCount en vez de ComponentCount
y Controls[i] en vez de Components[i]
|
Foro: OOP
11-05-2006
|
Respuestas: 7
Visitas: 2.866
|
Foro: OOP
11-05-2006
|
Respuestas: 6
Visitas: 2.101
Pues ...
unit Unit1;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls;
type
TForm1 = class(TForm)
Memo1: TListBox;
|
Foro: OOP
10-05-2006
|
Respuestas: 1
Visitas: 1.113
Así ...
Sólo necesitas añadir un "constructor" y un "destructor" a tu clase tproces, o sea:
tproces = class(TThread)
private
VL1: TValueListEditor;
protected
procedure Execute;...
|