Forum: Datenbanken
Delphi
by Uwe Raabe,
19. Aug 2014
Klassisches Beispiel ist die Einführung der Eigenschaften Width und Height in TRect. Dadurch funktionierte z.B. folgender Block nicht mehr richtig:
with Rect do begin
Left := (Width - 100) div 2;
Top := (Height - 100) div 2;
end;
Tools wie der Pascal Analyzer von Peganza weisen einen aber dann doch auf solche Fälle hin.
Forum: Datenbanken
Delphi
by Uwe Raabe,
19. Aug 2014
Du könntest auch einen Filter auf das ClientDataSet legen. Dann würde sich die Schleife etwas verkürzen lassen:
cds.Filter := 'Codenummer = ' + QuotedStr(lbledt1.text); // Wenn Codenummer ein numerisches Feld ist, kann man die Quotes weglassen.
cds.Filtered := true;
cds.First;
while not cds.EOF do
cds.Delete;
cds.Filtered := false;