Registriert seit: 3. Jan 2007
Ort: Dresden
3.443 Beiträge
Delphi 7 Enterprise
|
Re: Externes Programm starten
2. Feb 2007, 11:17
So funktioniert die Schleife nicht.
Du brauchst zwei Variablen. Die eine speichert den Maximalwert, die andere speichert wo er aufgetreten ist. Dann gehst du alle einzeln durch nimmst tryStrtofloat. Möglichst nie try-Except-block innerhalb einer Schleife! --> Verzögert das Programm nur unnötig. Auuserdem würde er dann bei mir immer die Messagebox liefern, da ich noch AddIns installiert habe die z.B. unter "\Software\Microsoft\Office\Word\Addins\..." liegen.
Das Ergebnis von trystrtofloat vergleichst du mit dem Maximalwert (der zu Beginn der Funktion auf 0 gesetzt wird) und wenn er größer ist, mekrst du dir den neuen maximalwert und dessen Position.
Und wo ist deine Parameterübergabe:
function xyz(parameter:string):string;
Dieser Beitrag ist für Jugendliche unter 18 Jahren nicht geeignet.
|