Selam millet
Farzedelim form1 dosyamız var ve ben bu form1 içeriğine form2 yi koymak istiyorum ve form2 dekii komutların işlevreri ise form bir üzerine olacak bana bu konuda yardımcı ola bilirmisiniz
Form1 içeriğinde form2 kullanmak
Forum kuralları
Forum kurallarını okuyup, uyunuz!
Forum kurallarını okuyup, uyunuz!
-
- Üye
- Mesajlar: 21
- Kayıt: 18 Eki 2006 12:56
- Konum: çORUM
Selam,
Form2'de prosedür-fonksiyon tanımlarken public satırı altında tanımlayın.
Form1'de uses'a Unit2'yi ekleyin.
Form1 içinde Form2.ProsedurAdı şeklinde form2'deki prosedürleri kullanabilirsiniz. Örneğin
Form2'de tanımlanan Uyarı prosedürünü Form1'de kullandık.
Kolay gele...
Form2'de prosedür-fonksiyon tanımlarken public satırı altında tanımlayın.
Form1'de uses'a Unit2'yi ekleyin.
Form1 içinde Form2.ProsedurAdı şeklinde form2'deki prosedürleri kullanabilirsiniz. Örneğin
Kod: Tümünü seç
//Form2'de:
public
{Public Declarations}
procedure Uyarı(Msg: String);
...
procedure Form2.Uyarı(Msg: String);
begin
ShowMessage(Msg);
end;
//____
//Form1'de
uses Windows, Dialogs.... , Unit2;
//...
procedure Form1.Button1Click(Sender: TObject);
begin
Form2.Uyarı('Hede');
end;
Kolay gele...
Form1'in OnCreate olayına aşağıdakileri yazarak Form2'yi Form1'in içerisine gömebilirsiniz. Aynı yöntemle Form1'i kaplaması yerine Form1'in içerisine bir TPanel koyup Form2'yi o panelin içerisine de gömebilirsiniz. Ben bunu sık sık kullanırım.
Kolay gelsin.
Kod: Tümünü seç
procedure TForm1.FormCreate(Sender: TObject);
begin
Form2:=TForm2.Create(Self);
Form2.Parent:=Form1;
Form2.Align:=alClient;
Form2.BorderStyle:=bsNone;
Form2.Show;
end;
C. Sunguray
csunguray at netbilisim.kom
Net Bilişim Hizmetleri
Sıradan her programcı bilgisayarın anlayabileceği kodlar yazabilir.
Sadece iyi programcılar insanların da anlayabileceği kodlar yazarlar.
Martin Fowler (http://martinfowler.com/)
csunguray at netbilisim.kom
Net Bilişim Hizmetleri
Sıradan her programcı bilgisayarın anlayabileceği kodlar yazabilir.
Sadece iyi programcılar insanların da anlayabileceği kodlar yazarlar.
Martin Fowler (http://martinfowler.com/)
-
- Üye
- Mesajlar: 14
- Kayıt: 17 Eki 2006 02:11
Sadece
Form2.Parent :=Form1
yerine
Form2.Parent:=Panel1
gelecek.
Form2.Parent :=Form1
yerine
Form2.Parent:=Panel1
gelecek.
C. Sunguray
csunguray at netbilisim.kom
Net Bilişim Hizmetleri
Sıradan her programcı bilgisayarın anlayabileceği kodlar yazabilir.
Sadece iyi programcılar insanların da anlayabileceği kodlar yazarlar.
Martin Fowler (http://martinfowler.com/)
csunguray at netbilisim.kom
Net Bilişim Hizmetleri
Sıradan her programcı bilgisayarın anlayabileceği kodlar yazabilir.
Sadece iyi programcılar insanların da anlayabileceği kodlar yazarlar.
Martin Fowler (http://martinfowler.com/)
-
- Üye
- Mesajlar: 21
- Kayıt: 18 Eki 2006 12:56
- Konum: çORUM