jak zrobic aby nie dodalo =P

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 ' '

o co ci chodzi

wypróbuj inttostr(Btn)+'+'+inttostr(img)

ehh wiem torche to pogmatwalem =P

A wiec od poczatku =P

Mam powiedziane ze

Button := 4;

Img := 16;

i chce aby to "sie wpisalo" tak:

MessageBox(0,Uwaga!, program wykonal BLAD! , 4 + 16;

I nie mam pojecia jak to zrobic =P

Ale aby bylo same 4 + 16 a nie '4 + 16'
Innymi slowy chce aby to bylo "integer"

Robilem to tak:

Edit3.Text := inttostr(Button + Img) ;
MessageBox(0,Uwaga!, program wykonal BLAD! , strtoint(Edit3.text));

Ale zamiast 4 + 16 wpisywalo 20 =P

Robilem to tak:

MessageBox(0,Uwaga!, program wykonal BLAD! , inttostr(Button) + inttostr(Img); ale wtedy nie chialo kompilowac =P

Hakger:

zrobilem tak
[code]
MessageBox(0, 'zzzz','zzz', inttostr(Button)+'+'+inttostr(Img) ;

[/code]

Ale pisze error
[Error] Unit9.pas(166): Incompatible types: 'Cardinal' and 'String'

Dzieje się tak ponieważ ostatni parametr to flagi, a to moje umieszcac w drugim parametrze

Rozumiem =]

Ale po compilacji wyskakuje cos takiego:

'4 + 16' is not valid value =[

MessageBox(0, 'zzzz: inttostr(Button)+'+'+inttostr(Img)','zzz',MB_OK ) ; i powinno być gut, poza tym co robisz z '4+16'?

hehehe zle mnie zrozumiales =]

Button i Img to nie "tresc wiadomosci" tylko cyfry odpowiadajace MB_OK MB_YESNO MB_ICONERROR =]]]

One musza byc na koncu =]
i dlatego NIE moga miec ' ' =P

to zamiast + daj [b]or[/b] i bedzie jak być powinno

Zrobilem tak:

Edit3.Text := inttostr(Button or Img);
I wszystko jest OK!!
THX wielkie =]]