'' is not a valid floating value

2005-05-18T08:17:21+02:00

Rejestracja: dni
Ostatnio: dni

witam! moze to bedzie smieszne pytanie dla niektorych, ja jednak mam z tym dosc duzy problem=/ przeszukalem forum, jesli gdzies byl o tym temat to sor ze powtarzam - mozliwe ze przeoczylem.

Moj problem polega na tym, ze jesli uzytkownik zostawi puste pola edit i wcisnie przycisk, ktory jest odpowiedzialny za pewne obliczenia i ma pobierac dane wlasnie z tych pol edit, to wyskakuje blad '' is not a valid floating value ;/ Wie ktos moze jak temu zaradzic? prosze o wyrozumialosc, ale jestem poczatkujacy:) pozdrawiam i z gory dziekuje za wszelka pomoc!

berl

2005-05-18T08:18:00+02:00

Rejestracja: dni
Ostatnio: dni

w procedurze obsługi przycisku :
if Edit1.Text = '' then Exit;
:).

2005-05-18T08:24:57+02:00

Rejestracja: dni
Ostatnio: dni

dziekuje bardzo:)

Szymek

2005-05-18T16:10:04+02:00

Rejestracja: dni
Ostatnio: dni

Zawsze możesz użyć

Kopiuj

Try

Except

End;

przy konwertowaniu tekstu na liczbę. Wtedy jak ktoś wpisze coś innego, możesz wyświetlić stosowny komunikat.

2005-05-18T17:38:32+02:00

Rejestracja: dni
Ostatnio: dni

W pustych Editach można z góry w kodzie podać 0 (zero) w zakładce Properties.
To nie będzie już błędu takiego :) Można jeszcze blokowac button od obliczeń jeśli nie ma nic w Editach itd.

hes

2005-05-18T17:42:39+02:00

Rejestracja: dni
Ostatnio: dni

Kopiuj

var 
  kod: Integer;
  liczba: Double;
begin
  Val(Edit.Text,liczba,kod); // Konwersja tekstu na liczbę
  if kod<>0 then begin // Nieliczba
    Application.MessageBox('To nie jest liczba','Błąd',MB_OK); // komunikat o błędzie
    Exit;
  end;
  wykonaj_obliczenia;
end;

hermanaw

2013-01-01T10:37:06+01:00

Rejestracja: dni
Ostatnio: dni
Postów: 12

Także mam problem z tym komunikatem, może ktoś powie mi co mogę na to poradzić...;) Wpisuje w okienko Edit liczbę >1000 i wyskakuje error " '1 000,00' is not a valid floating point value".

Według mnie problem leży przy przypisaniu wartości do zmiennej oczywiście zmienna typu REAL.

Kopiuj

Stawka1 := StrToFloat(Edit1.text);

Ma ktoś pomysł co na to poradzić? Co robię źle?

Patryk27

2013-01-01T10:49:57+01:00

Rejestracja: dni
Ostatnio: dni
Lokalizacja: Wrocław
Postów: 13042

Spróbuj ustawić DecimalSeparator (bądź bodajże DefaultFormatSettings.DecimalSeparator jakby się czepiało, że jest deprecated) na ., ciężko coś więcej powiedzieć.
Najlepiej załóż nowy temat i opisz dokładniej swój problem.