Delphi - Ventanas.posicion

 
Vista:

Ventanas.posicion

Publicado por Novatus (5 intervenciones) el 21/12/2003 07:27:51
cuando abro y cierro una ventana me gustaria que aparezca con el mismo tamaño y posicion- como hago esto?
no logro hacerlo en tiempo de diseño.
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:Ventanas.posicion

Publicado por M@rceloL (213 intervenciones) el 21/12/2003 22:49:16
Bueno, se podrían guardar los valores en un archivo INI:

Ejemplo:

var Arch:TIniFile;

begin
Arch:=TIniFile.Create('Datos.ini'); //Lo abrimos con una ruta dada

//Guarda el tamaño
Arch.WriteInteger('FORMA1','TamAncho',Form1.Width);
Arch.WirteInteger('FORMA1','TamAlto',Form1.Height);

Arch.Free;
end;

Para recuperar se leería el archivo INI en, por ejemplo el evento OnActivate:

procedure Form1.OnActivate(Sender: TObject):

var Arch:TiniFile;
begin
Arch:=TIniFile.Create('Datos.ini');

Form1.Width:=Arch.ReadInteger('FORMA1','TamAncho',200);
Form1.Heigth:=Arch.ReadInteger('FORMA1','TamAlto',100);

Arch.Free;
end;

El 200 y el 100 son valores por defecto, por si la entrada no existe.

Para la posición, creo que podrías usar el Form1.Left y Form1.Top.

Espero te sirva. Saludos y buenas compiladas.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:Ventanas.posicion

Publicado por Pablo (10 intervenciones) el 25/12/2003 23:53:52
en propiedades del form en position debes poner el valor en poDesigned y conn eso el form cuando compiles te aparecera en el lugar donde lo dejaste en delphi y con el tamaño que quedo. si no es así deberias, en el evento oncreate del form poner este código
form1.Width 540 heigth 340. Esta sería una de las formas, cualquier cosa escribeme :=)
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar