Como executar programas externos ao Delphi?

Como executar programas externos ao Delphi? Se você precisar rodar um programa externo durante a execução do seu aplicativo em DELPHI, basta usar a seguinte linha no seu programa: WinExec(‘drive\path\file.exe’, sw_show); Onde drive é o drive que deve ser usado, path é o caminho (diretório e subdiretórios) onde está o arquivo executável e file é o nome do arquivo

Continuar lendo »

Número de cópias para a impressão

Número de cópias para a impressão   Procedure AjustaPapel(Copias:Integer); var Device : array[0..255] of char; Driver : array[0..255] of char; Port : array[0..255] of char; hDMode : THandle; PDMode : PDEVMODE; begin Printer.PrinterIndex := Printer.PrinterIndex; Printer.GetPrinter(Device, Driver, Port, hDMode); if hDMode <> 0 then begin pDMode := GlobalLock(hDMode); if pDMode <> nil then begin pDMode^.dmFields

Continuar lendo »
Pages:1234567...22»