Forum: Object-Pascal / Delphi-Language
Delphi
by haidomingo,
23. Nov 2009
Wenn der Drucker über die Arbeitszeit Off-line
so meine Software kommt er wieder auf Linie
Früher habe ich von deutschen Google schreiben
Forum: Object-Pascal / Delphi-Language
Delphi
by haidomingo,
22. Nov 2009
function TestPrinterOffLine:Boolean;
var
HPrinter : THandle;
InfoSize,
BytesNeeded: Cardinal;
PI2: PPrinterInfo2;
PrinterDefaults: TPrinterDefaults;
SelectedPrinter: string;
begin
Forum: Object-Pascal / Delphi-Language
Delphi
by haidomingo,
8. Nov 2009
The new code:
procedure TForm24.Button1Click(Sender: TObject);
var
HPrinter : THandle;
InfoSize,
BytesNeeded: Cardinal;
PI2: PPrinterInfo2;
PrinterDefaults: TPrinterDefaults;
SelectedPrinter: string;
Forum: Object-Pascal / Delphi-Language
Delphi
by haidomingo,
8. Nov 2009
Help, I can not find the solution!
var
SelectedPrinter: string;
hSelPrn : dword;
PrinterInfo : TPrinterInfo2A;
bytesNeeded : dword;
begin
SelectedPrinter:=Printer.Printers;
if OpenPrinter(PChar(SelectedPrinter), hSelPrn, nil) then begin
Forum: Object-Pascal / Delphi-Language
Delphi
by haidomingo,
7. Nov 2009
Thanks.
Where I wrong?
var
SelectedPrinter: string;
hSelPrn : dword;
PrinterInfo : TPrinterInfo2A;
bytesNeeded : dword;
dwStatusMask : DWORD;
Forum: Object-Pascal / Delphi-Language
Delphi
by haidomingo,
7. Nov 2009
Hi,
How to set "use printer online" from code.
Thanks