Zrobilem cos takiego:
var
Img, Button : integer ;
Begin
...
Button := 4;
...
Img := 16;
Edit3.Text := inttostr(Button + Img) ;
MessageBox(0,Uwaga!, Program wykonal BLAD! , strtoint(Edit3.text)) ;
end;
i wszystko bylo by dobrze gdyby nie to ze:
inttostr(Button + Img) ; zamiast zrobic 4 + 16 i to wpisac w strtoint(Edit3.text)).. .
to robi 20 i wpisuje to w strtoint(Edit3.text)) =[[
a musi byc:
MessageBox(0,Uwaga!, Program wykonal BLAD!, 4 + 16;
a nie:
MessageBox(0,Uwaga!, Program wykonal BLAD!,20 ;
Probowalem dac Pchar ale wtedy wychodzi cos takiego:
MessageBox(0,Uwaga!, Program wykonal BLAD!!,'4 + 16' ;
A nie moze byc znaczkow ' '