|
(Moderator)
Registriert seit: 23. Sep 2003
Ort: Bockwen
12.235 Beiträge
Delphi 2006 Professional
|
AW: Klasse in Unit verwenden
5. Sep 2011, 12:02
falsch:
Delphi-Quellcode:
procedure verschieben (dx, dy: integer);
begin
Self.Fx:= Self.Fx + dx;
self.Fy:= self.Fy + dy;
end;
richtig:
Delphi-Quellcode:
procedure tGeomForm.verschieben (dx, dy: integer);
begin
Self.Fx:= Self.Fx + dx;
self.Fy:= self.Fy + dy;
end;
Jens
Mit Source ist es wie mit Kunst - Hauptsache der Künstler versteht's
|