TLMDGraphicList nicht gefunden?????

[ApoCalyps0]

Hi Delphianer.

Ich hoffe das ihr mir hier weiter helfen könnt. Ich schnalls irgendwie nicht.
Programm will mir weis machen, dass die TLMDGraphicList Komponente nicht gefunden werden kann.

Delphi-Quellcode:

var
  Form1: TForm1;
  LMDGraphicList1: TLMDGraphicList; <---- wird aber hier angegeben.....

implementation

{$R *.dfm}

procedure TForm1.GreatBeast2Click(Sender: TObject);
begin
  LMDGraphicList1.Create(self); <---- hier erstellt......
  LMDGraphiclist1 := ReadComponentResFile('image.dat', nil) as TLMDGraphicList; <---- und hier aufgerufen
  DoubleBuffered := True;
  LMDLimage1.Visible:=true;
  LMDLimage1.ListIndex:=0;
end;

entweder will mich Delphi nur verarschen :evil: oder ich hab wirklich keinen Plan!!!!

Danke für eure Tips und Ratschläge schon mal im voraus..... :dp:

[DeddyH]

Versuch mal

Delphi-Quellcode:

LMDGraphicList1 := TLMDGraphicList.Create(self);

[edit] Nachtrag: Ist das eine Komponente? Dann setz mal

Delphi-Quellcode:

LMDGraphicList1.Parent := self;

dahinter.

[ApoCalyps0]

Hi DeddyH,

Zitat:

LMDGraphicList1 := TLMDGraphicList.Create(self);

funktioniert leider auch nicht. Fehler besteht weiterhin.

Bei

Zitat:

LMDGraphicList1.Parent := self;

macht delphi gleich garnicht mehr mit.

LMD sind Komponenten von: http://www.lmd.de/ für Delphi

Dennoch Danke

[DeddyH]

Wie lautet denn die genaue Fehlermeldung und wie sieht der Code zum Zeitpunkt des Fehlers aus?

[ApoCalyps0]

Fehlermeldung

siehe Anhang

[DeddyH]

Heißt die Klasse auch wirklich so und ist die entsprechende Unit eingebunden?

[Die Muhkuh]

Wenn die Klasse nicht so hieße oder die Unit fehlt, könnte er gar nicht kompilieren.

Wann kommt die Fehlermeldung denn? Wenn Du das Formular öffnest? Beim Öffnen des Projekts?

[DeddyH]

Stimmt, habe nicht darauf geachtet, dass da "Project2" in der Titelzeile stand.

[Die Muhkuh]

Lesen klappt halt besser, ohne Tomaten auf den Augen, Detlef ;)

[ApoCalyps0]

Servus MuhKuh.


Der Fehler tritt erst in Kraft, wenn ich das Menu öffne und das erste anzuzeigende Image anklicke.
Sprich, sobald das Programm in diese Procedure springt.

Delphi-Quellcode:

procedure TForm1.GreatBeast2Click(Sender: TObject);
var
LMDGraphicList1: TLMDGraphicList;
begin
  LMDGraphicList1 := TLMDGraphicList.Create(self);
  LMDGraphiclist1 := ReadComponentResFile('image.dat', nil) as TLMDGraphicList;
  DoubleBuffered := True;
  LMDLimage1.Visible:=true;
  LMDLimage1.ListIndex:=0;
end;