Forum: Programmieren allgemein
Delphi
by mkinzler,
11. Sep 2012
Auch das ist ersetzbar
mc: TMyClass;
..
try
mc := TMyClass.Create;
mc.Property1 := Value1;
mc.Property2 := Value2;
mc.Property3 := Value3;
mc.Method1(Param1, Param2);
Forum: Programmieren allgemein
Delphi
by mkinzler,
11. Sep 2012
Wobei man sort := DM_Buecher.ADS_Buecher.sort; weglassen kann.
Forum: Programmieren allgemein
Delphi
by mkinzler,
11. Sep 2012
Zu welcher Klasse gehören die beiden Eigenschaften?
Forum: Programmieren allgemein
Delphi
by mkinzler,
11. Sep 2012
procedure TFRM_Main.DBG_BuecherTitleClick(Column: TColumn);
begin
if sort = DM_Buecher.ADS_Buecher.Column.Field.FieldName then
sort := DM_Buecher.ADS_BuecherColumn.Field.FieldName + ' DESC'
else
sort := DM_Buecher.ADS_BuecherColumn.Field.FieldName
end;
oder
procedure TFRM_Main.DBG_BuecherTitleClick(Column: TColumn);
Forum: Programmieren allgemein
Delphi
by mkinzler,
11. Sep 2012
Damit hatte man aber nur Probleme, wenn man sich auf inoffizielle Implementierungsdetails verlassen hat. Beim "sauberen" Umgang mit Strings gab es keine Probleme.
Bei with besteht nun mal die Gefahr, das es zu Scope-Verschiebungen kommt und deshalb würde ich darauf verzichten.
Auf "offizieller" Seite sieht man das ja auch ähnlich.
...