jedlikp

Innen letoltheto

http://www.szoftverbazis.hu/szoftver/windows-xp-service-pack-1--magyar--OB6.html

Hello

ha a maximalis szamhoz ami (32 bit) integernel   32767, hozza adsz +1 akkor

tulcsordul es maxilmalis  negativ szam jon ki  ami -32768.

 

Ez alap beilittasnal nem okoz futasi hibat;

 

Be lehet allitani hogy okkozzon:

 

deplhi 10-re

Project -> Options -> DElphi Compiler -> Compiling -> Runtime errors -> Overflow Checking    -> true;

oregeb delphire   Project -> Options -> Compiler ->  Overflow Checking

 

Ebben az estben futas kozben hibakiiras jon letre.

 

Ha a programba akarja kezelni akkor jo a

try
a:=b+c;
except
//hiba eseten ide kerul a vezerles
end

Sziasztok! Turbo Delphiben szeretnék, egy oylan programot csinálni, ami hatványozásra alkalmas, csak elakadtam a for ciklusnál! Változoknak alap, hatvany, kitevo, i-et vetem fel! Valaki segítsen please! Köszi

function hatvany(in:real;n:integer):real;
var j:integer;
      f:real;
begin
f:=1;
for j:=1 to n do f:=f*in;
result := f; 
end

Hello,

a kovetkezo pelda mukodik, kiprobaltam.

a Shellexecute inditja a  "shutdown /r " system parancsot.

PC kb 1perc mulva ujrainditodik.

 

Termeszetesen igy lehet barmiit is indittani.

uses ShellAPI;

procedure TForm1.Button1Click(Sender: TObject);
begin
ShellExecute(0, 'open', PChar('shutdown'), PChar(' /r'), nil, SW_SHOW);
end;