Hvordan bruges WriteConsoleOutput

Den funktion er en del af Win32 API.

Du kan læse docs her http://msdn.microsoft.com/library/default.asp?url=/library/en-us/dllproc/base/writeconsoleoutput.asp

Den skriver simpelthen til skærmen.

Jeg er ikke sikker på at jeg forstår hvad d vil.

Et ofte anvendt trick er at lade et program skrive en BAR fil og så eksekvere den
bagefter (og evt. slette den bagefter).

Tror du, du kunne give et eksemple på at bruge WriteConsoleOutput ?

ja men det vil tage lidt tid

kan du ikke bruge følgende opgooglede eksempel:

http://www.delphipraxis.net/topic27848_writeconsoleoutput.html

?

Det jeg vil er at få UserName på den bruger man er logget ind med og så bruge den i en .vbs fil. Mit problem er bare at med den kode jeg har prøvet der vil mit .vbs ikke få output fra mit program som er en string men den skriver bare 0.

Koden:
program GetUserName;

{$APPTYPE CONSOLE}

uses
  Windows;

Function GetCurrentUserName : String;
var
  Size : Cardinal;
begin
  Size := MAX_PATH;
  SetLength(Result, Size);
  Windows.GetUserName(PChar(Result),Size);
  SetLength(Result, Pred(Pos(#0,Result)));
end;

begin
  WriteLn(GetCurrentUserName);
end.

det kan jeg ikke se at WriteConsoleOutput kan hjælpe dig med

men hvorfor henter du ikke bare brugernavnet i VBS koden ?

fordi det kan jeg ikke på windows 98 :(

WScript.NetWork findes ikke på Win98 ?

2 ideer:

1) skriv en BAT/VBS fil med hardcoded username fra Delphi inden du kører den

2) angiv username som parameter når du starter BAT/VBS fil

jo hvis man installere det men det vil stadig ikke virke da der ikke er sat en variable i win98 som der er i 2k/xp osv (det kan man se når man skriver "set" i cmd)

På min XP lader WScript.NetWork sig altså ikke påvirke af den environment variabel

nej med det er også xp.. men det virker ikke i 98 for jeg har siddet og bøvlet med at få det til at virke hele dagen idag ca ;)

har dov fået det til at virke nu ved at lave en bat fil og så køre den hvor der står "set user=bruger".

Hvis du laver et svar må du godt få de points :)

ok