Allgemeine Fragen zur PROFAN Programmierung
Views (Heute): 240752 (2188)
  Suchen
 Zurück zur Übersicht
 AutorThema: Variablenauflösung (Referenzierung) über Header-Dateien nich
Stefan Schnell
Datum:02.10.02 10:11 Antwortenals Email verschicken (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



Stefan Schnell
Datum: 05.10.02 11:41 Antwortenals Email verschicken (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



 Zurück zur Übersicht