Einzelnen Beitrag anzeigen

Natcree

Registriert seit: 5. Mär 2013
502 Beiträge
 
Delphi 7 Enterprise
 
#1

Kassenlade öffnen

  Alt 21. Jun 2014, 12:16
Hallo ich möchte eine Kassenlade öffnen. habe mir dazu ein paar Codezeilen zusammengebastelt.
Die Kassenlade ist mit dem Thermodrucker verbunden und sollte mit dem Steuerbefehl Esc-P geöffnet werden können. Der drucker ist im BS nicht installiert. Er nennt sich TPG-Color-POS. Nunmehr komme ich nicht weiter.

wollte die lade hiermit öffnen

Delphi-Quellcode:
Var
    FH:THandle;
    Buff: array[0..5] of char;
    RetW:DWORD;
    port:string;
    cmd:string;
    acmd:ansistring;
    p:pansichar;
begin
   acmd:=#27#112#49#250#250;
   p:=AnsiStrAlloc(length(acmd));
   p:=StrPCopy(p,acmd);
   switchprinter(''); //Druckername, so wie er in Windows angezeigt wird
   rawdatatoprinter(pwidechar(''),pbyte(p),length(acmd));
end;
1. Hier sagt er mir AnsiStrAlloc undeclared identifier

2. Dann ist mir auf gefallen das der Drucker nicht im BS zusehen ist.
Wie bekomme ich das gelöst?
  Mit Zitat antworten Zitat