Kod: Tümünü seç
AKTARMA.DB SISTEMFOR.DB
A = SISKOD
B = SISADI
C = SISSOY
D = SISISAD
E = SISISTF
yardım ederseniz sevinirim.
Kod: Tümünü seç
AKTARMA.DB SISTEMFOR.DB
A = SISKOD
B = SISADI
C = SISSOY
D = SISISAD
E = SISISTF
Kod: Tümünü seç
tablo_aktarma.first;
while not tablo_aktarma.eof do begin
tablo_sistemforsiskod.value:=tablo_aktarmaA.value;
tablo_sistemforsisadi.value:=tablo_aktarmaB.value;
tablo_sistemforsissoy.value:=tablo_aktarmaC.value;
tablo_sistemforsissisad.value:=tablo_aktarmaD.value;
tablo_sistemforsissistf.value:=tablo_aktarmaE.value;
tablo_aktarma.next;
end;
tablo_sistemfor.post;
Kod: Tümünü seç
tablo_aktarma.first;
while not tablo_aktarma.eof do
begin
tablo_sistemfor.Insert;
tablo_sistemforsiskod.value:=tablo_aktarmaA.value;
tablo_sistemforsisadi.value:=tablo_aktarmaB.value;
tablo_sistemforsissoy.value:=tablo_aktarmaC.value;
tablo_sistemforsissisad.value:=tablo_aktarmaD.value;
tablo_sistemforsissistf.value:=tablo_aktarmaE.value;
tablo_sistemfor.post;
tablo_aktarma.next;
end;