Thema: Delphi Datensätze vergleiche

Einzelnen Beitrag anzeigen

grenzgaenger
(Gast)

n/a Beiträge
 
#34

Re: Datensätze vergleiche

  Alt 3. Aug 2007, 17:24
klar hansa, es geht auch ohne sortieren. da erschlägt man dann das problem mit mehr rechenleistung . aber das hat man ja heutzutage

die lösung mit den zwei sortierten flat files, kommt mit vielleicht 50kb hauptspeicher aus und braucht keine datenbank sondern nur zwei open und readln...

das ging etwa so...
Delphi-Quellcode:
open master; open slave;
master.first; slave.first;
while not master.eof do
begin
 if master.record > slave.record then
 begin
  writeln('gelöschter slave record: ', slave.record);
  slave.next;
 end
 else
  if master.record = slave.record then
  begin
   writeln('master record = slave record');
   slave.next;
  end
  else
  begin //master.record < slave.record
   writeln('neuer slave record', slave.record);
  end;
 master.next;
end;
while not slave.eof do //noch datensätze in slave übrig?
begin
 writeln('neuer slave record: ', slave.record);
 slave.next;
end;

close master; close slave;
das hier wär da auch schon der ganze code . also so komplex ist das mit den zwei sortierten flat fies gar nicht und da sortiert auch sehr schnell

grüsse und noch 'n schönes weekend
gg
  Mit Zitat antworten Zitat