Autor | Thema: Variablenauflösung (Referenzierung) über Header-Dateien nich | | Datum:02.10.02 10:11 
(mail@stschnell.de) | |
Hallo Community,
habe folgendes Problem, wenn ich eine Struktur aus Structs.ph übernehme und das entsprechende Programm kompiliere, bricht die Programmausführung an der Stelle der Dimensionierung der Variablen ab, mit dem Hinweis, die Struktur sei nicht definiert. Im Interpretrermodus läuft alles ohne Fehler durch. Kann es sein, das die Variablenauflösung (Referenzierung) über Header-Dateien nicht korrekt funktioniert, oder mache ich etwas falsch?
Bei folgendem Code tritt der Fehler auf:
Proc conTextColor
Parameters Color%
Declare TextColor%
Declare ConsoleScreenBufferInfo#
Struct Console_Screen_Buffer_Info = ~Console_Screen_Buffer_Info
Dim ConsoleScreenBufferInfo#, Console_Screen_Buffer_Info
~GetConsoleScreenBufferInfo(hConsoleOutput&, ConsoleScreenBufferInfo#)
~SetConsoleTextAttribute(hConsoleOutput&, \
(Color% & $F) | (ConsoleScreenBufferInfo#.wAttributes% & $F0))
Dispose ConsoleScreenBufferInfo#
EndProc
Wer kann mir helfen?
Danke und Tschüss
Stefan
|
| | Datum: 05.10.02 11:41 
(mail@stschnell.de) | |
Hallo Community,
das Problem war in dem vorliegenden Code-Fragment gar nicht zu erkennen, es lag daran, dass ich die Variablendeklaration Declare ConsoleScreenBufferInfo# in mehreren Prozeduren vorgenommen habe. Nach kompletter Auslagerung der Deklaration, Dimensionierung und der Dispose-Funktion läuft alles tadellos. Frage die nur bleibt, warum der Interpretermodus dies zuläßt und das Programm ohne Beanstandung abarbeitet? Großzügigkeit ist zwar schön und gut, jedoch in diesem Fall wenig hilfreich.
Tschüss
Stefan
|
|
|