Zitat von
EDatabaseError:
Kleine Frage wie kann ich über den Comport Hex senden und empfangen??? ...
Hai Tobi,
über die RS232 wird ein
Byte gesendet. Also ein
Zahl.
Dabei ist es völlig egal in welcher
Schreibweise diese Zahl im Programm steht.
Delphi-Quellcode:
function BinToInt(Binary: string): Integer;
var
i: Integer;
begin
Result := 0;
for i := Length(Binary) downto 1 do
begin
Inc(Result, StrToInt(Binary[i]) * 1 shl (Length(Binary) - i));
end;
end;
procedure TDemoForm.btn_sendcommandClick(Sender: TObject);
var
command1: Byte;
command2: Byte;
command3: Byte;
begin
command1 := $1B;
command1 := 27;
command3 := BinToInt('11011');
end;
Hier ist es egal welches der drei commands Du sendest; es ist immer das selbe.
Stephan B.