image wird nicht geladen

[wo0zy]

hallo, ich habe eine prozedur, die auf ein onclickereignis reagiert.

Code:

procedure TForm1.OnImgClick(Sender: TObject);
  begin
    If Sender is TIDImage then
    Inc(count);
    if count=1 then begin
      Sender1:=Sender;
      (Sender1 as TIDImage).Picture.LoadFromFile('Icons/'+(Sender1 as TIDImage).ID+'.ico');
      (Sender1 as TIDImage).Enabled:=false;
    end;
    if count=2 then begin
      if Sender<>Sender1 then begin
        (Sender as TIDImage).Picture.LoadFromFile('Icons/'+(Sender1 as TIDImage).ID+'.ico');
        (Sender as TIDImage).Enabled:=false;
        count:=0;
        versuche:=versuche+1;
        sleep(1000);
        if (Sender1 as TIDImage).ID=(Sender as TIDImage).ID then begin
           (Sender as TIDImage).hide;
           (Sender1 as TIDImage).hide;
           Punkte:=Punkte+1;
           StatusBar1.Panels[0].Text:='Punkte: '+IntToStr(punkte);
        end else begin
          (Sender1 as TIDImage).Enabled:=true;
          (Sender1 as TIDImage).Picture.LoadFromFile('Icons/Hintergrund2.bmp');
          (Sender as TIDImage).Enabled:=true;
          (Sender as TIDImage).Picture.LoadFromFile('Icons/Hintergrund2.bmp');
        end;
        StatusBar1.Panels[1].Text:='Versuche: '+IntToStr(versuche);
      end;
    end;
end;

diese prozedur setzt count auf 1 wenn auf das erste bild geclickt wird und auf 2 wenn auf das 2. geclickt wird. das funktioniert auch alles, nur wird nach dem 2. click das image nicht geladen, der erst der dahinter steht geht aber problemlos#

habt ihr da irgendeinen rat für mich?

[Luckie]

Gibt es im aktuellen Verzeichnis einen Unterordner "Icon" mit der benötigten Icon-Datei?

[wo0zy]

ja, das is es ja eben, beim click auf das erste bild wird das bild ja auch geladen, halt nur beim 2. nicht

[Luckie]

Du hast den Pfad zum Bild relativ angegeben. Das ist Käse, da das nur funktioniert, wenn deine Anwendung aus dem Explorer gestartet wird und zwischen durch durch einen Öffnen- oder Speicherndialog der aktuelle Pfad nicht geändert wird.

Hol dir lieber mit ParamStr(0) den Pfad zu deiner Anwendung und bastel dir den Pfad zu dem Ordner mit ExtractFilepath zusammen.

[wo0zy]

meinste das liegt daran? aber beim ersten bild und den mouseenter und mouseleave geht das ja mit dieser angabe alles....

naja ich werds mal testen

[wo0zy]

tja, wie sollte es auch anders sein, es ändert sich nichts, also so langsam werde ich noch wahnsinnig :nerd:

[Luckie]

Doch es hat sich jede Menge geändert. So ist es richtig. Wir haben erstmal sichergestellt, dass die Bilder auf alle Fälle gefunden werden.

Jetzt setzt mal einen Break-Punkt in der Prozedur und dann geh mal in einzel Schritten durch.

[Tom]

Zitat:

Zitat von wo0zy

tja, wie sollte es auch anders sein, es ändert sich nichts,

Du hast eine tickende Zeitbombe aus Deinem Programm entfernt. Ist doch auch schon etwas ...

Zitat:

also so langsam werde ich noch wahnsinnig :nerd:

Setze einen Breakpoint und geht die Click-Methode zeilenweise mit F7/F8 durch. Dann siehst Du, wo Deine Logik nicht stimmt.

[Tom]

Zitat:

Zitat von Luckie

Wir haben erstmal sichergestellt, dass die Bilder auf alle Fälle gefunden werden.

Picture.LoadFromFile() löst eine Exception aus, wenn die Datei nicht gefunden wird (D6).

[Luckie]

Ich habe das so gemeint, wie du mit der Zeitbombe. :wink:

[wo0zy]

tja, beim debuggen passiert genau das selbe, und es tritt kein fehler oder sonstiges auf

[Tom]

Zitat:

Zitat von wo0zy

tja, beim debuggen passiert genau das selbe, und es tritt kein fehler oder sonstiges auf

Und? Wieso macht die Methode nicht das was Du willst? Müssen wir die Kristallkugel aus der Schublade holen, oder verräts Du uns genaueres?

[wo0zy]

tja, das weiß ich ja eben nicht, der punkt wird durchlaufen, doch das bild nich geladen, danach gehts weiter, ich hab auch nich so recht ahnung vom debuggn also wenn ich an dem punkt irgendwas besonderes machen muss, wäre nett wenn ihr mir sagen könntet was genau :roll:

[Tom]

Zitat:

Zitat von wo0zy

tja, das weiß ich ja eben nicht, der punkt wird durchlaufen, doch das bild nich geladen,

Du kommst also an der Stelle LoadFromFile vorbei? Bis zum Ende der Methode kommst Du auch nicht an einem anderen LoadFromFile vorbei?

[Luckie]

Speicher den Pfad erstmal in einer Variablen zwischen und dann kuck mal, was da drin steht.

[wo0zy]

tja es steht der pfad zu dem bild drin, und dieser pfad existiert auch

[wo0zy]

ich hab es hin bekommen, undzwar mit

Code:

Application.ProcessMessages;

:dancer2: :dancer: :hello:

danke an alle die mir geholfen haben