2 Proceduren kann man nicht gleichzeitig laufen lassen. Das mit der Statuszeile funktioniert anders.
Hast du dich schon mal mit TurboVision beschäftigt (ist bei TP dabei!)?
Da wird der Statuszeilentext an einen Pointer (auf ein Object) übergeben, der direkt auf den Bildschirmspeicher zeigt.
Wenn du das selbst ausprogrammieren willst, mußt du im Objektorientierten Stiel absolut Top sein! Eine Visual-Sprache wie VB oder Delphi beherrschen reicht dazu nicht aus, da du die Objekte ausprogrammieren mußt!
Ungefähr so:
Type Statusbar = ^TStatusBar;
TStatusBar = Object
Constructor INIT;
Procedure SetBar(T : String);
Destructor DONE;
Private
Procedure Update;
End;
So könnte eine einfache Statuszeile als Object aufgebaut sein. Diese wird dann als Pointer initialisiert, und über .SetBar kannst du den Text bestimmen (die Proceduren gehören natürlich noch ausprogrammiert!).
TT
------------------
Nur der Weise schweigt, um seine Dummheit zu verbergen. (
TT Rulez)
Moderator der Software-Zone bei
Grossmaster B
Moderator der Netzwerkzone und
Philosophie-Ecke sowie Co-Admin bei
Scrabbledo's InfoBoard