Matematické Fórum

Archiv diskusního fóra o matematice, 2006–2026

Toto je archiv Matematického Fóra. Fórum je dostupné jen ke čtení. Můžete se ale zaregistrovat na náš Discord server.

#26 10. 04. 2008 22:10

Ginco
Místo: Aš
Příspěvky: 617
Reputace:   0 
 

Re: Delphi - Kalkulačka

↑↑ Saturday:

jo je to možné, ale nevyhnu se zařvání programu, tudíž vyhození z kalkulačky, což se uživateli líbit nebude

každopádně zkusím

Offline

 

#27 10. 04. 2008 22:16

Saturday
Einstein
Příspěvky: 813
Škola: MFF UK
Reputace:   3 
Web
 

Re: Delphi - Kalkulačka

if (strtofloat(Form1.Edit2.Text)=0) then

label.caption="Nulou nepodelis.. 11. bozi prikazani";   

else

Form1.Edit3.Text := floattostr(strtofloat(Form1.Edit1.Text) / strtofloat(Form1.Edit2.Text));

end if;


A PROC NE TEDY TREBA TAKHLE? pokud nemas rad messagebox


Lasciate ogni speranza. | Podílí se na Encyklopedii Fyziky (http://fyzika.jreichl.com) | Oblíbený IT projekt http://online-domain-tools.com

Offline

 

#28 10. 04. 2008 22:25 — Editoval Ginco (10. 04. 2008 22:26)

Ginco
Místo: Aš
Příspěvky: 617
Reputace:   0 
 

Re: Delphi - Kalkulačka

↑ Saturday:

sorry, špatně jsi to pochopil( spíš jsem to špatně napsal)
psal jsi, že řešit přes výjimky to lze, a na to jsem napsal to co je v mém minulém příspěvku

to nebylo nic proti tvému příspěvku, ba naopak!!!!
ten tvůj kod funguje a navíc mě to nevyhodí

jo a je tam pěknej poděl : v řádku, který je před else se nepíše středník, což mi chvilku trvalo než jsem na to přišel..
jinak dík a snad se nezlobíš, protože jsem rád za každou radu!

Offline

 

#29 10. 04. 2008 22:28

Saturday
Einstein
Příspěvky: 813
Škola: MFF UK
Reputace:   3 
Web
 

Re: Delphi - Kalkulačka

2Ginco: nemam duvod :-), jen se trochu obavam, ze toto jsou zaklady a mel bys je znat pred programovanim neceho podobneho (to neni obvinovani, jen povzdech, pripomnelo mi to vyuku na stredni, kam jsem chodil.. ;-) )


Lasciate ogni speranza. | Podílí se na Encyklopedii Fyziky (http://fyzika.jreichl.com) | Oblíbený IT projekt http://online-domain-tools.com

Offline

 

#30 10. 04. 2008 22:34

plisna
Místo: Brno
Příspěvky: 1503
Reputace:   5 
 

Re: Delphi - Kalkulačka

to ginco: ten kurzor dostanes do editboxu hned po spusteni pomoci Edit1.SetFocus; umisteneho do vhodne udalosti formulare, napr OnCreate

Offline

 

#31 10. 04. 2008 22:34

Ginco
Místo: Aš
Příspěvky: 617
Reputace:   0 
 

Re: Delphi - Kalkulačka

↑ Saturday:

abych pravdu řekl, tak jsme to brali v prváku a byla to katastrofa, proto jsem si to vybral jako práci, abych si to oživil

Offline

 

#32 10. 04. 2008 22:57 — Editoval Ginco (10. 04. 2008 23:01)

Ginco
Místo: Aš
Příspěvky: 617
Reputace:   0 
 

Re: Delphi - Kalkulačka

↑ plisna:

no to jsem potřeboval, akorát mi to hlásí chybu : cannot focus a disabled or invisible window;
to znamená, že když mám někde v kodu nastaveno, že mám někde nastaveno edit1 jako visible nebo enabled ? , ale o tom nevim

Offline

 

#33 11. 04. 2008 17:36

plisna
Místo: Brno
Příspěvky: 1503
Reputace:   5 
 

Re: Delphi - Kalkulačka

to ginco: ano, moje chyba - nelibi se mu, ze davas fokus komponente v dobe, kdy se teprve vytvari formular, proto presun radek Edit.SetFocus do metody OnShow formulare Form

Offline

 

Archiv Matematického Fóra · stav k 30. 8. 2026 · 633 258 příspěvků v 108 818 tématech