Form Ayarı

Delphi'de kod yazma ile ilgili sorularınızı bu foruma yazabilirsiniz.
Cevapla
cemrebilgisayar
Üye
Mesajlar: 52
Kayıt: 02 Nis 2007 04:52
İletişim:

Form Ayarı

Mesaj gönderen cemrebilgisayar »

Merhaba arkadaşlar,
Yapmış olduğum Programda Mdi Form kullanıyorum,MDI formun içine açılan diğer formların kullanıcı kendisinin uzatması, kaydırması, büyütmesi ve küçülmesi olayını bir ini dosyasında toplayıp kullanıcı tekrar aynı formu açtığında en son hangi hali ile bırakmışsa öyle gelmesini istiyorum. bunu nasıl yapabilirim.
İyi çalışmalar.
CEMRE BİLGİSAYAR YAZILIM
http://www.cemre.web.tr
Kullanıcı avatarı
Battosai
Üye
Mesajlar: 1316
Kayıt: 01 Eki 2007 12:02
Konum: Ankara

Re: Form Ayarı

Mesaj gönderen Battosai »

Acep açtığınız formları kapatırken left , top ve yükseklik,genişlik bilgilerini bir ini dosyasına yazsanız açarkende yine bu dosyadan okutsanız olmaz mı ? Eğer ini yazma okuma biliyorsanız kolay bir işlemdir.
rahim_azeri
Üye
Mesajlar: 113
Kayıt: 20 Eyl 2010 07:42

Re: Form Ayarı

Mesaj gönderen rahim_azeri »

bunlari deneye bilirsin kardes....

Kod: Tümünü seç

interface
uses Inifiles;
...
...
var
inifile:TIniFile;
....

procedure TForm1.FormClose(Sender: TObject;
  var Action: TCloseAction);
begin                            

          iniFile:=TIniFile.Create(ChangeFileExt(Application.ExeName,'.ini'));
          try
          inifile.WriteInteger('form1','Left',Form1.Left);
          inifile.WriteInteger('form1','Top',Form1.Top);
          inifile.WriteInteger('form1','Height',Form1.Height);
          inifile.WriteInteger('form1','Width',Form1.Width);
          finally
          iniFile.Free;
          end;

end;

...


procedure TForm1.FormCreate(Sender: TObject);
begin

      iniFile:=TIniFile.Create(ChangeFileExt(Application.ExeName,'.ini'));
          try
          Form1.Left:=inifile.readInteger('form1','Left',Form1.Left);
          Form1.Top:=inifile.readInteger('form1','Top',Form1.Top);
          Form1.Height:=inifile.readInteger('form1','Height',Form1.Height);
          Form1.Width:=inifile.readInteger('form1','Width',Form1.Width);
          finally
          iniFile.Free;
          end;
end;
cemrebilgisayar
Üye
Mesajlar: 52
Kayıt: 02 Nis 2007 04:52
İletişim:

Re: Form Ayarı

Mesaj gönderen cemrebilgisayar »

verdiğin kod için tşk işime çok yaradı. yalnız mdi formda yeni formlar açtım. form ayarlarını kayıt ettim iniye, üst üste birkaç tane form açtığımda formun bir tanesini maksimum yaptığımda formların hepsi maksimum oluyor haliyle kullanıcının bıraktığı gibi kalmıyor ayarlar. bunu nasıl düzeltebilirim.
CEMRE BİLGİSAYAR YAZILIM
http://www.cemre.web.tr
Kullanıcı avatarı
Battosai
Üye
Mesajlar: 1316
Kayıt: 01 Eki 2007 12:02
Konum: Ankara

Re: Form Ayarı

Mesaj gönderen Battosai »

örnekte verilen kodları açılan formların oncreate ve onclose olayına yazacaksın. Her biri için ayrı ayrı...
cemrebilgisayar
Üye
Mesajlar: 52
Kayıt: 02 Nis 2007 04:52
İletişim:

Re: Form Ayarı

Mesaj gönderen cemrebilgisayar »

vermiş olduğun kodlarla küçük bir mdi form hazırladım ondada aynı olay var. Anlatmak istediğim 3 tane form hazırladım herbirinin kordinatlarını ayrı ayrı tutuyorum. 3 formu aynı anda açık bir tanesini tam ekran yaptığımda diğerleride tam ekran oluyor. bu da programımda sıkıntı yaratıyor. benim istediğim formlardan birini değiştirdiğimde (büyültüp küçülttüğümde veya tam ekran yaptığımda) diğerleri etkilenmesin.
CEMRE BİLGİSAYAR YAZILIM
http://www.cemre.web.tr
Cevapla