Pole Trójkąta

Mam takie pytanie, moze jest banalne (jest) ale ja dopiero zaczynam...:)

procedure TForm1.Button1Click(Sender: TObject);
var
X, Y, Z : Currency;
begin
X:= StrToCurr(liczba1.Text);
Y:= StrToCurr(liczba2.Text);
Z:= 0.5*Y*X ;
label1.caption := CurrToStr(Z);
end;

To jest kod na obliczenie pola trójkąta [green] , ale gdy klikam na button nic nie wpisując to wyskakuje błąd. Z góry dzięki :) Aha napiszcie od razu jakie polecacie kursy delphi i jak się najlepiej uczyć.

Zamiast StrToCurr użyj StrToFloat. Skąd ci się to StrToCurr wzięło? Z kursów najlepszy jest ten dostępny pod F1.

trudno, żeby nie było błedu, jeżeli pola typu edit są puste....

procedure TForm1.Button1Click(Sender: TObject);
var
X, Y, Z : Currency;
begin
if (liczba1.text<>'') and (liczba2.text<>'') then //sprawdź czy wpisano coś w pola typu edit
 begin
  X:= StrToCurr(liczba1.Text);
  Y:= StrToCurr(liczba2.Text);
  Z:= 0.5*Y*X ;
  label1.caption := CurrToStr(Z);
 end
else
 label1.caption:='Nie podano wymaganych wartości";
end;

a kursu szukaj na tej stronie...

// czemu używacie code a nie delphi [???] - deti

Dzięki !

PS. Będę od teraz używał delphi :)