Цитата:
|
Сообщение от Alegun
заVARите нужные значения в объявлении функции.
|
Можно поинтересоваться когда ставят Var а когда Const а когда вообще ничего не ставят
Код:
Function ShowStateDialog1(Var TextForm,LBL1:String):String;
begin
Form3.Label1.Caption:=LBL1;
Form3.Button1.ModalResult:=mrOk;
Form3.Button2.ModalResult:=mrCancel;
If Form3.ShowModal=mrOk then
Result:=Form3.Edit1.Text
else Result:='';
end;