Уроки по Delphi



         

If IOResult<>0 then Exit;


Read(f,i); //считать из файла значение

Form1.Top:=i; // верхнее положение окна

Read(f,i);

Form1.Left:=i; // левое положение окна

Read(f,i);

Form1.Width:=i; // ширина окна

Read(f,i);

Form1.Height:=i; // высота окна

CloseFile(f);




Содержание  Назад  Вперед