| |
|
|
| If the right Runtime (in the Source indicated and in the Downloadcenter to that Download offered) used becomes so fungiert this Source as real Console - because The expenses disembark in the XPSE-Window. CompileMarkSeparation {$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
salvo, iF. |
|
|
| |
|
|
|
Jac de Lad | Versteh I do not...
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 | 02/04/06 ▲ |
|
|
|
|
| must already say what very You do not understand... |
|
|
| |
|
|
|
Jac de Lad | Well, wozu is the View source there? heading the The XPSE-expenses in that Own Prog circa???
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 | 02/04/06 ▲ |
|
|
|
|
Michael Wodrich | an Textconsole is like a altes DOS-Window - there need one no GUI (whole Grafikteil falls lane).
XPIA is z.B. one candidate the Consolen-spending uses. it writes lest into graphic-(speak windows-)-Window separate The expenses disembark directly in the XPSE-Console.
interestingly too for simple Konverter, The Dateidaten of a stature into other wandeln. here go Start- and Endemeldungen simply in a Console written. From Dos or XPSE launched attend these informations then without one you must I now extra wegklicken-Window.
The question is, whether one of this Konsole too Text abgreifen can (ReadCon). both directions for reines DOS-Feeling. |
|
|
| Programmieren, das spannendste Detektivspiel der Welt. | 02/04/06 ▲ |
|
|
|
|
| |
|
| |
|
|
|
Jac de Lad | Have same time a couple ask, because I nothing moreover found Have:
1. How can I of user Texts prompt let? 2. How can I a already written row yet change? 3. Wozu becomes in the example a Memory-Variable declariert and DIMensioniert?
Perhaps can me Yes someone help!
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 | 08/14/06 ▲ |
|
|
|
|
Frank Abbing | look in the Win32.hlp to or with MSDN. here times the gängigen Console-API-functions. mostly is the names well To entnehmen, which function itself behind it hide:
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 god, there be I Yes yet To christmas engage. I schaus me everything (!) on, but I thought there has Perhaps someone what in petto or 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 | 08/15/06 ▲ |
|
|
|
|
Jac de Lad | Öhhm, means I Have now time in the Platform SDk geschaut, there standing too plenty drin, but though I the english Language powerful be, I will probably still rather one traditionelles XProfan-Proggi write (must), I come lest clear (ca. 20000 Commands in The direction 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 | 08/15/06 ▲ |
|
|
|
|
Jörg Sellmeyer | Hello Jac, have You Prfellow? there Gibts a Presentation with Include for Konsolenfenster.
Greeting Jörg |
|
|
| Windows XP SP2 XProfan X4... und hier mal was ganz anderes als Profan ... | 08/15/06 ▲ |
|
|
|
|
Jac de Lad | no, I take ProfanPAD...time see...
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 | 08/15/06 ▲ |
|
|
|