Delphiproblem - Taschenrechner brauche hilfe !

[himitsu]

Zitat von -Ptype-:

und nur das dus weißt das ist bei mir für die schule und wir haben mit dem thema erst grade angefangen

Hab ich mir fast schon gedacht, aber dennoch weiß man jetzt immernoch nicht, wie die Aufgabenstellung heißt
oder ob es wirklich bedeutet "dem Lehrer isses egal, Hauptsache kein Power".

PS: Das IntPower in der gezeigten Funktion kann man weglassen, da es "nur" eine Optimierung der letzen Zeile darstellt.

Zitat:

Falls du es noch nicht gelesen hast hab ich darauf bereits eine antwort bekommen

Nach dem Absenden hatte ich es dann gesehn ... manchmal vergißt die DP einem zu sagen, daß es schon eine Antwort gibt.

@user0815: Das läßt sich auch noch etwas kürzen.

Delphi-Quellcode:

procedure TForm1.Edit1Change(Sender: TObject);
begin
  Button1.Enabled := Pos(DecimalSeparator, Edit1.Text) = 0;
  // bzw. Button1.Enabled := Pos(',', Edit1.Text) = 0;
end;

Zitat von -Ptype-:

aber was hat das >0 am ende zu bedeuten :S

Rate mal (oder schau in die OH), was AnsiPos oder einfach nur Pos für ein Ergebnis liefert und was >0 damit macht.

Ergebnis=0 ... nicht gefunden
Ergebnis>0 ... gefunden

Ergebnis = Position des Suchwortes

[edit] OK, jetzt wurde mal der Post von Noedel angezeigt, aber ich sende es dennoch ab.