PDA

Ver la Versión Completa : TDBLoockupComboBox no responde bien


jcheco
18-07-2006, 20:56:48
Hola, mi problema es el siguiente:

Tengo el siguiente código:

procedure TF_Linea_Tique.FormShow(Sender: TObject);
begin
if Hacer_LTique='Modificar' then DBLC_Talla.Field.Value:=F_Modulo_Datos.ADOT_Linea_TiqueTLTIQ_PRODTALLA.Value;
end;

“DBLC_Talla” es un TDBLoockupComboBox

Y este código es llamado desde el siguiente:

procedure TF_Tique.TB_EdiLinClick(Sender: TObject);
var
F_Linea_Tique:TF_Linea_Tique;
begin
F_Linea_Tique:=TF_Linea_Tique.Create(Application);
F_Linea_Tique.Caption:='Modificación de línea de tique';
F_Linea_Tique.Hacer_LTique:='Modificar';
F_Modulo_Datos.ADOT_Linea_Tique.Edit;
try
F_Linea_Tique.ShowModal;
F_Modulo_Datos.ADOT_Tiques.Post;
finally
F_Tique.Free;
end;
end;

Pues bien, cuando ejecuto la primera vez el código segundo, en el TDBLoockupComboBox no me sale ningún valor y si salgo de la pantalla y vuelvo a ejecutar el segundo código (ya por segunda vez) si me sale el valor correspondiente.

No se a que se debe, espero que me podaís ayudar, un saludo y gracias.