Kako da uradim...

[ MASSK @ 12.03.2006. 09:24 ] @

Zdravo decki moze neko ce moze mi pomoci, ja sam nov u programiranje/delphi
Ovako...prije malo sam zavrshio tutorial "hello world" i sada sam poce da gradim novi program u delphi... evo koda programa no sam zaglavio sada i ne znam kako da to koregisahm...

KOD:

unit Unit1;

interface

uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls;

type
TForm1 = class(TForm)
Button1: TButton;
Edit1: TEdit;
procedure Button1Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;

var
Form1: TForm1;
myint : integer;
implementation

{$R *.dfm}

procedure TForm1.Button1Click(Sender: TObject);
begin
myint := 20;
myint := myint + 10;
myint := myint - 5;
myint := myint * 4;
myint := myint div 2;
Edit1.text := myint; // ovde mi ukazuje deka ima greski (pa sto da napravim koga ja ocu kad kliknu TButon da krajni rezultat od myint se pojavi u TEdit-box?!?
end;

end.

_{[Ovu poruku je menjao MASSK dana 12.03.2006. u 10:31 GMT+1]}

[ Nemanja Avramović @ 12.03.2006. 09:53 ] @

Kako mozes broj da upises u tekst??? Moras prvo da ga konvertujes u string:

Code:
Edit1.text := myint;

zameni sa

Code:
Edit1.text := inttostr(myint);