Entwickler-Ecke
Delphi Language (Object-Pascal) / CLX - Ganz komischer Problim mit zwei for-schleifen
DanyLux - So 29.05.05 13:56
Titel: Ganz komischer Problim mit zwei for-schleifen
Hallo hab folgendes problem ich muss durch ein forschleife gehen aber irgendwie wird der counter falsch gesetzt. Hier mein Code
Delphi-Quelltext
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
| procedure TPlan.CheckImages;
var S,T: Integer;
begin
ChDir(ExtractFilePath(ExpandFileName(ParamStr(0))));
for S:=0 to 3 do
if NOT FileExists('images'+ GIMAGE[S].img) then
CreateBitmap(GIMAGE[S].indH,GIMAGE[S].indW,'G');
for T:=0 to 3 do
if NOT FileExists(PIMAGE[T].img) then
CreateBitmap(GIMAGE[T].indH,GIMAGE[T].indW,'P');
end; |
Ja das problem ist dass S und T nicht auf 0 gesetzt werden sondern auf 4????? Komisch :?!?: :autsch:
Und S und T sind nur dort deklariert sonst niergend wo anders. An was kann das liegen? :gruebel:
Moderiert von 
Christian S.: Topic aus VCL (Visual Component Library) verschoben am So 29.05.2005 um 13:58
DanyLux - So 29.05.05 15:08
Ja genau das selbe passiert bei mir.
Hab aber jetzt dann einfach eine while -Schleife genommen den wenn der Compiler so duerch geht wird die prozedur CreatBitmap aufgerufen weil der arra GImage nur von 0..3 geht und so findet er ja bei 4 nix und erstellt die Bitmaps.
Mit der while schleife hab ich das problem jetzt nicht.
Danke fuer deine Hilfe
Entwickler-Ecke.de based on phpBB
Copyright 2002 - 2011 by Tino Teuber, Copyright 2011 - 2026 by Christian Stelzmann Alle Rechte vorbehalten.
Alle Beiträge stammen von dritten Personen und dürfen geltendes Recht nicht verletzen.
Entwickler-Ecke und die zugehörigen Webseiten distanzieren sich ausdrücklich von Fremdinhalten jeglicher Art!