Einzelnen Beitrag anzeigen

Benutzerbild von smart
smart

Registriert seit: 19. Dez 2004
Ort: Bochum
1.266 Beiträge
 
Delphi 2007 Professional
 
#6

Re: Codeumsetzer von Baisc nach Pascal?

  Alt 8. Mär 2006, 17:13
Zitat von mschaefer:
Moin, moin,

Heike, Du baust an einer Ansteuerung für ein LCD-Display?!? Irgendwo vorher im Basic-Code wird die Printausgabe wahrscheinlich auf den Com-Porrt gelenkt und die Steueranweisungen und Texte dann mit dem Print ausgegeben. Das zusammenbauen des Stringes aus den Einzelteilen bekommst Du selbst hin. Tippe, dass die Ausgabe auf den Port wohl das knackige Problem ist.

Würde entweder die Komponente TSerial von Rainer Reusch aus der Toolbox verwenden oder bei Torry die TComPort von Dejan Crnila. Da mußt Du Deinen String dann in die Senden - Routine einbauen.

Würde das LCD aber vorher mal mit einem Terminal-Programm testen und die Befehle erstmal von Hand eintragen. Geeigent wäre zum Beispiel ShamCom .

Grüße aus der Stadt an der Leine // Martin
Hallo Martin!

Gar nicht mal. Ich habe das so gelöst:
Delphi-Quellcode:
procedure TForm1.Button3Click(Sender: TObject);
var
ES: String;
  tf: TextFile;
begin
ES := Chr(27);
  AssignFile(tf, 'COM1: 9600,N,8,1');
  Rewrite(tf);
  WriteLn(tf, ES + ';' + ES + '(1* Rotkohl 500 Gr. *' + CHR(13) + ES + ')0091');
  Writeln(tf, ES + '(2 4,45 Euro *' + CHR(13) + ES + ')1192');
  CloseFile(tf);
end;
Klappt sogar. Ich kann nur kein Basic. Da war ein Demoprogramm in Basic bei. Das Display hat nämlich zwei Zeilenund ich bin noch nicht dahinter gekommen wie die zweite Zeile angesprochen wird.

Gruß
Heike
Heike Kretschmann
Viele Grüße aus Bochum

kaum denkt man alles ist fertig, da fängt man wieder von Vorn an.
  Mit Zitat antworten Zitat