oto moj problem
chce skopiowac wybrane pola razem z danymi z bazy paradox do tabeli interbase
i druga czesc
jak poprawic ten kod zeby dziala w nast sposob
jesli w zrodla i ibtable sa takei same pola oraz zarawrtosc listbox2 znajduje sie jakis element z listbox1 zeby wykonywal 'rowne' w kazdym innym przyadku 'inne'
for i:=0 to zrodlo.FieldCount -1 do
for j:=0 to ibtable1.FieldCount -1 do
for x:=0 to listbox1.Count -1 do
for y:=0 to listbox2.Count -1 do
begin
if (uppercase(zrodlo.Fields[i].FieldName) = ibtable1.Fields[j].FieldName)
and (listbox1.Items[x] = listbox2.Items[y])
then
begin
application.MessageBox('rowne','dd');
end
else
application.MessageBox('inne','ssa');
end;
pomocy !! prosze o lapotologiczne przedstawienei odpwiedz thx pozdro