![]() |
Re: TRadioButton zur Laufzeit ändern
Hmmmm...nun ja ich hab grad mal geknobbelt
Stimmt nicht mehr: Das Lustige ist bei mir funkts nur bei der 2 Seite nicht da wird aus der Zeit dummerweise 0% Wenn ich in MouseLeave die Prozent Procedure auskomentiere gehts... Aber dummerweise steht ja nichts in der Prozent Procedure ja nichts mit Zeit ändern... Wenn ich aber in Prozent Procedure als Test Zeit auf deinen "Reset" Wert setez gehts auch wieder.... Sehr merkwürdig Das komsiche ist ich hab keine Ahnung warum :gruebel: :gruebel: :gruebel: :gruebel: :gruebel: Funkten tuts auch wenn du MouseMove bei jeder Komponente machst...wenn dan aber auf den Captionbereich des Fensters gehts gehts wieder net mehr.... :gruebel: :gruebel: Also ich bin echt überfordert :roll: :roll: Vll. konnte ich dir auch ein bischen helfen wo der Fehler liegt... Tut mir leid echt wollte helfen bin es mehre mal durchgegangen, eigentlich darf er das garnet ändern :wall: :wall: EDIT: Ich hab dein Fehler gefunden :mrgreen: :mrgreen:
Delphi-Quellcode:
Ich hoffe es war diese Fehler..
Procedure TForm1.Prozent(Maximum: Int64);
Var I,J : Integer; Begin If (Maximum=0) Or (Threads>0) Then Exit; For I:=00 To 07 Do Begin If Benutzer.Count>(Anzeige + I) Then Begin J:=100 * Laenge[Anzeige + I] Div Maximum; If J>999 Then Prozente[I].Caption:='>999%' // du hattest hier Anzeige + 1 so und dein Array von Labels ändert sich doch net xD bei +10 hattest du 11 das konnte er net finden und hatt anscheinend das label von der Zeit genohmen Else Prozente[I].Caption:=FormatFloat('0,',J)+'%'; //hier genauso End; End; End; Mir ist noch aufgefallen, dass du keine 10 Labels mit der Größe deines Fenster zur Zeit hinbekommst..zumindest bei meiner Auflösung..Bei mir waren es nur 8, das heist du musst deine Berechnungen einwenig anpassen xD Viel Spass beim weiter machen Gruß NickelM |
Re: TRadioButton zur Laufzeit ändern
Zitat:
Ehrlich gesagt hätte ich aber erwartet, dass spätestens der Compiler eine Bereichsüberschreitung meldet. Ist ja immerhin kein offenes Array. Mir ist klar, dass man nicht mit der Methode trial and error programmieren sollte. Aber (1) irren ist menschlich, (2) schreibe ich meistens nachts und (3) wäre es mir bei einer Fehlermeldung eher aufgefallen. Könntest Di mir bitte wegen der Anzahl der Labels bei Deiner Auflösung mal einen Screenshot per PM zuschicken. Das Programm ist eigentlich nur für mein Büro gedacht. Hier sind wir 6 Leute. Theoretisch komme ich nicht auf die 2., 3. etc. Seite. Ich finde es nur gemein, dass Olympus ein teures Diktiersystem verkauft und die Software keine statistischen Auswertungen möglich macht. Also mache ich es selber. Evtl. packe ich es aber auf meine Homepage für andere "Olympus-Geschädigte". Falls ich das kann, würde ich es dann anpassen. Gruß und nochmals Danke auch für's Testen, Alex |
Alle Zeitangaben in WEZ +1. Es ist jetzt 02:20 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 by Thomas Breitkreuz