|
 | | |
| Autor | Správa |
|---|
Gumeny
Užívateľ
Založený: 04.04.2010
Príspevky: 38
 |  Zaslal: So 04.06.11 17:38 |   |
Čaute,
som pomerne začínajúci programátor a chcem sa spýtať, ako mám zapísat podmienku, že keď je Edit okno prázdne? Napr. mám program, kde do Editu (Edit1.Text) sa zapíše hodnota premennej a potom sa odtiaľ načíta, ale Delphi hadže chybu, ak chcem odtiaľ premennú načítať, ale okno je prázdne alebo tam je namiesto čísla text. Chcem, aby v takomto prípade namiesto pádu programu vypísalo Delphi nejakú správu a aby program hneď nepadol.
Ďakujem |
| |
  |
|
coldak
Skúsený užívateľ
Založený: 29.10.2008
Príspevky: 936
| | Zaslal: So 04.06.11 18:48 | |
vloz cas kodu ktora sa vykonava ked ti to pada |
| |
|
|
Gumeny
Užívateľ
Založený: 04.04.2010
Príspevky: 38
| | Zaslal: So 04.06.11 21:36 | |
procedure TForm1.Button1Click(Sender: TObject);
begin
A:=StrToFloat(Edit1.Text);
B:=StrToFloat(Edit2.Text);
X:=A*B;
Label3.Caption:=FloatToStr(X);
end;
S tým, že v tých Edit1 a Edit2 nie je nič napísané. Keď tam zadám normálne čísla, tak to funguje, ako má. |
| |
|
|
coldak
Skúsený užívateľ
Založený: 29.10.2008
Príspevky: 936
|
jednoduchsie by bolo odchytavat exception EConvertError
| kód: |
try
A:=StrToFloat(Edit1.Text);
B:=StrToFloat(Edit2.Text);
X:=A*B;
Label3.Caption:=FloatToStr(X);
except
on E : EConvertError do
end;
|
|
| |
|
|
|
Nemôžete pridávať nové témy do tohto fóra.
Nemôžete odpovedať na témy v tomto fóre.
Nemôžete upravovať svoje príspevky v tomto fóre.
Nemôžete mazať svoje príspevky v tomto fóre.
Nemôžete hlasovať v tomto fóre.
|
| |
