combobox ve editteki textler siliniyor.

[Berdem]

Kod: Tümünü seç

procedure TForm1.Button12Click(Sender: TObject);
begin
Gidenevrak.ActivePageIndex:=2;
DateTimePicker7.Date:=DateTimePicker3.Date;
DBComboBox7.Text:=DBComboBox3.Text;
DBEdit6.Text:=DBEdit5.Text;
DateTimePicker8.Date:=DateTimePicker2.Date;
DBEdit8.Text:=DBEdit7.Text;
DBEdit9.Text:=DBEdit1.Text;
DBComboBox8.Text:=DBComboBox5.Text;
DBComboBox9.Text:=DBComboBox1.Text;
DBMemo3.SetFocus;
end;

Merhaba Arkadaşlar,
Tabsheet deki bilgileri başka bir tabsheete aktarmak istiyorum.Bu oluyor.Fakat bilgilerin devamını yazmak istedigimde ve ya memo bileşine bilgi girmek istediğimde combobox ve editteki textler siliniyor.Yardımlarınız bekliyorum.Sevgi ve Saygılarımla..

[lazio]

kullantığın editler DB olduğu için bişey yazmaya çalıştığında tablo insert yada edit moduna geçer. istersen bu tarz atamaları yapmadan önce bu modları kontrol etmen gerek.[/i]

[Berdem]

Siz dostlarım olmasaydınız ben ne yapardım! Çok Çok Teşekkürler.
YeşilMavi

[lazio]