Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
begin
Memo1.Clear;
Memo1.Lines.Append('^XA^XFLabel.ZPL') ;
Memo1.Lines.Append('^FN1^FD' + Edit1.Text + '^FS');
Memo1.Lines.Append('^FN2^FD' + Edit2.Text + '^FS') ;
Memo1.Lines.Append('^FN3^FD' + Edit1.Text + '-' + Edit2.Text + '^FS^XZ');
end;
ergibt im Memofeld folgendes
Zitat:
^XA^XFLabel.ZPL
^FN1^FD5000^FS
^FN2^FD100^FS
^FN3^FD5000-100^FS^XZ
wenn im Edit1 5000 und im Edit2 100 steht.
Hast du dem Button OnClick-Ereignis Butto1Click zugewiesen?