polling betrieb?

blitzgeist

Hi RandomAccess85,

über Application->ProcessMessages() wird somit gewährleistet, dass ich noch meine GUI bedienen kann und jetzt deine eingeführte bool var active wieder auf false setzten kann. Aber was ist mit der Aussage von Joe_M

ProcessMessages() einbauen. Dies sorgt dafür, dass die Nachrichtenwarteschlange des Programms weiter abgearbeitet wird und das Programm bleibt weiterhin bedienbar. Je nachdem aber nur sehr schleppend...

Geht das mittels eines Timers schneller, besser? Am besten mal beide Varianten ausprobieren...
Oder wie seht ihr das?

lg,
blitzgeist

Hallo,

ja ich würd auch sagen, dass du an deine Routine angepasst einfach mal beide Varianten untersuchst und dann für dich entscheidest was schneller geht bzw. die bessere Performance liefert

mfg, Micha!

Nun ja, es gäbe ja auch noch die Möglichkeit, das in einen eigenen Thread auszulagern...
Es ist aber nicht möglich, Dir einen Weg zu empfehlen, so lange wir nicht wissen, was genau da passieren soll.

blitzgeist

also habe das jetzt so

void __fastcall TForm1::CheckBox1Click(TObject *Sender)
{
if(CheckBox1->Checked){
    dMess = 1;
    Counter(Memo1, dMess);
    }
else{
    dMess = 0;
    Counter(Memo1, dMess);
    }
}

double reg = 0;
void Counter(TMemo *Memo1, int dMess){

AnsiString Ausgabe;

while(dMess){
    reg++;
    Ausgabe += reg;
    Memo1->Clear();
    Memo1->Lines->Add(Ausgabe);
    Application->ProcessMessages();
    };
}

Sobald ich die CheckBox abhake, läft die ganze Sache los, kann auch meine GUI "bedienen", d.h. ich hacke die CheckBox wieder ab, Häkchen verschwindet, aber im Memofenster rasseln als noch die Zahlen herunter. Ich dachte jetzt nach dem Abhaken würde auch das Zählen aufhören, weil die while schleife false ist. Dem ist aber nicht so. Wieso?

Das liegt daran, dass Du in der Funktion Counter eine lokale Kopie der globalen Variable dMess übergibst. Diese lokale Kopie wird niemals 0, also stoppt die Schleife auch nie.

blitzgeist

...also pointer

Hä? Nö.

blitzgeist

Dachte über nen pointer aud dMess könnte ich es lösen. Wieso nicht?

blitzgeist

ich habs nun...

Du hast eine globale Variable dMess. Aber in der Funktion Counter verwendest Du eine nur in dieser Funktion bekannte Variable gleichen Namens. Lass das dMess einfach komplett aus den Funktionsparametern raus. Und wenn Du Counter zu einer Memberfunktion von TForm1 machst, brauchst Du auch das Memo nicht zu übergeben.
Und wenn Du dann noch alle globalen Variablen zu privaten Membervariablen des Forms machst, kommt langsam Land in Sicht...

blitzgeist

Hallo Joe_M,

danke für deine Tipps. Eigendlich habe ich schon meine Funktion wie ich so gerne haben möchte mit ProcessMessages(). Nur eines verstehe ich noch nicht. Im Memofenster läuft schön meine Variable hoch und wenn ich die CheckBox wieder abhake bleibt sie stehen. Wärend des zählens kann ich auch alle anderen Funktionen bediene, nur nicht mein Butto beenden der die Funktion Close(); aufruft. Jedoch klicke ich auf den Button beenden wärend des Zählens und ich dann die CheckBox wieder abhake (also Haken weg), dann erst wird der Button beenden bedient und die GUI schließt sich.
Die Priorität der Funktion Close() scheint sehr niedrig zu sein. Wie kann ich das ändern, dass mein Button beenden auch wärend des Zählens bedient wird und die GUI sich schließ?

akari

Hallo

Genau deshalb wurde dir zu TTimer/TThread geraten.

bis bald
akari