NToBE ?

[Jens01]

Mit den Events meinte ich das etwas anders.
Wenn das Event ungefähr so aussehen würde ohne dies "FItem"

Delphi-Quellcode:

// FItem hier ganz rauswerfen
if Assigned(FOnDXFLine) then
    FOnDXFLine(Self, Blockname, Color, FloatPointD2(X1, Y1), FloatPointD2(X2, Y2));

Dann würdest Du diese DXF-Sache komplett von deinem Programm abgrenzen.
Die graphische Darstellung würde etwa so aussehen :

Delphi-Quellcode:

procedure OnDXFLine(Sender: TObject; Name:string; Color:Tcolor; P1, P2: TPoint);
begin
  FMeineGraphikListe.AddLine(Color, P1, P2);
  FMeineGraphikListe.Draw;
  // oder so ähnlich
end;

Hinsichtlich OOP-Optimierung mußt Du sonst halt Christian fragen