Názory ke článku Delphi II - 3. lekce
function TForm1.secti(a: integer; b: integer): integer; //vlastní funkce, kterou jsme si sami vytvořili a nadeklarovali
var vysledek: integer;
begin
vysledek:=a+b; //tohle asi ani komentář nepotřebuje
result:=vysledek;
end;
lze napsat cistym zpusobem a to
function TForm1.secti(a: integer; b: integer): integer; //vlastní funkce
begin
result := a + b;
end;
dalsi moznost je
function TForm1.secti(a: integer; b: integer): integer; //vlastní funkce
begin
secti := a + b;
end;
Pote nesouhlasim s timto:
procedure zobrazokno(vysledek: real); overload;
begin
ShowMessage(\"Minulý výsledek: \"+FloatToStr(predchozi)+#13+\"Výsledek: \"+FloatToStr(vysledek)); //zobrazí v dialogu předchozí a aktuální výsledek
end;
Jak vas mohlo napadnout psat \" ?
procedure zobrazokno(vysledek: real); overload;
begin
ShowMessage('Minulý výsledek: '+FloatToStr(predchozi)+#13+#10+'Výsledek: '+FloatToStr(vysledek)); //zobrazí v dialogu předchozí a aktuální výsledek
end;
Misto \" se pouziva standardne '
#13+#10 jsem zapsal z toho duvodu, protoze se jedna o CRLF (Clear + LineFeed), coz je rovnez standardni zpusob "odentrovani" v systemech MS Win, DOS, OS/2 a podobnych...
Když jsem článek psal, tak sem znak \ nepoužíval! Chyba se musela stát během korektury nebo při vydávání článku (omlouvám se, asi je to trochu imoje chyba, že sem si ho po vydání nepřečetl).
Ještě dodatek:
1) místo \ v předchozím příspěvku má být \"
2) tuto chybu sem již odstranil....děkuji za upozornění
Daniel
podla, mna je sposob vysvetlovania velmi dobry,,,,,
mas moju podporu
Již dlouhou dobu je údajně článek napsaný, ale zatím se žádný korektor nemá k tomu, aby jej opravil. Čím to? To jsou korektoři tak líní nebo jejich počet klesl, cž znamená úpad Programujte? Jedou větou : Už kua chci další díl ;).
23. 6. 2007
nenapsal by jste mi někdo tu jak deklarovat funkce pro tu kalkulačku? nemůžu prostě mi to nejde. =(
29. 12. 2007
To --==[FReeZ]==--:
Ohledně CRLF. CR znamená Carriage Return neboli podle jedné páčky na psacím stroji, kterou se vracela psací hlava na začátek řádky. Zároveň se touto páčkou posunul papír otočením válce na další řádku neboli se tímto současně provedla funkce LF (line feed).
Takže CR neznamená Clear!
Někdy je lepší si ověřit fakta, než střílet od pasu.
16. 4. 2010
Nevěděl by si někdo rady s tímhle zadáním...??? =o(
SESTAVTE PROCEDURU PRO NALEZENI DVOU NEJVETSICH CISEL Z DANE MNOZINY N CISEL A POUZIJTE JI PRO RESENI TETO ULOHY: JE DANO N CISEL. NAJDETE DVE NEJVETSI Z NICH A ZE ZBYVAJICICH CISEL OPET DVE NEJVETSI.