| |
| |
|
 | Wenn die richtige Runtime (im Source angegeben und im Downloadcenter zum Download angeboten) genutzt wird so fungiert dieser Source als echte Console - denn die Ausgaben landen im XPSE-Fenster.
KompilierenMarkierenSeparieren {$runtime prfrun32.xp9.nores.console.exe}
{$crq}
Declare text$,x&,y&,con&,conrect#
Dim conrect#,20
Def AllocConsole(0) !"KERNEL32","AllocConsole"
Def FreeConsole(0) !"KERNEL32","FreeConsole"
Def GetStdHandle(1) !"KERNEL32","GetStdHandle"
Def SetConsoleTitle(1) !"KERNEL32","SetConsoleTitleA"
Def SetConsoleTextAttribute(2) !"KERNEL32","SetConsoleTextAttribute"
Def WriteConsole(5) !"KERNEL32","WriteConsoleA"
Proc PrintCon
Parameters context$
context$=context$+Chr$(13)+chr$(10)
WriteConsole(con&,addr(context$),len(context$),addr(x&),0)
EndProc
AllocConsole()
text$="Console Testfenster "
SetConsoleTitle(addr(text$))
con&=GetStdHandle(-11)
Whileloop 100
PrintCon "Test "+Str$(Rnd(1000))
Wend
WaitInput
FreeConsole()
End
|
|
| |
| |
| |
|
|
Jac
de
Lad | Versteh ich nicht... 
Jac  |
|
| |
| Profan² 2.6 bis XProfan 11.1+XPSE+XPIA+XPRR (und irgendwann XIDE)
Core2Duo E8500/T2250, 8192/1024 MB, Radeon HD4850/Radeon XPress 1250, Vista64/XP | 04.02.2006 ▲ |
|
| |
|
|
| | Musst schon sagen was genau Du nicht verstehst... |
|
| |
| |
| |
|
|
Jac
de
Lad | Naja, wozu ist der Quelltext da? Leitet der die XPSE-Ausgaben ins eigene Prog um???
Jac |
|
| |
| Profan² 2.6 bis XProfan 11.1+XPSE+XPIA+XPRR (und irgendwann XIDE)
Core2Duo E8500/T2250, 8192/1024 MB, Radeon HD4850/Radeon XPress 1250, Vista64/XP | 04.02.2006 ▲ |
|
| |
|
|
Michael
Wodrich | Eine Textconsole ist wie ein altes DOS-Fenster - da braucht man keine GUI (ganzer Grafikteil fällt weg).
XPIA ist z.B. ein Kandidat der Consolen-Ausgabe nutzt. Er schreibt damit nicht in ein Grafik-(sprich Windows-)-Fenster sondern die Ausgaben landen direkt in der XPSE-Console.
Interessant auch für einfache Konverter, die Dateidaten von einem Format in ein anderes wandeln. Hier werden Start- und Endemeldungen einfach in eine Console geschrieben.
Von Dos oder XPSE gestartet erscheinen diese Meldungen dann ohne ein dich muß ich jetzt extra wegklicken-Fenster.
Die Frage ist, ob man von dieser Konsole auch Text abgreifen kann (ReadCon). Beide Richtungen für reines DOS-Feeling. |
|
| |
| Programmieren, das spannendste Detektivspiel der Welt. | 04.02.2006 ▲ |
|
| |
|
|
| |
| |
| |
| |
|
|
Jac
de
Lad | Hab gleich mal ein paar Fragen, weil ich nix dazu gefunden hab:
1. Wie kann ich vom Benutzer Texte eingeben lassen?
2. Wie kann ich eine schon geschriebene Zeile noch verändern?
3. Wozu wird im Beispiel eine Bereichsvariable declariert und DIMensioniert?
Vielleicht kann mir ja jemand helfen!
Jac |
|
| |
| Profan² 2.6 bis XProfan 11.1+XPSE+XPIA+XPRR (und irgendwann XIDE)
Core2Duo E8500/T2250, 8192/1024 MB, Radeon HD4850/Radeon XPress 1250, Vista64/XP | 14.08.2006 ▲ |
|
| |
|
|
Frank
Abbing | Schau in der Win32.hlp nach oder bei MSDN. Hier mal die gängigen Console-API-Funktionen. Meist ist dem Namen gut zu entnehmen, welche Funktion sich dahinter verbirgt:
AllocConsole
CreateConsoleScreenBuffer
FillConsoleOutputAttribute
FillConsoleOutputCharacter
FlushConsoleInputBuffer
FreeConsole
GenerateConsoleCtrlEvent
GetConsoleCP
GetConsoleCursorInfo
GetConsoleMode
GetConsoleOutputCP
GetConsoleScreenBufferInfo
GetConsoleTitle
GetLargestConsoleWindowSize
GetNumberOfConsoleInputEvents
GetNumberOfConsoleMouseButtons
GetStdHandle
HandlerRoutine
PeekConsoleInput
ReadConsole
ReadConsoleInput
ReadConsoleOutput
ReadConsoleOutputAttribute
ReadConsoleOutputCharacter
ScrollConsoleScreenBuffer
SetConsoleActiveScreenBuffer
SetConsoleCP
SetConsoleCtrlHandler
SetConsoleCursorInfo
SetConsoleCursorPosition
SetConsoleMode
SetConsoleOutputCP
SetConsoleScreenBufferSize
SetConsoleTextAttribute
SetConsoleTitle
SetConsoleWindowInfo
SetStdHandle
WriteConsole
WriteConsoleInput
WriteConsoleOutput
WriteConsoleOutputAttribute
WriteConsoleOutputCharacter |
|
| |
| |
| |
|
|
Jac
de
Lad | Oh Gott, da bin ich ja noch bis Weihnachten beschäftigt. Ich schaus mir alles (!) an, aber ich dachte da hat vielleicht jemand was in petto oder so...
Jac |
|
| |
| Profan² 2.6 bis XProfan 11.1+XPSE+XPIA+XPRR (und irgendwann XIDE)
Core2Duo E8500/T2250, 8192/1024 MB, Radeon HD4850/Radeon XPress 1250, Vista64/XP | 15.08.2006 ▲ |
|
| |
|
|
Jac
de
Lad | Öhhm, also ich hab jetzt mal im Platform SDk geschaut, da steht auch viel drin, aber obwohl ich der englischen Sprache mächtig bin, werde ich wahrscheinlich doch lieber ein traditionelles XProfan-Proggi schreiben (müssen), ich komme damit nicht klar (ca. 20000 Befehle in die Richtung Console...)
Jac |
|
| |
| Profan² 2.6 bis XProfan 11.1+XPSE+XPIA+XPRR (und irgendwann XIDE)
Core2Duo E8500/T2250, 8192/1024 MB, Radeon HD4850/Radeon XPress 1250, Vista64/XP | 15.08.2006 ▲ |
|
| |
|
|
Jörg
Sellmeyer | Hallo Jac,
Hast Du Prfellow? Da gibts eine Vorlage mit Include für Konsolenfenster.
Gruß
Jörg |
|
| |
| Windows XP SP2 XProfan X4... und hier mal was ganz anderes als Profan ...  | 15.08.2006 ▲ |
|
| |
|
|
Jac
de
Lad | Nee, ich nehme ProfanPAD...mal sehen...
Jac |
|
| |
| Profan² 2.6 bis XProfan 11.1+XPSE+XPIA+XPRR (und irgendwann XIDE)
Core2Duo E8500/T2250, 8192/1024 MB, Radeon HD4850/Radeon XPress 1250, Vista64/XP | 15.08.2006 ▲ |
|
| |
|
(935)
Deutsch
English
Français
Español
Italia