Çoklu Formlarda veri aktarımı
Forum kuralları
Bu forum sadece yapacağınız işle alakalı doğru bileşeni bulmak içindir. Şöyle bir şey yapmam lazım, hangi bileşeni kullanıyım diyorsanız, doğru yerdesiniz.
Bu forum sadece yapacağınız işle alakalı doğru bileşeni bulmak içindir. Şöyle bir şey yapmam lazım, hangi bileşeni kullanıyım diyorsanız, doğru yerdesiniz.
-
- Üye
- Mesajlar: 386
- Kayıt: 02 Tem 2007 09:43
Çoklu Formlarda veri aktarımı
Merhaba;
frmStokFisi isminden bir formum var. bu formun içinden açılan frmMalzemeListesi isminde ikinci bir formum var.
ANAFORM dan frmStokFisi formunu birden fazla oluşturup daha sonra bu formlardan herhangi biri içinden FrmMalzemeListesi formunu açarak frmMalzemeListesi formundaki malzeme kayıtlarını en son üzerine tıklamış olduğum frmStokFisi formuna eklemek istiyorum.
formda benzer konular paylaşılmış fakat ben istediğim sonuca tam olarak ulaşamadığım için forma sormak zorunda kaldım.
frmStokFisi isminden bir formum var. bu formun içinden açılan frmMalzemeListesi isminde ikinci bir formum var.
ANAFORM dan frmStokFisi formunu birden fazla oluşturup daha sonra bu formlardan herhangi biri içinden FrmMalzemeListesi formunu açarak frmMalzemeListesi formundaki malzeme kayıtlarını en son üzerine tıklamış olduğum frmStokFisi formuna eklemek istiyorum.
formda benzer konular paylaşılmış fakat ben istediğim sonuca tam olarak ulaşamadığım için forma sormak zorunda kaldım.
İsteyen, yapabildiğinden daha fazlasını yapar.
Re: Çoklu Formlarda veri aktarımı
Dinamik olarak yaratacağınız FrmMalzemeListesi formunun parent özelliğine açan formu atayın.FrmMalzemeListesi formundaki seçim işleminde parent'ı frmStokFisi'ne cast ederek (me.parent as TfrmStokFisi) public olarak oluşturmuş olduğunu malzeme atama fonksiyonunu çağrınız.
-
- Üye
- Mesajlar: 386
- Kayıt: 02 Tem 2007 09:43
Re: Çoklu Formlarda veri aktarımı
böyle yapınca liste formu frmStokFisi içinde açılıyor. her açılan frmStokfisi formu için bir adet liste formu açılmış oluyor.Dinamik olarak yaratacağınız FrmMalzemeListesi formunun parent özelliğine açan formu atayın
belki ben olayı anlamamış da olabilirim. sizden ricam biraz daha açıklaya bilirmisiniz.
İsteyen, yapabildiğinden daha fazlasını yapar.
Re: Çoklu Formlarda veri aktarımı
Eğer formu modal olarak açmıyorsanız şöyle yapabilrisiniz:
FrmMalzemeListesi'ne public bir property olarak TfrmStokFisi fişi ekleyin. FrmMalzemeListesi'ni yaratırken gerekli atamayı yapın, seçim sonrası da yine bu propertiyi kullanarak seçimi tamamlayın.
FrmMalzemeListesi'ne public bir property olarak TfrmStokFisi fişi ekleyin. FrmMalzemeListesi'ni yaratırken gerekli atamayı yapın, seçim sonrası da yine bu propertiyi kullanarak seçimi tamamlayın.
-
- Üye
- Mesajlar: 386
- Kayıt: 02 Tem 2007 09:43
Re: Çoklu Formlarda veri aktarımı
merhaba;
sizden edit ve labeller üzerinden konuyla ilgili bir örnek isteyebilirmiyim.
müsait vaktiniz ne zaman olursa o zaman
sizden edit ve labeller üzerinden konuyla ilgili bir örnek isteyebilirmiyim.
müsait vaktiniz ne zaman olursa o zaman
İsteyen, yapabildiğinden daha fazlasını yapar.
Re: Çoklu Formlarda veri aktarımı
Kod: Tümünü seç
unit Unit1;
interface
uses
Winapi.Windows, Winapi.Messages, System.SysUtils, System.Variants, System.Classes, Vcl.Graphics,
Vcl.Controls, Vcl.Forms, Vcl.Dialogs, Vcl.StdCtrls;
type
TForm1 = class(TForm)
Button1: TButton;
Edit1: TEdit;
procedure Button1Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;
var
Form1: TForm1;
implementation
{$R *.dfm}
uses Unit2;
procedure TForm1.Button1Click(Sender: TObject);
var
form2: TForm2;
begin
form2 := TForm2.Create(form2);
form2.ParentForm := Form1;
form2.Show();
end;
end.
Kod: Tümünü seç
unit Unit2;
interface
uses
Winapi.Windows, Winapi.Messages, System.SysUtils, System.Variants, System.Classes, Vcl.Graphics,
Vcl.Controls, Vcl.Forms, Vcl.Dialogs, Vcl.StdCtrls, Unit1;
type
TForm2 = class(TForm)
Button1: TButton;
Edit1: TEdit;
procedure Button1Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
ParentForm: TForm1;
end;
var
Form2: TForm2;
implementation
{$R *.dfm}
procedure TForm2.Button1Click(Sender: TObject);
begin
ParentForm.Edit1.Text := Edit1.Text;
Close();
end;
end.
-
- Üye
- Mesajlar: 386
- Kayıt: 02 Tem 2007 09:43
Re: Çoklu Formlarda veri aktarımı
form2 oluşurken Access Voilation hatası veriyor. gönderdiğiniz kodları unitlere birebirini kopyaladım yine olmadı.
İsteyen, yapabildiğinden daha fazlasını yapar.
Re: Çoklu Formlarda veri aktarımı
form2'yi otomatik yaratılan form listesinden (proje ayarları) kaldırmanız lazım.