Reply to Timer und SendText Problem on Thu, 11 Oct 2007 15:49:21 GMT

Andi_87 — Thu, 11 Oct 2007 15:49:21 GMT

ich will einen recht grossen String (ca. 8000 Zeichen) mit SendText() verschicken. Funktioniert auch gut das Problem ist nur das der String alle 60 sec von einem Timer verschickt wird und das geht nicht da kommen immer nur die ca. letzten 4000 Zeichen an. Ich hab es mal statt dem Timer mit einem Button versucht und da kommt alles an.

Also wo kann das Problem sein.

bool merker;
for(int i=1;iRowCount;i++)
{
   if(userlist->Cells[1][1]=="")
     break;
   merker=false;
   String ausgangstext="#103#";
   ADOQuery->SQL->Clear();
   ADOQuery->SQL->Add("SELECT * FROM notizzettel WHERE `empfaenger`='" + userlist->Cells[1][i] + "' AND `status`!='erledigt' AND `zustellen` <= NOW();");
   ADOQuery->Open();
   for(;!ADOQuery->Eof;ADOQuery->Next())
   {
      ausgangstext+=ADOQuery->FieldByName("ID")->AsString;
      ausgangstext+="#";
      ausgangstext+=ADOQuery->FieldByName("sender")->AsString;
      ausgangstext+="#";
      ausgangstext+=ADOQuery->FieldByName("betreff")->AsString;
      ausgangstext+="#";
      ausgangstext+=ADOQuery->FieldByName("text")->AsString;
      ausgangstext+="#";
      ausgangstext+=ADOQuery->FieldByName("gesendet")->AsString;
      ausgangstext+="#";
      ausgangstext+=ADOQuery->FieldByName("art")->AsString;
      ausgangstext+="#";
      ausgangstext+=ADOQuery->FieldByName("prioritaet")->AsString;
      ausgangstext+="#";
      merker=true;
   }
   if(merker==true)
     Server->Socket->Connections[i-1]->SendText(ausgangstext);
}

Das ist der Inhalt der Timers

Reply to Timer und SendText Problem on Sat, 13 Oct 2007 09:45:05 GMT

kpeter — Sat, 13 Oct 2007 09:45:05 GMT

void __fastcall TFormMain::Timer1Timer(TObject *Sender)
{
   //Timer1->Interval = 60000;
   Timer1->Interval = 5000;   // nur für Test alle 5 sek.
   Timer1->Enabled = false;
      // deine Routine
   Timer1->Enabled = true;
}
//---------------------------------------------------------------------------

Haste das mit drin?

MfG
kpeter