kennt "self" in unit 2 nicht

[punker-lili]

Hi Leute!

Ich möchte in meinem Programm dynamisch Images erzeugen. Dafür habe ich eiine Procedure geschrieben und die in Unit 2 gepackt (zu den anderen Funktionen). Leider hat er ein Problem mit dem Self. er erkennt es in Unit 2 icht, hingegen dies im Hauptprogramm funktioniert. Woran liegt das?

Delphi-Quellcode:

procedure neues_image (image_alt,image_neu:Timage;scrollbox1:Tscrollbox;zwischenraum:integer);
begin
 image_neu:=Timage.create(Self);
 with image_neu do
 begin
     Parent:=ScrollBox1;
     Left:=image_alt.left;
     Top:=image_alt.Top+image_alt.Height+zwischenraum;
 end;
 end;

Danke schon einmal im voraus...

MfG Anna

[DeddyH]

Mach mal eine Methode draus ;)

[punker-lili]

:gruebel: .. wie mach ich das .... *lieb guck*

[DeddyH]

Hatte ich doch heute schonmal geschrieben.... ach hier: http://www.delphipraxis.net/internal...=887987#887987

[punker-lili]

Danke!

[mkinzler]

Ich würde mich an deiner Stelle mal mit den Grundlagen bekannt machen.