Reply to Problem mit Serieller Schnitstelle on Fri, 01 Sep 2006 05:45:24 GMT

kiki_666 — Fri, 01 Sep 2006 05:45:24 GMT

Hallo Leute, meine Kommunikation über eine Serielle Schnittstelle habe ich eigentlich schon, aber jetzt habe ich gemerkt, dass es da ein kleines Problem gibt. Wenn ich mein Programm starte und sofort in den Empfangsmodus gehe, dann hängt sich das Programm auf. Beim Debuggen habe ich festgestellt, dass er bei der ReadFile() hängenbleibt.
Das Lustige: Wenn ich bei Programm-Start zweimal die Open_Com-Funktion aufrufe, dann funktioniert es einwandfrei?!

Kann mir bitte jemand helfen.

#include "S_Kommunikation.h"
#include "Eingabefenster.h"
#include 
#include 
#include 

extern HANDLE com_status_h;
extern char portnr_c;         // stores COM-Port number
extern int baudrate;          // stores baudrate
extern char databits_c;       // stores number if data bits
extern char stopbits_c;       // stores number of stop bits
extern char paritbit_c;       // stores type of parity bit
extern char protocol_c;       // stores protokol type
extern bool par_enable_b;     // flag if parity is enabled
extern bool open_com_b;       // flag if COM is open
extern char InString[22];
extern bool empfangen;
extern DWORD dwRead;

//---------------------------------------------------------------------------
int Open_Comport()
{
   AnsiString temp="COM"+(AnsiString)portnr_c;
   DCB           dcb;
   com_status_h = CreateFile (temp.c_str(), GENERIC_WRITE | GENERIC_READ, 0, NULL,
   OPEN_EXISTING, 0, NULL);
   // setzen der Blocklaenge, muss erfolgen--------------------------
   dcb.DCBlength = sizeof(DCB);
   SetupComm (com_status_h, 1024, 1024);
   // COM-Einstellungen laden----------------------------------------
   GetCommState (com_status_h, &dcb);
   // Baudrate einstellen--------------------------------------------
   dcb.BaudRate  = baudrate;
   // Datenbits einstellen, hier 8-----------------------------------
   dcb.ByteSize  = databits_c;
   // Paritaet einstellen, hier keine Paritaet-------------------------
   dcb.Parity    = paritbit_c;
   // Stopbits einstellen, hierv1------------------------------------
   dcb.StopBits  = stopbits_c;
   // COM-Einstellungen speichern------------------------------------
   if (par_enable_b)
   {
     dcb.fParity = 1;
   }
   else
   {
     dcb.fParity = 0;
   }
   if (protocol_c == 0x00)
   {
     dcb.fDtrControl = DTR_CONTROL_ENABLE;
   }
   else
   {
     dcb.fDtrControl = DTR_CONTROL_DISABLE;
   }
   SetCommState (com_status_h,&dcb);

  if (com_status_h == 0)    // error in opening port
  {
    Befehlsauswahl->StatusBar->Panels->Items[0]->Text = "COM" + (AnsiString)portnr_c+" wurde erfolgreich geöffnet!";
  }
  else
  {
    Befehlsauswahl->StatusBar->Panels->Items[0]->Text = "COM" + (AnsiString)portnr_c+" konnte nicht geöffnet werden!";
  }
   return 0;
}
//---------------------------------------------------------------------------
int Close_Comport(void)
{
   CloseHandle (com_status_h);
   return (0);
}
//---------------------------------------------------------------------------
void Write_Comport(char b_daten[22],int length)
{
  Open_Comport();
  DWORD iBytesWritten;
  char temp[22]="";
  for(int i=0;iStatusBar->Panels->Items[0]->Text="Übertragung erfolgreich!";
  else
    Befehlsauswahl->StatusBar->Panels->Items[0]->Text="Übertragung nicht erfolgreich!";
  Close_Comport();
}
//---------------------------------------------------------------------------
void Read_Comport()
{
  Befehlsauswahl->StatusBar->Panels->Items[0]->Text="Empfangsmodus gestartet.";
  Befehlsauswahl->StatusBar->Update();
  int i=0;
  empfangen=false;
  dwRead=0;
  while(!empfangen && i<50)
  {
    dwRead = 0;
    ReadFile (com_status_h, &InString, sizeof (InString), &dwRead, NULL);
    if (dwRead > 0)
    {
      empfangen=true;
    }
    Sleep(200);
    i++;
  }
  if(empfangen)
    Befehlsauswahl->StatusBar->Panels->Items[0]->Text="Empfangsmodus beendet.";
  else
    Befehlsauswahl->StatusBar->Panels->Items[0]->Text="Empfangsmodus beendet. (Es wurden keine Daten empfangen.)";
}
//---------------------------------------------------------------------------

...und im Main-Prog mache ich bloß diesen Aufruf:

//---------------------------------------------------------------------------
void __fastcall TBefehlsauswahl::EmpfangenExecute(TObject *Sender)
{
  Open_Comport();
//  Open_Comport();  //wie gesagt, wenn ich hier Open_Comport() zweimal aufrufe, dann gehts.
  Read_Comport();
  Close_Comport();
}
//---------------------------------------------------------------------------

Gruß Kiki

Reply to Problem mit Serieller Schnitstelle on Fri, 01 Sep 2006 13:43:24 GMT

kiki_666 — Fri, 01 Sep 2006 13:43:24 GMT

...ich bins nochmal. Also ich hab jetzt den ganzen Tag daran herum gemacht. Noch vor ein paar Tagen hat das Programm funktioniert.
Und seit heute (hab die letzten Tage nicht an der COM-Funktion gearbeitet) funktioniert die ganze Funktion nicht mehr.

Früher konnte ich genau vier Datenelemente senden und habe am Empfangs-PC auch genau 4 Elemente empfangen.
Jetzt funktioniert nur noch, wenn ich während der Empfangsschleife vom Sende-PC mindestens 22 Daten versende.
Der Empfangs-PC kann dann diese Daten empfangen, was ja leider dann viel zu viele sind. (da ich ja nur 4 empfangen will)

Im Debbug-Modus bleibt er immer bei der Read-File stehen und springt da nicht weiter.

Edit:
Und wenn ich jetzt zweimal die Open_Comport() aufrufe, dann macht er zwar die Schleife richtig (also arbeitet das ReadFile() immerwieder ab) aber er kann leider auch nur 22 (also maximale Datengröße) emppfangen.

Hoffe mir kann jemand helfen.

Gruß Kiki