Codeumsetzer von Baisc nach Pascal?

[smart]

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