search

maxkleiner / maXbox4

code compiler script studio
GNU General Public License v3.0
23 stars 10 forks source link

Shell Code Console #8

Closed maxkleiner closed 5 years ago

maxkleiner commented 5 years ago

add attachconsole and freeconsole to base library

function AttachConsole(dwProcessID: Integer): Boolean;external'AttachConsole@kernel32.dll stdcall'; function FreeConsole(): Boolean;external'FreeConsole@kernel32.dll stdcall'; document: NativeWriteln()

maxkleiner commented 5 years ago

now inbuilt to exe with import lib

maxkleiner commented 5 years ago

type (----------------------------------------------------------------------------) TPSImport_WinAPI = class(TPSPlugin) protected procedure CompileImport1(CompExec: TPSScript); override; procedure ExecImport1(CompExec: TPSScript; const ri: TPSRuntimeClassImporter); override; end;

function AttachConsole(dwProcessID: Integer): Boolean;

stdcall; external 'kernel32.dll' name 'AttachConsole';

function FreeConsole(): Boolean;

stdcall; external 'kernel32.dll' name 'FreeConsole';