Buenos dias, un gusto saludarles, tengo un formulario al que llamo Principal donde tengo un menu para entrar a los demas formularios.
Uno de esos formularios es PROVEEDORES. al llamar al formulario PROVEEDORES este en su Evento OnActivate tiene algunos parametros (colocar una imagen por defecto, colocar texto en un edit por defecto), lo llamo desde el formulario principal con Showmodal, el problema es que cuando abro el opendialog para cargar la imagen y doy clic en Aceptar (para mostrar imagen en el formulario) el formulario PROVEEDORES no queda seleccionado, es decir, pierde el "focus", cuando doy clic para seleccionarlo me resetea los valores de la imagen y el edit (es decir se activa el OnActivate), lo raro de esto es que yo tengo otro sistema desde donde copie esos parametros y en ese otro sistema funciona perfecto, el formulario no pierde el focus para nada.
Si alguien podria orientarme por favor, agradeceria, quizas es algo sencillo pero no logro dar. (el codigo es algo sencillo, por lo que no creo que sea eso)
Código Delphi
[-]procedure TForm8.BotoncargarClick(Sender: TObject);
begin
if OpenDialog2.Execute then
begin
mpath:=ExtractFileName(OpenDialog2.FileName);
OpenDialog2.InitialDir:=CurrentDirectory;
Image5.Picture.LoadFromFile(OpenDialog2.FileName);
end;
end;
Código Delphi
[-]procedure TForm8.FormActivate(Sender: TObject);
begin
edtid.text:=idempresa( 2,1 );
edtrfc.SetFocus;
Image5.Picture.LoadfromFile(CurrentDirectory+'\image\empresas\sinfoto.jpg');
end;