Forum: Programmieren allgemein
by p80286,
8. Aug 2011
Wenn ich das richtig interpretiere dann willst Du einen Ansichar, ein Word und ein Byte übertragen.
TMyRecord = packed record
n1: Ansichar;
n2: Word;
n3: Byte;
end;
und die beiden Werte n2 und n3 werden über ein TEdit eingegeben. Also brauchst Du Wahrscheinlich so etwas:
Forum: Programmieren allgemein
by p80286,
5. Aug 2011
Das erreichst Du über
s:='++';
Da fehlen naturlich noch ein paar Fehlerprüfungen.....
Gruß
K-H
Forum: Programmieren allgemein
by p80286,
5. Aug 2011
Also, wofür soll das gut sein?
Zunächst gibt der Benutzer einen String ein, der aus Ziffern zusammen gesetzt wird.
Wenn "CPort" nur mit Strings umgehen kann, dann hast du doch alles was Du Brauchst?
Gruß
K-H
Forum: Programmieren allgemein
by p80286,
5. Aug 2011
Noch ne Möglichkeit aber vielleicht nicht das was gewünscht war:
procedure TForm1.foo;
var
Temp:String;
begin
Temp := 'W' + InttoHex($03,2) + InttoHex($F9,2) + InttoHex($A7,2);
end;