كيفية المقارنة بين محتويات edit

[bassem_43]

السلام عليكم
جرب هدا

PHP كود :

procedure TForm1.btn1Click(Sender: TObject);
begin
    try
  if(Edt2.Text='m')  then
   Edt3.Text:='صحيحة'
 else
 if(strtofloat(Edt2.Text)<=(strtofloat(Edt1.Text)))  then
  begin
   Edt3.Text:='صحيحة'  ;
  end
  else begin
   Edt3.Text:='غير صحيحة'  ;
 end;

 except
 ShowMessage('error');
end;
end;