TComport - Byte senden

[Muellermilchtrinker]

Servus DP,

ich habe eine Frage: Wie kann ich mit TComport ein Byte im Format &B11001100 senden? Es geht darum die Sendezeit eines Musters für meinen LED Cube zu verringern, denn wenn ich ein Byte als String sende, dann schickt Delphi ja 10 Bytes.

Ein Muster (liegt in einem array) sieht so aus:

Code:

&B01000000  &B00000000  &B00000000  &B00000000
&B00100000  &B00000000  &B00000000  &B00000000
&B00010000  &B00000000  &B00000000  &B00000000
&B00001000  &B00000000  &B00000000  &B00000000
&B00000100  &B00000000  &B00000000  &B00000000

Als links oben ist eins und dann nach rechts immer eins addieren und in der nächsten Zeile links weitermachen.

Das Protokoll sieht so aus:

Code:

Arrayfeld ; Muster
Bsp.:
02;&B11001100

Ich hoffe mir kann jmd. helfen, denn wenn ich ein String sende '02;&B11001100' dann dauert das natürlich viel zu lange und ich möchte ja gerne eine Musik Visualisierung drauf laufen lassen.