Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Lazarus (IDE) (https://www.delphipraxis.net/81-lazarus-ide/)
-   -   Com Port - Schnittstellen (https://www.delphipraxis.net/175763-com-port-schnittstellen.html)

Foxi1896 16. Jul 2013 13:07

Com Port - Schnittstellen
 
Hey,
Wie ich möchte auf zwei Ports zugreifen ... einmal für ein Messgerät und zum anderen ein Knopf zu betätigen des Messgeräts.

Bisher habe ich nur auf das Messgerät zugeriffen mit:

Delphi-Quellcode:
OpenCom(pchar('com' + Edit1.Text + ':9600,N,8,1'));
und nun habe ich es mit:


Delphi-Quellcode:
OpenCom(pchar('com' + Edit1.Text + ':9600,N,8,1')); OpenCom(pchar('com' + Edit3.Text + ':9600,N,8,1'));DTR(0);DTR(1);Timer1.Enabled:=True;ii:=0;

versucht... aber das Funktioniert nicht.
Kann mir da jemand weiterhelfen?


Gruß Foxi

Medium 16. Jul 2013 13:18

AW: Com Port - Schnittstellen
 
Ja, mach irgend etwas so, dass es funktioniert.

Alternativ könntest du uns auch sagen WAS zum Henker nicht geht, welche Fehlermeldungen kommen, was funktionieren soll - vor allem wie - usw. Also eigentlich so die ganzen Dinge, die man bräuchte, wenn man sich nicht gerade das Gehirn mit dir teilt :roll:

Foxi1896 16. Jul 2013 13:25

AW: Com Port - Schnittstellen
 
Also mein Problem ist das er nur eine Schnittstelle erkennt.
Wie lauten die Befehle zum öffnen und schliessen der einzelnen ports?

gammatester 16. Jul 2013 13:33

AW: Com Port - Schnittstellen
 
Wie Medium schon sagte, solltest schon etwas mehr verraten. Wenn Du zwei Schnittstellen gleichzeitig benutzen willst, brauchst Du i.d.R. zwei Objekte/Handles/Instanzen je nach verwendeter Software. Deine Schnipseln könnten einen auf die Idee bringen, daß Du nur ein Objekt/.. hast. Das würde dann wahrscheinlich nicht funktionieren.

sx2008 16. Jul 2013 13:38

AW: Com Port - Schnittstellen
 
Warum verwendest du keine Delphi Komponente wie z.B. TComPort oder TSerialNG ?
Was ich damit sagen will ist dass es sehr ungeschickt ist keine Komponente zu verwenden.
Don't reinvent the wheel!

gammatester 16. Jul 2013 13:51

AW: Com Port - Schnittstellen
 
Zitat:

Zitat von sx2008 (Beitrag 1221775)
Warum verwendest du keine Delphi Komponente wie z.B. TComPort oder TSerialNG ?

Vielleicht weil die unter FPC/Lazarus nicht benutzbar sind?

Foxi1896 16. Jul 2013 14:07

AW: Com Port - Schnittstellen
 
Zitat:

Zitat von gammatester (Beitrag 1221776)
Zitat:

Zitat von sx2008 (Beitrag 1221775)
Warum verwendest du keine Delphi Komponente wie z.B. TComPort oder TSerialNG ?

Vielleicht weil die unter FPC/Lazarus nicht benutzbar sind?

ja, die gibt es bei lazarus nicht.

DeddyH 16. Jul 2013 14:24

AW: Com Port - Schnittstellen
 
http://sourceforge.net/projects/cportlaz/

Der schöne Günther 16. Jul 2013 14:54

AW: Com Port - Schnittstellen
 
Ich habe keine Ahnung was
Delphi-Quellcode:
OpenCom(..)
ist. Ich weiß auch nichts über dein "Messgerät". Auch verrätst du nichts über IRGENDWELCHE Fehlermeldungen, oder was
  • erwartetes Verhalten
  • tatsächlich bekommenes Verhalten
ist. Ganz abgesehen davon, was in deinem Edit1 oder Edit3 steckt

Am Rande würde ich noch wärmsten empfehlen, die Portadresse mit
Delphi-Quellcode:
PChar('\\.\COM'+IntToStr(deinePortNummer))
anzugeben, die alte Notation macht insbesondere gerne Probleme bei Portnummern größer Neun.

Kommunikation über RS-232 und RS-485 schiebe ich über direkt über die WinAPI (CreateFile(..), WriteFile(..), ...), da könnte ich dir haarklein erzählen, was wie wo geht. Aber mit deiner Fehlerbeschreibung kommt man irgendwie nicht weit...

DonAlfredo 16. Jul 2013 15:39

AW: Com Port - Schnittstellen
 
Serial library:

http://synapse.ararat.cz/doku.php/start

No component, no install. Works with FPC, Delphi.
In use by me (on Linux, Windows) for a very long time without problems !!

Greetings, Alfred.

creed steiger 17. Jul 2013 17:47

AW: Com Port - Schnittstellen
 
http://forum.lazarus.freepascal.org/...cseen.html#new


Zitat:

Based on :
- SdpoSerial v0.1.4
- Synaser library
- TcomPort component
könnte dir weiterhelfen


Alle Zeitangaben in WEZ +1. Es ist jetzt 00:40 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-2025 by Thomas Breitkreuz