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]
massk