| |
|
|
| 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
Salve, iF. |
|
|
| |
|
|
|
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 per einfache Konverter, die Dateidaten von einem Format in ein anderes wandeln. Hier werden Start- und Endemeldungen einfach in un 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 per 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 per Konsolenfenster.
Saluto 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 ▲ |
|
|
|