Anwendung im Hintergrund [Konsolanwendung oder VCL Formular]

[p80286]

@NamenLozer
Danke für den Hinweis. Ich habe dann auch selbst ein wenig gewühlt. Es scheint so, daß über APPTYPE CONSOLE Input/Output der Console zugewiesen wird.
Also müßte es auch so gehen:

Delphi-Quellcode:

program Project2;

uses
  SysUtils;

var
  name : string;
  io   : textfile;
begin
  assignfile(io,'\\.\CON');
//  reset(io);
  WriteLn(io,'Please enter your name');
  ReadLn(io,name);
  WriteLn(io,'Your name is '+name);
  WriteLn(io,'');
  WriteLn(io,'Press enter to exit');
  ReadLn(io,name);

end.

Geht aber nicht, da die Gerätedatei nicht erkannt wird/falsch ist.

Gruß
K-H

[hathor]

Zitat:

Zitat von Der schöne Günther (Beitrag 1218999)

Ich bin kein Experte, aber spontan wäre ich erst einmal direkt den VCL-Weg gegangen. Irgendwann brauchst du vielleicht doch eine Oberfläche. Einen TTimer hast du in einer Konsolenanwendung auch nicht.

Timer gibt es:

Delphi-Quellcode:

program Iexist;

uses
  SysUtils, Windows;

var i : Integer;

procedure TimerProc(Wnd:HWnd;Msg,TimerID,dwTime:DWORD);stdcall;
begin
  i:=i+20;
end;

begin
i:=0;
SetTimer(0,0,1000,@TimerProc);  // 1 sec

repeat
    inc(i);
    MessageBox(0, PWChar(IntToStr(i)), 'I exist!', MB_ICONINFORMATION);
    Sleep(5000);
until i>100; // keine Angst: MessageBox erscheint nur 3x

    Halt(0);
end.