Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   GUI-Design mit VCL / FireMonkey / Common Controls (https://www.delphipraxis.net/18-gui-design-mit-vcl-firemonkey-common-controls/)
-   -   Delphi Async dezimalzahlen senden und empfangen (https://www.delphipraxis.net/53211-async-dezimalzahlen-senden-und-empfangen.html)

xeus 12. Sep 2005 13:10


Async dezimalzahlen senden und empfangen
 
Hallo,
ich bin relativ neu in der prog szene.

Bin gerade dabei daten über rs232 zu einem gerät zu senden und zu empfangen.

hab mir dazu async pro besorgt.

kann mir einer von euch vielleicht step by step erklären, wie ich 10 dec zahlen sende und 8 dec empfange. mit welchen komponenten bewerkställige ich dass?

danke,
xeus

Sharky 12. Sep 2005 13:14

Re: Async dezimalzahlen senden und empfangen
 
Hai xeus,

ersteinmal: "Herzlich Willkommen in der Delphi-PRAXiS".

unabhängig davon mit was Du das machst. Die kann mir nicht vorstellen das Du eine Zahl an das Gerät senden musst.
In der Regel werden "Zahlen" als Zeichenfolge (String) an die Geräte gesendet.

Leider habe ich Asnc pro nicht mehr installiert. Darum kann ich dir auch nicht sagen wie man dort einen string sendet.

xeus 12. Sep 2005 13:17

Re: Async dezimalzahlen senden und empfangen
 
ist es möglich 10 bytes in Form von bits zu versenden
z.b

1 2 3 4 5 6 7 8 9 10
00100100 11011001 00100100 11011001 00100100 11011001 00100100 11011001 00100100 11011001

gruß

xeus

xeus 12. Sep 2005 13:35

Re: Async dezimalzahlen senden und empfangen
 
Mein problem ist, dass ich nur weis welche strings ich senden muss, aber wie mach ich das? mit async find ich nur string char block. wenn ich es als string send kommt hinten doch was anderes raus

Sharky 12. Sep 2005 13:46

Re: Async dezimalzahlen senden und empfangen
 
Zitat:

Zitat von xeus
... aber wie mach ich das?

So, habe es mir mal schnell installiert. Bei den Demos die dabei sind findet man auch schöne Beispiele ;-)
Delphi-Quellcode:
procedure TForm1.TestClick(Sender: TObject);
  {TestClick button click - Send output}
begin
  ApdComPort1.OutPut := '1234567890'^M; // Das ^M nur wenn dein Gerät dieses empfangen möchte.
end;

Memo 12. Sep 2005 13:48

Re: Async dezimalzahlen senden und empfangen
 
Zitat:

Zitat von xeus
ist es möglich 10 bytes in Form von bits zu versenden

Nimm doch ein Array of Byte.
Mit Async habe ich noch nicht gearbeitet, aber es sollte doch auch damit möglich sein Daten zu senden.
Delphi-Quellcode:
 var
  sende : Array[0..9] of Byte;
begin
  sende[0] := $49;
  sende[1] := $50;
  ...
  ...
  {dann senden, Async wird doch irgendwas wie senddata(@sende...) unterstützen
end;

xeus 12. Sep 2005 13:54

Re: Async dezimalzahlen senden und empfangen
 
ich glaub ich bin zu doof, ich will eine dezimal zahl oder bits senden.
entweder ich send direkt bits oder dezimalzahlen, oder ich wandle diese irgendwie in einen string um.
aber wie?


nochmals danke bis hierher


Alle Zeitangaben in WEZ +1. Es ist jetzt 12:04 Uhr.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz