Probleme mit COM Port

[MAarkus_R19]

hi ich will ein paar zeichen über die serielle Schnittstelle ausgeben. --> hab mir die cport komponente runtergeladen und installiert jetzt sollte man ja mit WriteStr() und einem speicherplatz was rausschicken können jedoch kommt beim ausführen des Befehls die fehlereldung "writefile function failed (win error code:6)" was is da falsch????

hier noch ein kliener auszug aus dem programm:

Delphi-Quellcode:

var
  Spi: TSpi;
  b,a,ce,bef, cebus,befbus,adresse, daten:string;

procedure TSpi.Button1Click(Sender: TObject);
begin        
        comport1.WriteStr(cebus);
      
        if bef='write'
                then begin
                        befbus:='a';
                        adresse:= SPI.Adresse_Edit1.Text;
                        comport1.WriteStr(befbus);
                        comport1.WriteStr(adresse);
                        befbus:='b';
                        Daten:= SPI.Adresse_Edit1.Text;
                        comport1.WriteStr(befbus);
                        comport1.WriteStr(daten);
                end;
        if bef ='read'
                then begin
                        befbus:='c';
                        adresse:=SPI.Adresse_Edit1.Text;
                        comport1.WriteStr(befbus);
                        Comport1.WriteStr(adresse);
                        comport1.ReadStr(daten,2)  ;

                end;

end;

[Edit=Sakura]Herzlich willkommen in der DP
Überschrift angepasst
DELPHI-[]-Tags gesetzt[/Edit]

[Darty]

Hab mal gegoogled was diese fehlermeldung überhaupt bedeutet.

Code:

Code 6
This code means there is a conflict between this device and another device.

To resolve this error code, see the "Troubleshooting Conflicting Hardware" topic in Windows 95 Help, or see the following article in the Microsoft Knowledge Base: ARTICLE-ID: Q133240
TITLE : Troubleshooting Device Conflicts with Device Manager.

[oki]

Hi,

soweit meine Erinnerung reicht, sagt dir das, dass ein anderes Programm (oder du Selber) schon ein Handel auf den Port besitzt. So nach dem Motto: Ich melde mich zweimal beim Port an und kann gleichzeitig mit zwei oder mehr Programmen (Task) auf den Port zugreifen. Das geht nicht!!!! Es kann immer nur ein Programm (und eine Connection) auf den Com-Port zugreifen. Nach einem Connect immer beim Beenden den Port schließen, sonst hilft nur ein Rechnerneustart um das offene Handle loszuwerden.

Gruß oki

@P.S. Prüf doch mal ob du den Port überhaupt schon connected hast (Port.Open zum Öffnen und schauen ob irgent wo ein Property Typ Boolean als Status ob offen)

[Daniel B]

Hallo und herzlich Willkommen im Forum!

Vielleicht solltest Du mal die gesamte Prozeudr posten, denn so kann da auch cnihts gehen, dazu kommt das ich so an die 10-15 Compilerfehler habe. ;)

Um ganz sicher zu sein ob der ComPort auch offen ist, kannst Du es ja extra prüfen.

Delphi-Quellcode:

if ComPort1.Connected then begin end;

Grüsse, Daniel :hi: