Aufrufer feststellen

**Mokus**

Mahlzeit,

ich habe noch einmal eine frage.

ich habe i verschiedene Paintboxen, welche dynamisch im Quellcode erstellt werden, also keine festen Komponenten.
Diese sollen aber alle das gleiche Zeichnen.

zusammenfalten · markieren

Delphi-Quellcode:

			var

  Form:       TTFormWithSave;

  SBPaintBox: TPaintBox;

begin

  Form               := TTFormWithSave.CreateNew(Self);

  SBPaintBox         := TPaintBox.Create(Form);

  SBPaintBox.Parent  := Form;

  SBPaintBox.Align   := alClient;

  SBPaintBox.OnPaint := pbSBILDPaint;

  Form.Show;

end;

DIe Methode pbSBILDPaint

markieren

Delphi-Quellcode:

			begin

  Self.SBILDPaint(Sender,PaintBox);

end;

so der 2 Parameter ist ein Pseudocode Parameter. Ich würde den Aufrufer mit übergeben.
Kann ich daher herrausfinden welches OBJEKT mich aufgerufen hat ?

Im Debuger stand Sender.Classname = NIcht verfügbarer wert
daher weiß ich nicht was es genau für ein Objekt ist.

Kann wer mir weiter helfen ?

Danke im VOrraus

Aufrufer feststellen

Aufrufer feststellen

Forumregeln