max. wert von editboxen

[DeddyH]

Das ist doch vollkommen unerheblich, solange das eine Methode (genauer: TNotifyEvent) ist, d.h. es muss eine Methode Deines Formulars sein und einen Parameter vom Typ TObject erwarten.

[edit] Lies noch einmal, was ich hier geschrieben hatte. [/edit]

[Noedel]

kurz gesagt, der name ist egal, nur nicht vergessen, sonst musst du immer wieder nachgucken

[Edit] Naja nicht ganz egal! Es dürfen nur buchstaben des eng. alphabets benutzt werden und namen die delphi schon in beschlag hat ("and","tag" usw...) nicht
Das wars auch schon an Regelungen [/Edit]

Zitat von AlexanderBrade:

Delphi-Quellcode:

procedure Pruefung (Sender: TObject); // HAB ICH MAL SO GENANNT, WEIL DAS JA SCHON SCHWER ZU SEIN SCHEINT, EINEN NAMEN ZU FINDEN :D
begin
if Sender is Tedit then
  begin
    if TEdit(Sender).Text<0{???} or TEdit(Sender)>15 then  //HIER FEHLT NOCH DAS "TEXT" =>Tedit(Sender).text
        begin
        Tedit(Sender).Color:=clred;
end;
end;

[DeddyH]

Noedel, das ist keine Methode

[AlexanderBrade]

das mit dem Tedit(Sender).text klappt nicht! Ich will ja keine Strings sondern Zahlen vergleichen!
-->Irgendwie muss ich die Strings noch umwandeln...

[DeddyH]

Nochmal: lesen

[AlexanderBrade]

Aber wo schreibe ich das trystrtoint denn hin?

[DeddyH]

Wirf doch mal einen Blick in die Hilfe zu TryStrToInt. Ich helfe ja gerne, aber Denken musst Du schon selbst, das kann ich Dir nicht abnehmen.

[AlexanderBrade]

Das nutzt mir doch garnichts, ich will doch nicht wissen, ob die Eingabe einer Zahl entsprciht, sondern will festlegen, dass man minimal 0 bzw. maximal 15 als Werte eingeben kann! Wie kann ich denn strtoint für "Sender"/dieses allgemeine Prozedur festlegen?
strtoint(TEdit(Sender).text)<0 funktioniert nicht!

[DeddyH]

Doch, genauso, nur eben nicht nur mit StrToInt, sondern mit TryStrToInt prüfen, ob es sich überhaupt um eine Zahl handelt.

[AlexanderBrade]

Dabei fehlen ihm aber immer Parameter!Auch die Hilfe bringt mich da nicht weiter!