Archív konference Delphi
Zpět na výběr roku archívu nebo přejít na fulltextové vyhledávání v konferenci.
Spusteni aplikace pro guesta (FireBird)
[*] BS Info <info(zv)borkovec(tec)com> - 21.4.2004 08:06:24
Dobre jitro,
mam jeden drobny pozadavek od klienta a nejsem si jist, jestli je to
jednoduse realizovatelne:
aplikace C/S s Firebirdem (1.0), instalovana na WinXPHome spravcovskym
uctem, provozovana
uctem guest. Hlasi to, ze IBGuard not found. Firebird je instalovan
spolu s aplikaci (Innosetup), tedy spravcovskym
uctem. Existuje nejaky postup, jak klientovi umoznit spusteni aplikace
pod guestem? Snad jsem se vyjadril presne - jeste jsem po ranu trochu
jinde:-)
Roman
normalizace databazi adresare
[*] Karel Rys <delphi(zv)zas-me(tec)cz> - 21.4.2004 07:40:21
Ludek ZITA dne 21 Apr 2004 v 2:48:
> No a jeste jeden - tvrde normalizovat a archivovat "tiskovy" tvar
> dokumentu mimo provozni databazi (TXT,XML,HTML,PDF,bitmapa...). Zatim
> to neni bezne ale myslim, ze to ma velkou budoucnost, protoze pak je
> mozne takovehle dokumenty "kolkovat" casovym razitkem a uplne tim
> nahradit papirove dokumenty. (v Evrope to uz jde , v nasi drahe
> socialisticko-krestanske-us vlasti jen teoreticky)
Nebrecte, i u nas jsou financni urady ochotny prijmout doklady v PDF. Dle slov zakaznika na
blyskajici se CD sice urednice-skoro_duchodkyne vytrestily oci a poprosily, zda by jeste mohly
dostat doklady ke kontrole DPH i v papirove forme, ale pristi mesic jiz pry pujde bez problemu i
CD...
Jinak k puvodnimu dotazu: u dokladu ukladam jak odkaz do tabulky odberatelu (pro dlouhodobe
statistiky), tak textove vsechny udaje z adresy, ICO a DIC. Tech par tisic dokladu za rok
nezpusobi takovy narust databaze, abych riskoval problemy (napr. i zmena formatu DIC tak nyni
neovlivni stare doklady apod.).
Karel Rys
Precenovani ve skladovem systemu
[*] Robert <rpvp(zv)vagnerplast(tec)cz> - 21.4.2004 07:30:20
A co pripad, kdy dostanete jen dodak s kusy a mozna i pribliznou cenou.
Potrebujete to prijmout na sklad a prodavat ci jinak dale zpracovat.
Fakturu s konecnou a spravnou cenou dostanete napr. az za 14 dni
to u zahranicnich firem neni nic neobvykleho.
Ja to mam takto:
Krome skladovych karet mam i "cenik prumernych nakupnich cen"
pro kazdy mesic. V tom ceniku ma kazda skladova karta svou
prumernou cenu za mesic a halerovy rozdil po zaokrouhleni minuleho
vypoctu prumeru.
Pred kazdou mesicni uzaverkou se spocita vahovy prumer
prum.cena z minuleho mesice + cena celkem z polozek prijemek +
zaokrouhlovaci rozdily (setinky) z minuleho mesice
------------------------------------------------------------------------
-----------------------
stav na karte minuleho mesice + obrat v novem mesici
cau
Robert
-----Original Message-----
From: delphi-l-owner(zv)clexpert(tec)cz [mailto:delphi-l-owner(zv)clexpert(tec)cz] On
Behalf Of Martin Burle
Sent: Tuesday, April 20, 2004 10:34 PM
To: delphi-l(zv)clexpert(tec)cz
Subject: Re: Precenovani ve skladovem systemu
> Tanto druh problemu resim zasadne takto:
> V editacnim formulari, ktery je zcela odpojen od "zivych" dat, necham
> uzivatele klofat jak je mu libo. Pak udelam kontroly, ktere databaze
> nezvladne nebo je vyhodnejsi udelat je na klientovi.
> Pak poslu celou davku ulozene procedure, ktera se postara o zbytek - a
v
> pripade problemu akci stornuje a vrati chybu.
Souhlas, nicmene otazka se tykala spise metodiky precenovani ve skladu
- jak nalozit se zprumerovanou cenou pri chybe nikoli databaze, ale
chybe obsluhy pri zapisovani prijmu...
MB
TDBLookupComboBox
[*] Lebeda David <david.lebeda(zv)comarr(tec)cz> - 21.4.2004 07:02:15
> Mam TDBLookupComboBox ktery zobrazuje data z tabulky, je tam asi 700
> zaznamu a zobrazuje ctyrmistny kod. Pokud rozbalim ten combobox a
> zacnu psat na klavesnici ten kod, tak mi, pokud tam je, skoci kurzor
> na vybrany zaznam. To je super. Ale nefunguje to uplne, nektere
> zaznamy to proste takto nenajde a nenajde a je treba je v tom
> comboboxu najit rucne, coz je prinejmensim uzivatelsky neprijemne. Jak
> to, ze to najde jen nektere, kdyz to zobrazi vsechny a spravne?
Ahoj,
Problem, ktery popisujes je divny a i s ohledem na problem okolo joinu reseny v jinem
mailu bych rekl, ze to chovani je divne a tezko vysvetlitelne. Asi bych zkusil overit:
1) Indexy na tabulkach. Pripadne nejakym reparacnim nastrojem zkusit tabulky projet a
opravit - treba jsou trochu naborene.
2) Nemuze byt v nejakem podivnem stavu BDE? Uz jsem videl u zakaznika situaci, kdy
na pocitaci byly smichany dve verze BDE (nevim, jak se to stalo, ale po preneseni
souboru BDE z jineho pocitace se to umravnilo.
David Lebeda
Precenovani ve skladovem systemu
[*] Vlastimil Bardon <bardon(zv)akord-soft(tec)cz> - 21.4.2004 06:32:57
Jeste bych doporucil klast otazku jake informace si zakaznik preje do budoucna ziskat. Z toho, co jsem slysel o propracovanych (zahranicnich) systemech tak tam naklady spojene s porizenim spise vedou samostatne a nepricitaji do porizovaci ceny zbozi primo, ale neprimo takze jsou schopni zjistit nejen porizovaci naklady celkem, ale take kolik z toho tvori nakupni cena, kolik doprava, postovne... atd. Naklady spojene s porizenim se pak mohou rozpoustet do porizovaci ceny nejakou davkovou operaci (treba mesicni uzaverkou), tim se stavaji nezavislymi na case, kdy je poridis, coz je spravne protoze se casto stava, ze se o nich dozvis az ve chvili, kdy je zbozi davno prodane. Pak se to take lepe opravuje. A kdyz by sis uz takovy system cely vymyslel, mohl bys pres nej resit i opravy chyb. Ale to predstavuje propracovany navrh konzultovany s auditorem.
Take jsem se v praxi setkal s resenim, kdy tato problematika vubec nebyla resena skladem, ale ciste ucetne. I takove reseni nebylo spatne.
Velkou vyhodou je pochopit jak to ucetne funguje, pak se Ti otevre nekolik cest, jak vyhovet legislative a poskytnout zakaznikovi, co potrebuje.
-----Original Message-----
From: Ing. Marek Kocan [mailto:kocan(zv)ebchod(tec)cz]
Sent: Tuesday, April 20, 2004 11:38 PM
Ahoj,
a ta spolecnost nema definovano, jak k takovym pripadum pristupvat? Nebo
delate obecny system? Neuctuje/nerpecenuje se to nahodou stejne jako v ramci
inventur a skladovych rozdilu? Spravne by se to melo udelat (IMHO) stornem,
ale to v praxi neni pouzitelne. KER
>
> > Souhlas, nicmene otazka se tykala spise metodiky precenovani
> > ve skladu - jak nalozit se zprumerovanou cenou pri chybe
> > nikoli databaze, ale chybe obsluhy pri zapisovani prijmu...
>
normalizace databazi adresare
[*] Pavel Malinsky <malinsky(zv)pmcom(tec)cz> - 21.4.2004 04:00:47
> -----Original Message-----
> From: delphi-l-owner(zv)clexpert(tec)cz
> [mailto:delphi-l-owner(zv)clexpert(tec)cz] On Behalf Of Slavomir Skopalik
> Sent: Tuesday, April 20, 2004 10:15 AM
> To: delphi-l(zv)clexpert(tec)cz
> Subject: Re: normalizace databazi adresare
>
> Jenom takova drobnost, faktury NESMI byt normalizovany,
> jelikoz se nesmi zmena napriklad v adrese promitnou do historie !
> Pokud se ti prestehuje odberatel, tak se to musi promitnout
> az do novych
> faktur, stare se nesmi zmenit.
> Pokud by k tomu doslo, tak by berni urad udelal sve.
Ahoj,
spravne, zkusim to rict trochu jinak, jak to mam treba ja.
Mam tabulku odberatelu kde jsou unikatni veci (ICO, DIC, Nazev apod.)
potom mam tabulku kde ke kazdemu odberateli muze existovat
X adres (sidlo firmy, provozvna 1apod.). Pri zalozeni
faktury uzivatel rekne na kterou adresu fakturu vystavuje a
tyto udaje jsou zapsany PRIMO k zaznamu faktury, nikoliv , ze se dotahuji.
Coz prave splnuje vyse uvadeny pozadavek.
S pozdravem a dikem
=====================================
> Pavel Malinsky; malinsky(zv)pmcom(tec)cz <
=====================================
> GSM: 602 652 203 | ICQ: 322015967 <
=====================================
Neuplny vysledek joinu
[*] Ludek ZITA <konference(zv)sales(tec)cz> - 21.4.2004 02:52:38
On Behalf Of Martin Pisarik
> INNER JOIN mi dava stejny vysledek jako LEFT JOIN.
> Pouhy JOIN bez privlastku mi dava neuplny vysledek stejne
> jako select ... where klauzule. Tak nevim...
Ahoj.
JOIN natvrdo propoji jen existujici klice a vety bez vazby nevypisuje
LEFT JOIN propoji vety a vyise vse.
Co pamatuju tak to vzdy tak bylo.
MySQL s JOINY pracuje az do nejake vyssi verze a IMHO tam prave ma
rozdil od standardu.
Ludek
normalizace databazi adresare
[*] Ludek ZITA <konference(zv)sales(tec)cz> - 21.4.2004 02:48:37
On Behalf Of Vlastimil Bardon
> Co se tyce financaku nebo auditora, tak by mu papiry mely
> stacit. Ale co kdyz budes chtit delat nejake historicke
> analyzy, treba kolik jsi toho prodal po okresech ci
> jednotlivych obcich? Ja bych se te historie radeji drzel,
> ikdyz je pravda, ze se muze stat, ze ji potrebovat nikdy
> nebudes. Ale lepsi je mit co nepotrebuju nez nemit co potrebuju.
>
Ahoj.
Jak uz tady nekdo napsal normalizace a klice jsou fajn na velikost
databaze a pro statistiky za mnoho let, ale evidence faktur (apod.)
konkretne jsou zrovna archivy a ne databaze takze reseni je nekolikere :
Nenormalizovat - ale pak je problem s realnou delko ruznych vypoctu a
statistik
Normalizovat a klicove udaje ukladat duplicitne v textovem tvaru (takze
ve fakture bude jak ID obce tak obec textove) - ale problem muze byt
velikost databaze
Normalizovat a udaje v ciselniku doplnit casovou platnosti - to ovsem
zase trochu komplikuje datovy model a pri nevhodne zvolenem DM to muze
vest opet k problemum se statistikou a rychlosti operaci nad DB
No a jeste jeden - tvrde normalizovat a archivovat "tiskovy" tvar
dokumentu mimo provozni databazi (TXT,XML,HTML,PDF,bitmapa...).
Zatim to neni bezne ale myslim, ze to ma velkou budoucnost, protoze pak
je mozne takovehle dokumenty "kolkovat" casovym razitkem a uplne tim
nahradit papirove dokumenty. (v Evrope to uz jde , v nasi drahe
socialisticko-krestanske-us vlasti jen teoreticky)
Ludek Precenovani ve skladovem systemu
[*] Ludek ZITA <konference(zv)sales(tec)cz> - 21.4.2004 02:24:35
On Behalf Of Ing. Marek Kocan
> a ta spolecnost nema definovano, jak k takovym pripadum
> pristupvat?
Ahoj.
To je ta spravna otazka. Pokud to je na zakazku doporuciji neresit to a
nechat zakaznika at urci postup sam.
Jinak ja se u takovychle veci snazim maximalne analyzovat obor moznych
vstupnich dat a treba nejakou statistickou metodou vymezit rozsah vstupu
a vyhodnotit pripadne omyly pred zapisem do databaze a uzivatele nechat
sporne pripady potvrdit.
Konkretne u prijmu se mi osvedcily tyhle metody (samo ze to zavisi na
konkretni situaci):
1) kontrola na celistvost nasobku zbozi na palete/v
kartonu/kontejneru.... (obvykle jde o celistve nasobky)
2) kontrola na vahu (zase treba se da zjistit ze 1 prijemka ~= 1 avie
(no a na ta ti tezko poveze 100kg nebo 100T) pripadne lze zjistit zase
pocet palet a pod
3) prumerna cena zbozi a dodavky celkem (obvykle se da stanovit nejaka
maximalni cenova odchylka od posledni dodavky jak za kus tak za celou
dodavku od stejneho dodavatele)
atd...
Samozrejme ta kontrola musi byt mekka (jen upozorneni) a je treba dobre
volit jak uroven (aby se to neptalo skoro pokazde) tak srozumitelnost
textu.
Tim se daji omezit vstupni chyby o docela dost procent.
Ludek Klasicky WinHelp k vlastnym komponentam
[*] Jaroslav Popluhar <delphi1(zv)acc.sk> - 21.4.2004 02:18:34
Ahoj,
potreboval by som poradit co najefektivnejie nastroje
pre pisanie helpu ku vlastnym komponentam do Delphi7.
Predpokladam, ze D7 este nevedia integorvat HTML-help,
takze len .hlp nie .chm.
Mame totiz 2 zakladne problemy:
1. Korektny .rtf editor (.hlp vyrabame MS-HelpWorkshopom)
najradsej iny ako MS-Word. Funguje nam to len s MS-Word 2000,
MS-Word XP tam vklada nejake cudne fonty a WorkShopa to zblbne.
2. Uplna integracia do Delphi helpu, t.j. aby F1 fungovalo
v zdrojaku, v ObjectInspectore na property a pod.
Co vsetko musime splnit? Napiste prosim aspon osnovu postupu.
Neexistuje na toto nejaky fungujuci a nie moc drahy nastroj?
--
Best regards,
Jaroslav mailto:delphi1(zv)acc.sk
Precenovani ve skladovem systemu
[*] Ing. Marek Kocan <kocan(zv)ebchod(tec)cz> - 20.4.2004 23:38:21
Ahoj,
a ta spolecnost nema definovano, jak k takovym pripadum pristupvat? Nebo
delate obecny system? Neuctuje/nerpecenuje se to nahodou stejne jako v ramci
inventur a skladovych rozdilu? Spravne by se to melo udelat (IMHO) stornem,
ale to v praxi neni pouzitelne. KER
>
> > Souhlas, nicmene otazka se tykala spise metodiky precenovani
> > ve skladu - jak nalozit se zprumerovanou cenou pri chybe
> > nikoli databaze, ale chybe obsluhy pri zapisovani prijmu...
>
Precenovani ve skladovem systemu
[*] Slavomir Skopalik <skopalik(zv)elektlabs(tec)cz> - 20.4.2004 23:12:13
Tedy, tohle by bylo spise na nejakeho ekonoma, ale zkusim to:
Pokud to obsluha spatne zada a je to potvrzeno do DB, tak
proste udelat druhe kolo precenovani jako by nova prijemka.
Jinak se z toho asi neda dostat.
Jinak by bylo nutne stornovat jiz vydane/prodane zbozi a to dost
dobre nejde.
Jak psal Zbysek, celou prijemku nechat vlozit off line a az na ok to
poslat
do db, tak by to pak mela udelat atomicky (v SP).
Slavek
Ing. Slavomir Skopalik
Jednatel spolecnosti
Elekt Labs s.r.o.
Chaloupky 158
783 72 Velky Tynec
Czech Republic
--------------------------------------------
Mobil: 724 207 851
e-mail:skopalik(zv)elektlabs(tec)cz
http://www.elektlabs(tec)cz
> Souhlas, nicmene otazka se tykala spise metodiky precenovani
> ve skladu - jak nalozit se zprumerovanou cenou pri chybe
> nikoli databaze, ale chybe obsluhy pri zapisovani prijmu...Precenovani ve skladovem systemu
[*] Martin Burle <mburle2(zv)volny(tec)cz> - 20.4.2004 22:34:10
> Tanto druh problemu resim zasadne takto:
> V editacnim formulari, ktery je zcela odpojen od "zivych" dat, necham
> uzivatele klofat jak je mu libo.
> Pak udelam kontroly, ktere databaze nezvladne nebo je vyhodnejsi udelat je
> na klientovi.
> Pak poslu celou davku ulozene procedure, ktera se postara o zbytek - a v
> pripade problemu akci stornuje a vrati chybu.
Souhlas, nicmene otazka se tykala spise metodiky precenovani ve skladu -
jak nalozit se zprumerovanou cenou pri chybe nikoli databaze, ale chybe
obsluhy pri zapisovani prijmu...
MB
Soucasny beh FireBirdu 1.0 a 1.5
[*] Pavel Cisar <pcb(zv)atlas(tec)cz> - 20.4.2004 20:07:59
Haj hou!
On 20 Apr 2004 at 17:19, Jaroslav Popluhar wrote:
> O.i. naozaj potrebujem urobit porovnanie vykonnosti FB1.0 a FB1.5 na jednom PC.
> bolo by fajn keby oba servery mohli bezat sucasne, ale prezijem aj prepinanie.
Prepinani je bez problemu, jen nesmi byt ani jedna verze provozovana
jako sluzba. Kazda verze se pak spousti primo volanim
ibserver/fbserver.exe s parametrem -a. Pro klienty je nutne vzdy
zajistit prislusnou verzi klientske knihovny.
> Otazky:
> - instaluje sa do Windows\System32 nejake .cpl pre ovladanie FB 1.5?
Pokud vim, tak ne.
> - ak ho nemam, kde da sa ziskat samostatne?
Na strankach projektu na SourceForge.
> - Ako a kde musim zmenit port 3050 napr. na 3051 pre FB 1.0?
> - Dufam, ze potom bude FB 1.5 komunikovat cez 3050 a FB 1.0 cez 3051,
> a bude mozne mat spustene oba servery, je to tak?
> - Mozem sa k nim potom pripajat aj lokalne?
>
> - Ak sa budem chciet potom pripajat k "staremu" FB 1.0, kam a v akej
> syntaxi musim potom uviest port 3051?
> - Delphi Komponenta IBX IBDatabase
> - rkEdit 4.8
> - IB Expert 2003.11.06 PE
Doporucuji si precist release Notes k FB 1.5 (jsou i v cestine).
S pozdravem
Pavel Cisar
Delphree - Delphi Open Source Initiative
http://delphree.clexpert.com
dll-ky vytvorene vo visual .net studiu
[*] energystar <energystar(zv)inmail.sk> - 20.4.2004 18:45:53
ahoj
mam taku otazku ohladom delphi and .net
daju sa v delphi pouzit dll-ky vytvorene vo visual .net studiu? (konkretne vo visual basicu)?
dakujem
alex ronai
Verzia Delphi (VS.NET) pre DB aplikacie
[*] BRCKO Peter <peter.brcko(zv)assetsoft.sk> - 20.4.2004 17:53:44
Prosim o radu od vyvojarov, ktori maju prakticke skusenosti s DB aplikaciami vyvijanymi v Delphi (VS.NET).
Nakolko u mna nastala nutnost prerobit 13-ty rok beziaci DB projekt ( BP 7 a BTreeFiler)
a v Delphi som nic ucelene nenaprogramoval ( firma presedlala v 1997 na Oracle DB i vyvojove nastroje ),
potrebujem radu ohladom vhodnosti verzie Delphi 8.
1. Aka verzia Delphi 8 je minimalna pre vyvoj DB aplikacie ak budem vyuzivat komponenty tretich stran pre pristup k DB?
Ak DB bude FB
2. FIBPlus ma komponenty iba pre pristup k DB a administracii DB. Je to postacujuce pre DB aplikaciu ak ( mozno zatial )
nemam cas a ani skusenosti s vytvaranim vlastnych komponent ?
3. IBO ma podstatne viac komponent - su potrebne alebo aspon vhodne pre vyvoj DB aplikacii ?
4. Ma niekto skusenosti s pouzivanim FIBPlus alebo IBO a je ochotny ( priamo nie cez konferenciu ) sa podelit o skusenosti
pri zaciatkoch ich pouzivania ( hlavne pouzitelnost jednotlivych komponent nie samotny sposob ich pouzitia ) ?
5. Je niekto, kto presiel z IBO na FIBPlus alebo opacne - PRECO? ( okrem spominanych problemov Milanom Tomesom
- nacitanie a cachovabnie niekolkych stoviek tisic zaznamov - spadli jak IBX tak i FIBPlus )
Ak DB bude Oracle
6. Ma niekto skusenosti s pouzivanim komponent DAO a je ochotny ( priamo nie cez konferenciu ) sa podelit o skusenosti
pri zaciatkoch ich pouzivania ?
!!!!!!!!!!!!!!!!
7. Otazka pre vyvojarov, ktory uz presli na VS.NET z Delphi. Da sa odhadnut doba, ktoru potrebuje skuseny
( relativne - 14.rokov ) vyvojar na zacatie prace vo VS ( nikdy som MS nastroje neskusal )?
Ako a kym ( MS - tretie starny ) je riesena konektivita do FB i Oracle vo VS.NET?
Aka verzia VS.NET je potrebna pre vyvoj DB aplikacii?
Prakticke skusenosti poprosim priamo na moj mail.
Dakujem.
Peter Brcko.
WinInet a NTLM
[*] Dvorak Miroslav <rdocekal(zv)csas(tec)cz> - 20.4.2004 17:43:42
Ahoj,
pomoci funkci z WinInet mam NTLM autorizaci vyresenu jiz nekolik let a funguje to k plne spokojenosti.
Mira
-----Original Message-----
From: Lebeda David [mailto:david.lebeda(zv)comarr(tec)cz]
Sent: Monday, April 19, 2004 10:16 AM
To: delphi-l(zv)clexpert(tec)cz
Subject: WinInet a NTLM
Ahoj,
na strankach Microsoftu jsem nasel nejake navody na pouziti WinInet
API pro relizaci prace s HTTP protokolem. Je tam i ukazka reseni v
pripade pouziti proxy vyzadujiciho autorizaci. Existuji API funkce,
kterymi se nastavi jmeno a heslo pro proxy. Ale resi pouziti WinInet i
autorizaci NTLM? Rad bych dosahl toho, aby uzivatel me aplikace
musel vedet jmeno a heslo pro proxy, ale aby ho nemusela zajimat
metoda autorizace. Pomuzou mi k tomu WinInet funkce nebo bych
NTLM autorizaci stejne musel obslouzit nejak po svem?
Diky
David Lebeda
Soucasny beh FireBirdu 1.0 a 1.5
[*] Jaroslav Popluhar <delphi1(zv)acc.sk> - 20.4.2004 17:19:40
Zdravim vsetkych priaznivcov a pouzivatelov FIREBIRDu!
O.i. naozaj potrebujem urobit porovnanie vykonnosti FB1.0 a FB1.5 na jednom PC.
bolo by fajn keby oba servery mohli bezat sucasne, ale prezijem aj prepinanie.
Mam nainstalovany FB 1.0.3 (WI-V6.2.972) - manualne spustanie cez
ControlPanel. Dalej som sa pokusil nainstalovat FB 1.5.0.4306.
Stav:
- FB 1.0 OK, da sa vypnut aj zapnut cez .cpl a vsetko bezi ako ma
- FB 1.5 - nebezi a neviem ho zapnut (ani ked vypnem FB 1.0),
skusil som spustit z adresara bin fbserver aj fbguard
a vzdy sa po chvilke vypli...
- pomocou instclient i f / i g som vygeneroval vo Windows\System32
gds32.dll aj fbclient.dll {pre istotu:-)
Otazky:
- instaluje sa do Windows\System32 nejake .cpl pre ovladanie FB 1.5?
- ako sa vola (mam tam 3-4 .cpl pre FB1.0)?
- ak ho nemam, kde da sa ziskat samostatne?
- Ked vypnem FB 1.0, co musim urobit aby som cez toto .cpl mohol
ovladat FB 1.5?
- Ako a kde musim zmenit port 3050 napr. na 3051 pre FB 1.0?
- Dufam, ze potom bude FB 1.5 komunikovat cez 3050 a FB 1.0 cez 3051,
a bude mozne mat spustene oba servery, je to tak?
- Mozem sa k nim potom pripajat aj lokalne?
- Ak sa budem chciet potom pripajat k "staremu" FB 1.0, kam a v akej
syntaxi musim potom uviest port 3051?
- Delphi Komponenta IBX IBDatabase
- rkEdit 4.8
- IB Expert 2003.11.06 PE
--
Best regards,
Jaroslav mailto:delphi1(zv)acc.sk
TDBLookupComboBox
[*] Martin Pisarik <martin.pisarik(zv)seznam(tec)cz> - 20.4.2004 16:43:37
Mam TDBLookupComboBox ktery zobrazuje data z tabulky, je tam asi 700 zaznamu
a zobrazuje ctyrmistny kod. Pokud rozbalim ten combobox a zacnu psat na
klavesnici ten kod, tak mi, pokud tam je, skoci kurzor na vybrany zaznam. To
je super. Ale nefunguje to uplne, nektere zaznamy to proste takto nenajde a
nenajde a je treba je v tom comboboxu najit rucne, coz je prinejmensim
uzivatelsky neprijemne. Jak to, ze to najde jen nektere, kdyz to zobrazi
vsechny a spravne?
Taky se to projevuje v gridu, kde mam lookup field a ten zobrazuje jen
nektere hodnoty a nektere ne a ne, i kdyz tam jsou!
Mam pocit, jako by to pracovalo jen s nejakymi zaznamy (mozna to ma stejneho
jmenovatele jako muj predchozi problem s neuplnym vysledkem joinu)
Vi nekdo co s tim?
Jde o Paradox + BDE.
Dik.
normalizace databazi adresare
[*] Petr Zahradnik <clexpert(zv)clexpert(tec)cz> - 20.4.2004 16:27:35
Puvodni zprava ze dne 20.4.2004:
> Co se tyce financaku nebo auditora, tak by mu papiry mely stacit.
> Ale co kdyz budes chtit delat nejake historicke analyzy, treba kolik
> jsi toho prodal po okresech ci jednotlivych obcich? Ja bych se te
> historie radeji drzel, ikdyz je pravda, ze se muze stat, ze ji
> potrebovat nikdy nebudes. Ale lepsi je mit co nepotrebuju nez nemit
> co potrebuju.
V tom ja s Tebou plne souhlasim. Nejlepsi je nemit v databazi bordel,
to je preci naprosto logicke. Pouze jsem si dovolil nesouhlasit s tim
FU, o nic vic neslo :-)
Petr Zahradnik, pocitacovy expert
==========================================================
Petr Zahradnik, Computer Laboratory
web: http://www.clexpert(tec)cz, e-mail: clexpert(zv)clexpert(tec)cz
==========================================================
Neuplny vysledek joinu
[*] Martin Pisarik <martin.pisarik(zv)seznam(tec)cz> - 20.4.2004 16:17:33
INNER JOIN mi dava stejny vysledek jako LEFT JOIN.
Pouhy JOIN bez privlastku mi dava neuplny vysledek stejne jako select ...
where klauzule.
Tak nevim...
-----Original Message-----
From: delphi-l-owner(zv)clexpert(tec)cz [mailto:delphi-l-owner(zv)clexpert(tec)cz]On
Behalf Of Petr Langer
Sent: Tuesday, April 20, 2004 3:43 PM
To: delphi-l(zv)clexpert(tec)cz
Subject: Re: Neuplny vysledek joinu
Zkus INNER JOIN misto LEFT JOIN a porovnej, jestli nemas stejny vysledek jak
ti daval ten puvodni SQL dotaz, pak by to bylo jasne.
Petr Langer
----- Original Message -----
From: "Martin Pisarik" <martin.pisarik(zv)seznam(tec)cz>
Subject: Re: Neuplny vysledek joinu
> No ja jsem zkousel JOIN a nefungovalo to dobre, ale s LEFT JOINEM to
funguje
> tak jak ma.
> Takze dik moc.
> Ale nechapu to.
> Kdyz jsem mel ty data na mySQL tak muj dotaz fungoval dobre a kdyz jsem to
> zkousel v Accessu, tak to taky fungovalo dobre. V tomto pripade mi LEFT
> nevadi, ale co kdybych mel takova data, ze bych ho nemohl pouzit? Co pak?
> A nebo nerozumim SQL?
Precenovani ve skladovem systemu
[*] Zbysek Hlinka <konference(zv)hlinka(tec)cz> - 20.4.2004 16:05:24
> -----Original Message-----
> From: delphi-l-owner(zv)clexpert(tec)cz
> [mailto:delphi-l-owner(zv)clexpert(tec)cz] On Behalf Of Martin Burle
> Sent: Tuesday, April 20, 2004 3:49 PM
>
> resime s kolegou skladovy prodejni system, prave se zabyvame
> prijmy, precenovanim, prumerovanim cen atp. Do cen zbozi by
> se mely volitelne rozpoustet vedlejsi naklady (doprava,
> postovne apod. = VN). Idea je takova, ze po zapsani kazde
> polozky do prijemky se podle potreby provede preceneni
> polozky v katalogu a navyseni poctu kusu na skladu. Nakupni
> cena bude navysena o pomernou cast VN. Ihned pote bude
> polozka ve zmenene podobe k dispozici ostatnim uzivatelum.
> Zapisovani jedne prijemky muze trvat i dost dlouho, takze
> neprichazi do uvahy blokovani vsech polozek, ktere se v ni vyskytuji.
> Lameme si hlavu, jak korektne resit dodatecne zmeny v
> prijemce (oprava chybne zadanych poctu, uplne chybne zadane
> polozky apod.) v pripade, ze jiz doslo ke zmenam a nebo
> dokonce meziprodejum. Jiz zmena poctu totiz vyvola zmenu
> prepoctene nakupni ceny (navysene o VN).
Tanto druh problemu resim zasadne takto:
V editacnim formulari, ktery je zcela odpojen od "zivych" dat, necham
uzivatele klofat jak je mu libo.
Pak udelam kontroly, ktere databaze nezvladne nebo je vyhodnejsi udelat je
na klientovi.
Pak poslu celou davku ulozene procedure, ktera se postara o zbytek - a v
pripade problemu akci stornuje a vrati chybu.
S pozdravem
Zbysek Hlinka
E-mail: hlinka zavin. hlinka(tec)cz
Precenovani ve skladovem systemu
[*] Martin Burle <mburle2(zv)volny(tec)cz> - 20.4.2004 15:49:18
Ahoj,
resime s kolegou skladovy prodejni system, prave se zabyvame prijmy,
precenovanim,
prumerovanim cen atp. Do cen zbozi by se mely volitelne rozpoustet vedlejsi
naklady (doprava, postovne apod. = VN). Idea je takova, ze po zapsani kazde
polozky do prijemky se podle potreby provede preceneni polozky v katalogu a
navyseni poctu kusu na skladu. Nakupni cena bude navysena o pomernou cast
VN. Ihned pote bude polozka ve zmenene podobe k dispozici ostatnim
uzivatelum. Zapisovani jedne prijemky muze trvat i dost dlouho, takze
neprichazi do
uvahy blokovani vsech polozek, ktere se v ni vyskytuji.
Lameme si hlavu, jak korektne resit dodatecne zmeny v
prijemce (oprava chybne zadanych poctu, uplne chybne zadane polozky apod.) v
pripade, ze jiz doslo ke zmenam a nebo dokonce meziprodejum. Jiz zmena poctu
totiz vyvola zmenu prepoctene nakupni ceny (navysene o VN). Napadaji nas dve
moznosti:
a) ulozit si verzi zaznamu v katalogu a v pripade chyby vratit vse zpet. To
ale nebude mozne, pokud mezi zmenou a opravou dojde k dalsi zmeni ci
meziprodeji.
b) nepovolit dodatecnou editaci polozky a zmeny resit minusovou samostatnou
polozkou v
prijemce, s naslednym odprumerovanim a novym rucnim precenenim.
Jak toto resite, jake mate nazory na tuto problematiku?
Povolujete dodatecnou editaci prijemek?
Zapisujete kazdou polozku, nebo az celou prijemku?
Predem diky za inspiraci :)
MB
Neuplny vysledek joinu
[*] Petr Langer <langer(zv)xdom(tec)cz> - 20.4.2004 15:43:15
Zkus INNER JOIN misto LEFT JOIN a porovnej, jestli nemas stejny vysledek jak
ti daval ten puvodni SQL dotaz, pak by to bylo jasne.
Petr Langer
----- Original Message -----
From: "Martin Pisarik" <martin.pisarik(zv)seznam(tec)cz>
Subject: Re: Neuplny vysledek joinu
> No ja jsem zkousel JOIN a nefungovalo to dobre, ale s LEFT JOINEM to
funguje
> tak jak ma.
> Takze dik moc.
> Ale nechapu to.
> Kdyz jsem mel ty data na mySQL tak muj dotaz fungoval dobre a kdyz jsem to
> zkousel v Accessu, tak to taky fungovalo dobre. V tomto pripade mi LEFT
> nevadi, ale co kdybych mel takova data, ze bych ho nemohl pouzit? Co pak?
> A nebo nerozumim SQL?
Neuplny vysledek joinu
[*] Martin Pisarik <martin.pisarik(zv)seznam(tec)cz> - 20.4.2004 15:35:09
No ja jsem zkousel JOIN a nefungovalo to dobre, ale s LEFT JOINEM to funguje
tak jak ma.
Takze dik moc.
Ale nechapu to.
Kdyz jsem mel ty data na mySQL tak muj dotaz fungoval dobre a kdyz jsem to
zkousel v Accessu, tak to taky fungovalo dobre. V tomto pripade mi LEFT
nevadi, ale co kdybych mel takova data, ze bych ho nemohl pouzit? Co pak?
A nebo nerozumim SQL?
-----Original Message-----
From: delphi-l-owner(zv)clexpert(tec)cz [mailto:delphi-l-owner(zv)clexpert(tec)cz]On
Behalf Of Karel Rys
Sent: Tuesday, April 20, 2004 3:11 PM
To: delphi-l(zv)clexpert(tec)cz
Subject: Re: Neuplny vysledek joinu
Martin Pisarik dne 20 Apr 2004 v 15:01:
> Doufam, ze na tento dotaz nekdo zareaguje protoze uz fakt nevim.
> Mam 3 tabulky: Artikl, Provedeni, AP. Tabulka AP obsahuje povolene
> kombinace Artiklu a Provedeni a ma teda jen 3 fieldy (ID,
> Provedeni_ID, Artikl_ID)
>
> A ted ten problem!
> spojim ty tabulky takto:
>
> SELECT *
> FROM AP, Artikl, Provedeni
> where Artikl.ID=AP.Artikl_ID
> and Provedeni.ID=AP.Provedeni_ID
A co zkusit
SELECT *, b.*, c.*
FROM AP a
LEFT OUTER JOIN Artikl b on (b.ID=a.Artikl_ID)
LEFT OUTER JOIN Provedeni c on (c.ID=a.Provedeni_ID)
Karel Rys
Neuplny vysledek joinu
[*] Karel Rys <delphi(zv)zas-me(tec)cz> - 20.4.2004 15:11:07
Martin Pisarik dne 20 Apr 2004 v 15:01:
> Doufam, ze na tento dotaz nekdo zareaguje protoze uz fakt nevim.
> Mam 3 tabulky: Artikl, Provedeni, AP. Tabulka AP obsahuje povolene
> kombinace Artiklu a Provedeni a ma teda jen 3 fieldy (ID,
> Provedeni_ID, Artikl_ID)
>
> A ted ten problem!
> spojim ty tabulky takto:
>
> SELECT *
> FROM AP, Artikl, Provedeni
> where Artikl.ID=AP.Artikl_ID
> and Provedeni.ID=AP.Provedeni_ID
A co zkusit
SELECT *, b.*, c.*
FROM AP a
LEFT OUTER JOIN Artikl b on (b.ID=a.Artikl_ID)
LEFT OUTER JOIN Provedeni c on (c.ID=a.Provedeni_ID)
Karel Rys
Tisk pomoci Canvas.Pixels
[*] Petr Daricek <petr.daricek(zv)seznam(tec)cz> - 20.4.2004 15:07:06
> no momentalne ten zdrojak nemuzu najit (je mozny ze jsem ho uz i smazal) ale
> princip byl takovy za jsem si zjistil sklon cary a jeji skutecnou delku
> (pythagoras) a delku carecky
> pak jsem si vzal pocatecni bod a nastavil ze ma byt plna cara
> delku carecky jsem si upravil podle toho kolik mi jeste z te cary zbyvalo,
> pak si ji otocil okolo pocatecniho bodu a pokud to byla plna cara tak
> nakreslil
> pak jsem prehodil z plne cary na prazdne misto a jako pocatecni souradnice
> jsem si nastavil posledni koncove, snizil celkovou delku cary o delku
> carecky
> a dokolecka dokola dokud zbyvala nejaka celkova delka
> pokud to bya lomena cara tak jsem si do dalsiho kola prenesl zbytek carecky
> a zda je to plna nebo prazdna cara
>
> pro vypocty jsem pouzival longint pricemz nejnizzi byt byl vlastne desetinna
> cast - deleni probihalo pomoci rotace
> sin a cos pro otaceni jsem pocital samozrejme jen na zacatku a to funkci
> procedure SinCos (angel : extended; var sin, cos : extended);
> asm
> FLD angel
> FSINCOS
> FSTP tbyte ptr [edx] // cos
> FSTP tbyte ptr [eax] // sin
> FWAIT
> end;
>
> je jasne ze to asi jde i lepe ale me to celkem stacilo pro velmi jednoduche
> vykreslovani - delena cara jejiz konce jsou zaobleny
Ahoj,
u tveho postupu ale muze vzniknout chyba. Predpokladam, ze zminene otaceni provadis nasobenim sinem a cosinem(tedy spise prumety do x-ove a y-ove souradnice). Protoze pracujes s realnymi cislama, tak nakonec musis zaokrouhlit pri pocitani koncoveho bodu jedne carecky. Tady muze vzniknout chyba o jeden bod, coz neni tak hrozne, ale vzhledem k tomu, ze tento chybny koncovy bod prohlasime za pocatek dalsiho, tak v nasledujicim kroku, jsou uz to body dva atd.
Petr Daricek
Neuplny vysledek joinu
[*] Martin Pisarik <martin.pisarik(zv)seznam(tec)cz> - 20.4.2004 15:01:04
Ahoj *,
Doufam, ze na tento dotaz nekdo zareaguje protoze uz fakt nevim.
Mam 3 tabulky: Artikl, Provedeni, AP. Tabulka AP obsahuje povolene kombinace
Artiklu a Provedeni a ma teda jen 3 fieldy (ID, Provedeni_ID, Artikl_ID)
A ted ten problem!
spojim ty tabulky takto:
SELECT *
FROM AP, Artikl, Provedeni
where Artikl.ID=AP.Artikl_ID
and Provedeni.ID=AP.Provedeni_ID
Vrati mi to ale min zaznamu, nez by melo. Zkoumal jsem to a zjistil jsem
strasnou vec! Od kazdeho Provedeni_ID mi to vrati max 50 zaznamu, takze
pokud by jich tam melo byt vic, tak mi to vrati 50 zaznamu a hotovo. V
dusledku toho je vysledek neuplny a misto 7280 zaznamu dostanu jen 5928.
Zkousel jsem i join ale vysledek stejny.
Vubec nevim cim to je.
Jsou to paradoxove tabulky *.db a pracuju s tim pres BDE.
Ja vim, ja vim, ale rady abych se vykaslal na BDE jsou mi ted k nicemu.
Tohle prece musi fungovat i v BDE ne?
Prosim pomozte!
normalizace databazi adresare
[*] Vlastimil Bardon <bardon(zv)akord-soft(tec)cz> - 20.4.2004 14:33:02
Co se tyce financaku nebo auditora, tak by mu papiry mely stacit. Ale co kdyz budes chtit delat nejake historicke analyzy, treba kolik jsi toho prodal po okresech ci jednotlivych obcich? Ja bych se te historie radeji drzel, ikdyz je pravda, ze se muze stat, ze ji potrebovat nikdy nebudes. Ale lepsi je mit co nepotrebuju nez nemit co potrebuju.
-----Original Message-----
From: Petr Zahradnik [mailto:clexpert(zv)clexpert(tec)cz]
Sent: Tuesday, April 20, 2004 1:37 PM
Pokud si ty faktury tisknes na papir, tak v tom nevidim problem,
protoze berni urad, rikejme mu Financni urad, kontroluje papirove
doklady a nikoliv zaznamy v pocitaci. Kdyz bude dzungle v pocitaci,
ale na papire to bude spravne, nic se nedeje ve vztahu k FU.
Petr Zahradnik, pocitacovy expert
normalizace databazi adresare
[*] Slavomir Skopalik <skopalik(zv)elektlabs(tec)cz> - 20.4.2004 14:11:00
>
> Pokud si ty faktury tisknes na papir, tak v tom nevidim
> problem, protoze berni urad, rikejme mu Financni urad,
> kontroluje papirove doklady a nikoliv zaznamy v pocitaci.
> Kdyz bude dzungle v pocitaci, ale na papire to bude spravne,
> nic se nedeje ve vztahu k FU.
Souhlas, bohuzel jen do doby, kdy potrebujes vytisknout kopii faktury,
nebo dodaciho listu :((.
Slavek
Ing. Slavomir Skopalik
Jednatel spolecnosti
Elekt Labs s.r.o.
Chaloupky 158
783 72 Velky Tynec
Czech Republic
--------------------------------------------
Mobil: 724 207 851
e-mail:skopalik(zv)elektlabs(tec)cz
http://www.elektlabs(tec)cz
normalizace databazi adresare
[*] Petr Zahradnik <clexpert(zv)clexpert(tec)cz> - 20.4.2004 13:36:57
Puvodni zprava ze dne 20.4.2004:
> Jenom takova drobnost, faktury NESMI byt normalizovany,
> jelikoz se nesmi zmena napriklad v adrese promitnou do historie !
> Pokud se ti prestehuje odberatel, tak se to musi promitnout az do novych
> faktur, stare se nesmi zmenit.
> Pokud by k tomu doslo, tak by berni urad udelal sve.
Pokud si ty faktury tisknes na papir, tak v tom nevidim problem,
protoze berni urad, rikejme mu Financni urad, kontroluje papirove
doklady a nikoliv zaznamy v pocitaci. Kdyz bude dzungle v pocitaci,
ale na papire to bude spravne, nic se nedeje ve vztahu k FU.
Petr Zahradnik, pocitacovy expert
==========================================================
Petr Zahradnik, Computer Laboratory
web: http://www.clexpert(tec)cz, e-mail: clexpert(zv)clexpert(tec)cz
==========================================================
normalizace databazi adresare
[*] Vlastimil Bardon <bardon(zv)akord-soft(tec)cz> - 20.4.2004 13:00:54
Myslim, ze to nebylo receno presne. Faktura musi mit svou adresu, ktera se nesmi posleze menit. Ale v ramci te adresy muze byt odkaz treba na ciselnik nazvu obci. Ovsem pokud se zmeni nazev obce, nemel by se menit zaznam v tom ciselniku ale vytvorit novy klic s novym nazvem, aby byla zachovana historie.
Nicmene casto je opravdu nejlepsim resenim nechat ty nazvy obci primo ve fakturach.
-----Original Message-----
From: Slavomir Skopalik [mailto:skopalik(zv)elektlabs(tec)cz]
Sent: Tuesday, April 20, 2004 10:15 AM
Jenom takova drobnost, faktury NESMI byt normalizovany,
jelikoz se nesmi zmena napriklad v adrese promitnou do historie !
Pokud se ti prestehuje odberatel, tak se to musi promitnout az do novych
faktur, stare se nesmi zmenit.
Pokud by k tomu doslo, tak by berni urad udelal sve.
Slavek
PS: Firma je vzdy definovana jmenem a sidlem, pokud
jedno z toho nesedi (pro dany cas), je doklad neplatny.
Tisk pomoci Canvas.Pixels
[*] Fitz Ladislav <ladislav.fitz(zv)kodytek(tec)cz> - 20.4.2004 12:16:48
no momentalne ten zdrojak nemuzu najit (je mozny ze jsem ho uz i smazal) ale
princip byl takovy za jsem si zjistil sklon cary a jeji skutecnou delku
(pythagoras) a delku carecky
pak jsem si vzal pocatecni bod a nastavil ze ma byt plna cara
delku carecky jsem si upravil podle toho kolik mi jeste z te cary zbyvalo,
pak si ji otocil okolo pocatecniho bodu a pokud to byla plna cara tak
nakreslil
pak jsem prehodil z plne cary na prazdne misto a jako pocatecni souradnice
jsem si nastavil posledni koncove, snizil celkovou delku cary o delku
carecky
a dokolecka dokola dokud zbyvala nejaka celkova delka
pokud to bya lomena cara tak jsem si do dalsiho kola prenesl zbytek carecky
a zda je to plna nebo prazdna cara
pro vypocty jsem pouzival longint pricemz nejnizzi byt byl vlastne desetinna
cast - deleni probihalo pomoci rotace
sin a cos pro otaceni jsem pocital samozrejme jen na zacatku a to funkci
procedure SinCos (angel : extended; var sin, cos : extended);
asm
FLD angel
FSINCOS
FSTP tbyte ptr [edx] // cos
FSTP tbyte ptr [eax] // sin
FWAIT
end;
je jasne ze to asi jde i lepe ale me to celkem stacilo pro velmi jednoduche
vykreslovani - delena cara jejiz konce jsou zaobleny
Tisk pomoci Canvas.Pixels
[*] Petr Daricek <petr.daricek(zv)seznam(tec)cz> - 20.4.2004 10:14:39
> zdravim
>
> za prve doporucuji nepouzivat Canvas.Pixels protoze pouziva api metodu
> SetPixel ktera krome nastaveni pixelu take vraci puvodni hodnotu, ale radeji
> SetPixelV ktera jen nastavi barvu
> za druhe nevim presne jak vykreslujes tu caru, ale misto pageWidth a
> PageHeight bych asi radeji pouzil DPI
>
> nakreslit prerusovanou libovolne tlustou caru na W9x neni vubec zadna sranda
> (pokud teda vyslovene nepotrebujes kulate ohranicenou pak totiz muzes pouzit
> kresleni plnych car vhodne rozbytych)
Ahoj,
momentalne kreslim tu caru pomoci modifikovaneho DDA Algoritmu.
Rozbyti plne cary, me taky napadlo, ale jak to udelat, aby to bylo rychle, tj. s co nejmensim poctem deleni atd. a taky aby nevznikaly chyby zaokrouhlenim. Jestli mas nejaky algoritmus, rad se na nej kouknu a porovnam to.
Petr Daricek
normalizace databazi adresare
[*] Slavomir Skopalik <skopalik(zv)elektlabs(tec)cz> - 20.4.2004 10:14:39
Jenom takova drobnost, faktury NESMI byt normalizovany,
jelikoz se nesmi zmena napriklad v adrese promitnou do historie !
Pokud se ti prestehuje odberatel, tak se to musi promitnout az do novych
faktur, stare se nesmi zmenit.
Pokud by k tomu doslo, tak by berni urad udelal sve.
Slavek
PS: Firma je vzdy definovana jmenem a sidlem, pokud
jedno z toho nesedi (pro dany cas), je doklad neplatny.
> jde o jednoduche vytvareni prodejek a faktur v radech par
> tisic (asi do
> 10tis) mesicne, tisk po vytvoreni, zmena adresy u radove
> jednoho dokladu z 1000, a nejake managerske vystupy (tech je
> jen minimum (radove asi 10) a daji se spocitat dopredu
>
> jinak diky za vsechny namety
>
>
>
>
>
> Ako spusti BAT subor
[*] Vaclav Riha - Soft Consult <vaclav_riha(zv)softconsult(tec)cz> - 20.4.2004 10:28:41
>Prosim poradte mi ako mam z DELPHI programu spustit DOSovsky prikaz?
Zkus, (strilim od pasu)
ShellExecute(Handle, nil, 'command', '/c dir /p', nil, SW_SHOWNORMAL);
S pozdravem Vaclav Riha
MS SQL - pohledy a Delphi
[*] Ing. Igor Vodicka <vodicka(zv)sagit(tec)cz> - 20.4.2004 10:06:38
Ahoj vsichni!
Je mozne pres nejakou komponentu, podobne jako pres StoredProc nebo
ADOStoredProc k ulozenym proceduram, pristupovat k pohledum v SQL databazi?
Chtel bych pohled "zavolat" z klienta (program v Delphi) a pak dale pracovat
s vracenom mnozinou dat v nejakem datasetu. Nevite nekdo jak na to?
Pouzivam D5 Ent.
Ing. Igor Vodicka
informacni systemy
Nakladatelstvi Sagit
Ako spusti BAT subor
[*] Koteles Jan <koteles(zv)lumen.sk> - 20.4.2004 09:48:36
Prosim poradte mi ako mam z DELPHI programu spustit DOSovsky prikaz?
Mam na mysli spustenie externej aplikacie, ale aj spustenie prikazu DOSu
(COPY/MOVE...)
Dakujem
jk
normalizace databazi adresare
[*] Fitz Ladislav <ladislav.fitz(zv)kodytek(tec)cz> - 20.4.2004 09:34:34
jde o jednoduche vytvareni prodejek a faktur v radech par tisic (asi do
10tis) mesicne, tisk po vytvoreni, zmena adresy u radove jednoho dokladu z
1000, a nejake managerske vystupy (tech je jen minimum (radove asi 10) a
daji se spocitat dopredu
jinak diky za vsechny namety
Tisk pomoci Canvas.Pixels
[*] Fitz Ladislav <ladislav.fitz(zv)kodytek(tec)cz> - 20.4.2004 09:12:32
zdravim
za prve doporucuji nepouzivat Canvas.Pixels protoze pouziva api metodu
SetPixel ktera krome nastaveni pixelu take vraci puvodni hodnotu, ale radeji
SetPixelV ktera jen nastavi barvu
za druhe nevim presne jak vykreslujes tu caru, ale misto pageWidth a
PageHeight bych asi radeji pouzil DPI
nakreslit prerusovanou libovolne tlustou caru na W9x neni vubec zadna sranda
(pokud teda vyslovene nepotrebujes kulate ohranicenou pak totiz muzes pouzit
kresleni plnych car vhodne rozbytych)Nejaky novy zaznam do PopUp menu v Prieskumnikovi
[*] Martin Kasman <martinkasman(zv)martinkasman.sk> - 20.4.2004 08:48:30
Toto je ukazka ako sa to robi pri ikone:
var Reg: TRegistry;
begin
Reg:=TRegistry.Create;
Reg.RootKey := HKEY_CLASSES_ROOT;
//Reg.DeleteKey('\icofile\shell\Stiahnut do programu Ikony');
Reg.OpenKey('\icofile\shell\Stiahnut ikonu do programu Ikony\Command',
True);
Reg.WriteString('', '"'+Application.ExeName+'" "%1"');
Reg.CloseKey;
staci to len upravit na zip subor
Pekny den praje www.MartinKasman.sk
----- Original Message -----
From: "Rastislav Lazan" <lazan(zv)davidplus.sk>
To: <delphi-l(zv)clexpert(tec)cz>
Sent: Monday, April 19, 2004 10:14 AM
Subject: Nejaky novy zaznam do PopUp menu v Prieskumnikovi na prave tlacitko
mysky
>
> Rad by som vedel, ako pridam do PopUp menu, ktore sa mi zobrazuje
kliknutim
> praveho tlacitka mysky v Prieskumnikovi (alebo inom Commanderi) na ZIP
subor
> novy zaznam, do ktoreho si zapisem nejaku akciu.
> Dakujem.
>
> Rastislav Lazan
> lazan(zv)davidplus.sk
>
>
>
>
>
Nastaveni hesla pro mdb DB
[*] Petr Vobornik <vobornik(zv)apel(tec)cz> - 20.4.2004 07:50:25
Zdravim,
potreboval bych typ, jak programove nastavit heslo pro ACCESS databazi.
Pouzivam Microsoft.Jet.OLEDB.4.0, ADO komponenty v D6, WinXP. Doposud jsem k
vytvareni databaze pouzival ACCESS, ale ted jsem nucen to delat primo z
programu a nedari se mi databazi zaheslovat.
Dekuji
Petr
MS SQL - pohledy a Delphi
[*] Ing. Igor Vodicka <vodicka(zv)sagit(tec)cz> - 20.4.2004 07:10:22
Ahoj vsichni!
Je mozne pres nejakou komponentu, podobne jako pres StoredProc nebo
ADOStoredProc k ulozenym proceduram, pristupovat k pohledum v SQL databazi?
Chtel bych pohled "zavolat" z klienta (program v Delphi) a pak dale pracovat
s vracenom mnozinou dat v nejakem datasetu. Nevite nekdo jak na to?
Pouzivam D5 Ent.
Ing. Igor Vodicka
informacni systemy
Nakladatelstvi Sagit
POP3 a SMTP cez LAN a DSL
[*] Jaroslav Popluhar <delphi1(zv)acc.sk> - 20.4.2004 06:22:17
Hello Kamil,
KB> Pokud se nepletu, musis na Notebooku nastavit proxy s IP adresou tve masiny
KB> pripojene k DSL.
Nastavil som na notebooku tuto IP adresu
v nastaveni TCP/IP protokolu v polozke
"Vychozi brana" aj v "Uprednostnovany server DNS".
Kde este? Pouzivam TheBAT! a neviem, kde by sa to
tam malo dat nastavit.
Uz to spravne smeruje poziadavky na DNS,
dokonca DNS forwarder v Proxy+ to posle
serveru, ktory vrati IP adresy mailservera,
ale klientovi to nestaci.
Rozmyslam, ci netreba nainstalovat na ten PC s DSL
nejaky SW router, ktory by akekolvek pakety,
ktorych IP su mimo LAN smeroval cez to DSL spojenie.
Ako sa to da zabezpecit co najlahsie?
Neda sa to nestavit priamo niekde v OS? (WinXP Pro).
--
Best regards,
Jaroslav mailto:delphi1(zv)acc.sk
sReality
[*] Jan Pukovec <walkrine(zv)centrum(tec)cz> - 19.4.2004 22:31:47
Zalezi, co je mysleno exportem dat.
S automatizaci vytahu dat ze stranek popr. Automatizaci odesilani dat na
stranky zkusenosti mame.
Vice info mailem. walkrine(zv)centrum(tec)cz
>Ma tady nekdo zkusenosti s exportem dat na server SREALITY pomoci Delphi?
>
>Mirka
Tisk pomoci Canvas.Pixels
[*] Pavol Stugel, NETGraphics <palo(zv)netgraphics.sk> - 19.4.2004 21:47:41
najprv vykresli ak mas tych bodov viac do pomocnej bitmapy a potom do
printer.canvas.draw( ...)
> delam aplikaci s tiskem a potrebuji tisknout vlastni prerusovane a cerchovane cary (bez vyuziti DELPHI stylu). Pouzivam vlastni algoritmy, ktere ale vyuzivaji nastavovani barev pixelu tj. Printer.canvas.pixels[x,y]:=clBlack. Pokud jako vystup pouzivam monitor, nebo PDF, tak je vse v poradku, ale pokud to poslu na tiskarnu, tak se mi bud nic nevytiskne nebo jen sem tam nejaky pixel. predpokladal jsem ze to je asi rozlisenim tiskarny (Jeden Pixel neni zobrazitelny a tak se netiskne), ale pokud jsem zkousel misto jednoho pixelu obarvit vzdy vice dle parametru printer.pageWidth a printer.pageheight, tak byl vysledek stejny.
> Nevite cim to je zpusobene?sReality
[*] Mirka Kincova <mirka.kincova(zv)seznam(tec)cz> - 19.4.2004 19:39:32
Ma tady nekdo zkusenosti s exportem dat na server SREALITY pomoci Delphi?
Mirka
drag drop
[*] Martin Schayna <mschayna(zv)aktis(tec)cz> - 19.4.2004 18:01:20
mato <mato.tino(zv)inmail.sk> wrote:
> mam aplikaciu v ktorej je jedno edit pole na nazov suboru s cestou.
> Aplikacia je zatvorena. Ako urobit aby ak z prieskumnika chytim mysou
> subor a hodim ho na iconu aby sa otvorila a nazov suboru aj s cestou
> sa zapisal do toho pola ?
Tohle je to nejjednodussi -- aplikace se spusti a jako parametr na prikazove
radce dostane nazev souboru vcetne cesty, takze staci osetrit pomoci
ParamStr() a ParamCount.
Martin Schayna
drag drop
[*] mato <mato.tino(zv)inmail.sk> - 19.4.2004 17:19:15
este by som chcel vediet ako urobit :
mam aplikaciu v ktorej je jedno edit pole na nazov suboru s cestou.
Aplikacia je zatvorena. Ako urobit aby ak z prieskumnika chytim mysou subor
a hodim ho na iconu aby sa otvorila a nazov suboru aj s cestou sa zapisal do
toho pola ?
D7
dakujem
Odchytavani std outputu pri spousteni ext aplikace
[*] Jiri Cincura <jiri(zv)cincura(tec)net> - 19.4.2004 16:55:13
Tomas Runa wrote:
> Zdravim,
>
>
>
> Pro %subj% jsem pouzil kod uvedeny v knize P.Vonese 1000 tipu a triku
> v Delphi. Vse fungovalo 100%, ale jen do te doby, nez jsem presel na
> Windows XP.
>
Jestli jsem to pochopil tak yby ti mohla pomoci unita DosCommand. Zkus
google, urcite najdes, jinak se mi ozvi.
--
Jiri Cincura
e-mail: mailto:jiri(zv)cincura.net; mailto:xcincura(zv)informatics.muni(tec)cz
web: http://www.cincura.net; http://cincura.net/photo
Hledani v netridenem poli
[*] Dalibor Toman <dtoman(zv)fortech(tec)cz> - 19.4.2004 16:51:12
----- Original Message -----
From: "Daniel Frantik" <frantik(zv)telpro(tec)cz>
To: <delphi-l(zv)clexpert(tec)cz>
Sent: Monday, April 19, 2004 4:11 PM
Subject: Re: Hledani v netridenem poli
> > -----Original Message-----
> > k tomu hashovani - samozrejme je nesmysl vyrabet stringovy
> > hash. Nabizi se vyrobit hash o delce 8 ci 16 bitu (napriklad
>
> A porovnani jednoho 8-bit/16-bit bude rychlejsi nez porovnani 32 bit
na
> 32-bit procesoru? - to tezko, ne?
ja to snad nekde tvrdil?
ale v tomto pripade se nabizi vyrobit jedno mensi pole (mensi nez 2^32
radku - tedy napriklad 2^8 ci 2^16) a vypocteny hash pouzit primo jako
index do pole. Cili velice rychle jsem schopen omezit mnozinu
prohledavanych integeru (pocet komparaci) jen na ty, ktere maji
konkretni stejny hash. Pri vhodnem rozlozeni cisel a navrhu vypoctu
hashe je vysledkem razantni zkraceni doby prohledavani.
Kapisto?
D. Toman
Hledani v netridenem poli
[*] delphin(zv)post(tec)cz - 19.4.2004 16:31:10
> A porovnani jednoho 8-bit/16-bit bude rychlejsi nez porovnani 32 bit na
> 32-bit procesoru? - to tezko, ne?
Porovnani 8,16 a 32 bitovych cisel trva stejne dlouho, ale v dnesni dobe,
kdy rychlost pameti pokulhava za CPU bude od jisteho poctu cisel viditelny
rozdil mezi nactenim 25%, 50% a 100% dat.MS SQL - pohledy a Delphi
[*] Lstiburek Pavel <lstiburek(zv)ceb(tec)cz> - 19.4.2004 15:43:06
Pro DB neni rozdil mezi tabulkou a view.
View je mozno pouzit vsude kde lze pouzit tabulku.
Napr. tedy TADOTable, TADOQuery, TADODataSet.
Pavel
> From: Ing. Igor Vodicka [mailto:vodicka(zv)sagit(tec)cz]
> Je mozne pres nejakou komponentu, podobne jako pres StoredProc nebo
> ADOStoredProc k ulozenym proceduram, pristupovat k pohledum v
> SQL databazi?
> Chtel bych pohled "zavolat" z klienta (program v Delphi) a
> pak dale pracovat
> s vracenom mnozinou dat v nejakem datasetu. Nevite nekdo jak na to?
> Pouzivam D5 Ent.
Hledani v netridenem poli
[*] Daniel Frantik <frantik(zv)telpro(tec)cz> - 19.4.2004 16:11:08
> -----Original Message-----
> k tomu hashovani - samozrejme je nesmysl vyrabet stringovy
> hash. Nabizi se vyrobit hash o delce 8 ci 16 bitu (napriklad
A porovnani jednoho 8-bit/16-bit bude rychlejsi nez porovnani 32 bit na
32-bit procesoru? - to tezko, ne?
Danik
MS SQL - pohledy a Delphi
[*] Jakub Martinek <listbox(zv)vakmb(tec)cz> - 19.4.2004 15:43:05
> Je mozne pres nejakou komponentu, podobne jako pres
> StoredProc nebo ADOStoredProc k ulozenym proceduram,
> pristupovat k pohledum v SQL databazi?
> Chtel bych pohled "zavolat" z klienta (program v Delphi) a
> pak dale pracovat s vracenom mnozinou dat v nejakem datasetu.
> Nevite nekdo jak na to?
> Pouzivam D5 Ent.
>
> Ing. Igor Vodicka
> informacni systemy
> Nakladatelstvi Sagit
ADOCommand, ADODataSet - SELECT * FROM VIEW, pripadne vybrat v CommadText
editoru (view se tam normalne zobrazuji).
Jakub Martinek
jmartinek(zv)vakmb(tec)cz
Autorizace na linuxovych proxy
[*] Lebeda David <david.lebeda(zv)comarr(tec)cz> - 19.4.2004 15:13:02
> > rad bych se optal linuxaru na tohle: jakou autorizaci byste pouzili
> na
> > linuxovem proxy, kdybyste meli pocit, ze Basic je moc slaba a chteli
> > byste pouzit neco lepsiho? NTLM na linuxu asi nebude, tak hledam, s
> > cim by se dalo v techto pripadech potkat, aby to aplikace umela
> > podporovat.
> >
> zalezi na tom co podporuje Tvoje proxy.
Ahoj,
nejde o moji proxy. Ja mam klientskou aplikaci, kterou ma pouzivat nekolik tisic
zakazniku, kteri maji ruzne proxy servery. Ja se prave ptam, jake autorizace se tak
pouzivaji ve svete linuxovych proxy. Urcite budou existovat spravci linuxovych proxy
serveru, kteri budou mit pocit, ze Basic autorizace je malo bezpecna a budou chtit
pouzit neco jineho. Mne jde jen o to, po cem by v takovem pripade sahli.
Jeste nedavno tu byla skupina linuxaru, kteri se tu ve flamech tolik hlasili k linuxu. Cekal
jsem, ze se dozvim par typu, co oni pouzivaji/preferuji - jakou autentifikacni metodu. Je
tu stale nekdo takovy? Uvitam i informaci, ze Basic autentifikace jim pripada dostacujici.
Zkratka se chci dozvedet jako clovek, ktery o linuxu a na nem provozovanych
produktech prakticky nic nevi, jak se stavi "ortodoxni linuxaci" k otazce autorizace na
proxy.
To Dalibor: za dosud poskytnute info dekuji, beru, predchozi vysvetleni toho, na co se
ptam, patri ostatnim.
Diky
David Lebeda
SPAM Intrcptor ?
[*] mato <mato.tino(zv)inmail.sk> - 19.4.2004 15:07:01
trochu som sa pohrabal po webe a nasiel som toto :
http://technet.idnes(tec)cz/novinky/interceptor031112.html?sablona=clanektxt
Tisk pomoci Canvas.Pixels
[*] Petr Daricek <petr.daricek(zv)seznam(tec)cz> - 19.4.2004 15:05:00
Ahoj,
delam aplikaci s tiskem a potrebuji tisknout vlastni prerusovane a cerchovane cary (bez vyuziti DELPHI stylu). Pouzivam vlastni algoritmy, ktere ale vyuzivaji nastavovani barev pixelu tj. Printer.canvas.pixels[x,y]:=clBlack. Pokud jako vystup pouzivam monitor, nebo PDF, tak je vse v poradku, ale pokud to poslu na tiskarnu, tak se mi bud nic nevytiskne nebo jen sem tam nejaky pixel. predpokladal jsem ze to je asi rozlisenim tiskarny (Jeden Pixel neni zobrazitelny a tak se netiskne), ale pokud jsem zkousel misto jednoho pixelu obarvit vzdy vice dle parametru printer.pageWidth a printer.pageheight, tak byl vysledek stejny.
Nevite cim to je zpusobene?
Petr Daricek
MS SQL - pohledy a Delphi
[*] Ing. Igor Vodicka <vodicka(zv)sagit(tec)cz> - 19.4.2004 15:02:59
Ahoj vsichni!
Je mozne pres nejakou komponentu, podobne jako pres StoredProc nebo
ADOStoredProc k ulozenym proceduram, pristupovat k pohledum v SQL databazi?
Chtel bych pohled "zavolat" z klienta (program v Delphi) a pak dale pracovat
s vracenom mnozinou dat v nejakem datasetu. Nevite nekdo jak na to?
Pouzivam D5 Ent.
Ing. Igor Vodicka
informacni systemy
Nakladatelstvi Sagit
sockety a vlakna
[*] Martin Pisarik <martin.pisarik(zv)seznam(tec)cz> - 19.4.2004 14:56:58
Mam dotaz. Pokud pouzivam TClientSocket a TServerSocket pro komunikaci, jak
se to chova ve smyslu vlaken (pokud mam nastaveno ServerType=stNonBlocking).
Konkretne me zajima toto:
Muze se stat, ze je prerusena cinnost hlavniho vlakna (treba delsi obsluha
udalosti po stisku tlacitka) jen kvuli tomu, ze nastala udalost OnRead
zmineneho socketu?
Nekde jsem totiz cetl, ze sockety bezi v jinych nezavislych vlaknech, ale
moc jsem to nepochopil. Chci mit jistotu, tak se ptam.
Dik za odpoved.
normalizace databazi adresare
[*] Vlastimil Bardon <bardon(zv)akord-soft(tec)cz> - 19.4.2004 14:30:56
Upozornuji na par skutecnosti:
1) Pod jednim PSC muze existovat vice obci - existuje ciselnik obci dosazitelny tusim na ministerstvu vnitra - pres tento ciselnik pak lze jednoznacne nazvy obci dostat, ale z PSC nikoli
2) Nevim o jaky adresar jde, ale obecne kazda firma muze mit nekolik adres. Nejcasteji potrebujes adresy pro fakturaci a k tomu se vytvari tabulka fakturacnich mist (s vazbou na firmu) a adresy pro dotucovani nejakych dodavek a k tomu se vytvaru tabulka dodacich mist (s vazbou na firmu). Ale mohou existovat i dalsi adresy (napriklad korespondencni)
3) Ne vzdy je nezbytne dodrzovat prisne normalizaci. Obecne plati, ze normalizovany tvar je efektivnejsi pri zapisu udaju, denormalizovany pri vyhledavani. Takze bys mel znat, kde budou vetsi naroky na vykon aplikace a podle toho se rozhodovat. (Ja bych ale asi spise volil normalizovany tvar, je to u me sila zvyku...)
-----Original Message-----
From: Slavomir Skopalik [mailto:skopalik(zv)elektlabs(tec)cz]
Sent: Monday, April 19, 2004 12:13 PM
>
> delam novy projek jehoz soucasti je i jednoduchy adresar,
> chtel bych se zeptap zda je lepsi psc a mesto dat primo do
> tabulky s firmou nebo do nejake pomocne (je dost adres z
> jednoho mesta) a to same s ico a dic (spousta adres to nema)
> nebo by to bylo uz moc normalizovane
>
> database jsou Access a MSSQL
Autorizace na linuxovych proxy
[*] Dalibor Toman <dtoman(zv)fortech(tec)cz> - 19.4.2004 14:08:54
> Ahoj,
>
> rad bych se optal linuxaru na tohle: jakou autorizaci byste pouzili
na
> linuxovem proxy, kdybyste meli pocit, ze Basic je moc slaba a chteli
> byste pouzit neco lepsiho? NTLM na linuxu asi nebude, tak hledam, s
> cim by se dalo v techto pripadech potkat, aby to aplikace umela
> podporovat.
>
zalezi na tom co podporuje Tvoje proxy. Pokud pouzivas squida tak ten
pokud se nepletu NTLM umi (mozna se musi dodat jako patch).
Jinak RFC sice definuje nejake bezpecnejsi metody, ale nikdy jsem je
nevidel na vlastni oci v realnem provozu (to samozrejme neznamena, ze
se nepouzivaji :-) )
D. Toman
SPAM Intrcptor ?
[*] KALUS Jozef <jozef.kalus(zv)spordat.sk> - 19.4.2004 14:04:53
ja tiez, vobec netusim co to je, a podla popisu mi nie je celkom jasne
preco to pinda :o(
joka
>dobry, dostali ste mail od
>
>Spam Interceptor Email Authentication
>
>co to ma byt ?OT: SPAM Intrcptor ?
[*] mato <mato.tino(zv)inmail.sk> - 19.4.2004 13:44:51
dobry, dostali ste mail od
Spam Interceptor Email Authentication
co to ma byt ?
drag drop
[*] mato <mato.tino(zv)inmail.sk> - 19.4.2004 13:30:47
vdaka, funguje to
Ale ma zarazilo ze som ohladom tejto spravy v helpe D7 nic nenasiel. Help
take nieco nepozna.
Este aby som tomu aj trochu chapal. Hlavne co spusti WMDropFiles
Mam tomu rozumiet tak ze zapis v private :
procedure WMDropFiles(var Msg: TMessage); message WM_DROPFILES;
sposobi ze sprava message WM_DROPFILES spusti proceduru WMDropFiles ?
kde sa dostanem k popisu dalsich zprav ?
> 14.4.2004 mato:
> > zdravim,
>
> > mam aplikaciu a v nej pole edit kde musim zadat meno suboru s cestou.
Ako
> > urobit aby som mohol prehodit subor rovno s WindowsComandera ?
> > D7
>
> Osetrit si zpravu WM_DROPFILES
> private
> procedure WMDropFiles(var Msg: TMessage); message WM_DROPFILES;
>
> implementation
> procedure TForm1.WMDropFiles(var Msg: TMessage);
> var
Zjisteni konkretniho fontu
[*] Vit Vaculik <vacuv3as(zv)vsmie(tec)cz> - 19.4.2004 13:20:46
Zdravim,
mam jeste jeden problem. Mozna je to jednoduchy, ale
nevim jak zjistit, zda-li je v systemu nainstalovany font ' MS Sans Serif '.
Da se k tomuto ucelu pouzit Win32 API fce Gettextface a jak ? Diky za pomoc - Vit.
Odchytavani std outputu pri spousteni ext aplikace
[*] Tomas Runa <t.runa(zv)cleverbee(tec)com> - 19.4.2004 13:04:44
Zdravim,
Pro %subj% jsem pouzil kod uvedeny v knize P.Vonese 1000 tipu a triku v Delphi. Vse fungovalo 100%, ale jen do te doby, nez jsem presel na Windows XP.
Nemate nekdo podobne zkusenosti, pripadne nejake reseni?
diky
Tomas Runa
Software Engineer
Cleverbee s.r.o.
Nadrazni 56, 150 00 Praha 5
t.runa(zv)cleverbee.com
Standard input / output
[*] Sebesta Jan <sebesta(zv)cube(tec)cz> - 19.4.2004 12:34:41
Zdravim vsechny,
Prosim o pomoc nekoho, kdo ma zkusenost se standard input/output.
Presneji:
Posilam pres consoli (generate console application) prikazy do jine
aplikace (genesis) a cekam co mi aplikace odpovi...
Do posledni verze aplikace genesis vse chodilo skvele. Bohuzel v nove verzi
je vse v prde... Vyrobce tvrdi, ze v tomto nic nezmenil a ze mam chybu nekde
ja a nechce slyset na to, ze ten stejny exe ve stare verzi jde a v nove ne.
Pokud neco poslu tak to aplikace genesis provede ale moje aplikace ztroskota
na rakdu Read(Input,A). Dojede sem a ceka a ceka ... repeat neprobiha.
Genesis by mela po vykonani prikazu vracet vysledky,ale dle meho nic
nevraci.
Takze konecne moje otazka:
Lze nejak monitorovat nebo zjistit, zda aplikace "neco" posila do console?
Jak to jinak cist nez pomoci Read(Input,A)?
Var A:Char;
COM_Status:String;
...
write(DIR_PREFIX+TEXT+chr(10));
// DIR_PREFIX='(zv)%#%(zv)' aby aplikace vedela, ze to je pro ni // chr(10)
pro ukonceni radku Flush(Output); // cteni vraceneho argumentu repeat //
dokud neni konec radku chr(10)
Application.ProcessMessages;
Read(Input,A);
If Ord(A)<>10 then COM_Status:=COM_Status+A; until (Ord(A)=10); ...
Dekuji za pomoc
Jan Sebesta
Hook na minimize ?
[*] Jiri Betunak <kindrik(zv)centrum(tec)cz> - 19.4.2004 12:16:39
Hello delphi-l,
Nevi te , nebo neresili jste prosim nekdo jak odchytit spravu jine
aplikace o tom ze se minimalizuje ?
neco jako tohle ale pro vsechny spustene aplikace v systemu
{
private
{ Private declarations }
procedure WMSyscommand(var msg: TWmSysCommand); message WM_SYSCOMMAND;
procedure WMSize( Var msg: TWMSize ); Message WM_SIZE;
end;
var
Form1: TForm1;
implementation
{$R *.dfm}
procedure TForm1.WMSyscommand(var msg: TWmSysCommand);
begin
case (msg.CmdType and $FFF0) of
SC_MINIMIZE: begin
ShowMessage('Window about to MINIMIZE');
end;
SC_RESTORE : begin
ShowMessage('Window about to RESTORE');
end;
SC_MAXIMIZE: begin
ShowMessage('Window about to MAXIMIZE');
end;
end;
inherited;
end;
}
Predem dekuji za jakoukoliv pomoc
--
Best regards,
Jiri mailto:kindrik(zv)centrum(tec)cz
ICQ#: 265297587
__________________________________________________________________
normalizace databazi adresare
[*] Slavomir Skopalik <skopalik(zv)elektlabs(tec)cz> - 19.4.2004 12:12:39
Spatny polozeny dotaz.
Slavek
PS: Musis specifikovat, jak se bude s daty zachazet a pak ti to vyjde
samo i bez poucek.
Napriklad pokud ocekavas, ze se budou casto prejmenovavat mesta, ulice
atd, tak by mely byt
normalizovane (aby se operace provedla jen jednou).
Nebo pokud budes vybirat firmy podle mesta atd.
Jen na zaklade dat se o tomm neda nic rici.
> zdravim
>
> delam novy projek jehoz soucasti je i jednoduchy adresar,
> chtel bych se zeptap zda je lepsi psc a mesto dat primo do
> tabulky s firmou nebo do nejake pomocne (je dost adres z
> jednoho mesta) a to same s ico a dic (spousta adres to nema)
> nebo by to bylo uz moc normalizovane
>
> database jsou Access a MSSQL
normalizace databazi adresare
[*] Jakub Martinek <listbox(zv)vakmb(tec)cz> - 19.4.2004 12:08:38
> delam novy projek jehoz soucasti je i jednoduchy adresar,
> chtel bych se zeptap zda je lepsi psc a mesto dat primo do
> tabulky s firmou nebo do nejake pomocne (je dost adres z
> jednoho mesta) a to same s ico a dic (spousta adres to nema)
> nebo by to bylo uz moc normalizovane
>
> database jsou Access a MSSQL
U malych a zcela autonomnich apl. je asi lepsi pro vyhledani a vyber PSC
udrzovat samostatny ciselnik, ale jinak ukladat vse k firme (spousta firem
ma vlastni PSC). Pokud pouzijete UIR-ADR je vhodnejsi vyuzit jeho struktury
a v aplikaci osetrit vyjimky.
ICO a DIC nema take cenu udrzovat samostatne (pouzit varchar).
Jakub Martinek
jmartinek(zv)vakmb(tec)cz
Jak programove zmenit kurzor na animovany?
[*] Vlastimil Bardon <bardon(zv)akord-soft(tec)cz> - 19.4.2004 11:56:36
Pouzival jsem ...
Const
crHledani = 1 ;
nekde v kodu...
Screen.Cursors[ crHledani ] := LoadCursor( HINSTANCE, 'HLEDANI') ;
Screen.Cursor := crHledani ;
.... funguje to, ale jestli je to spravne, to nevim
-----Original Message-----
From: vacuv3as(zv)vsmie(tec)cz [mailto:vacuv3as(zv)vsmie(tec)cz]
Sent: Wednesday, April 14, 2004 8:12 PM
To: delphi-l(zv)clexpert(tec)cz
Subject: Jak programove zmenit kurzor na animovany?
Zdravim konferenci,
nevite nekdo, prosim, jestli je mozne programove zmenit standartni kurzor v me
aplikaci za vlastni animovany. Pokud ano, rad bych vedel, jakym zpusobem a jak
tuto zmenu vratit zpet. Lze pripojit vlastni animovany kurzor k aplikaci pomoci
resource souboru?
Diky za pripadnou pomoc - Vit.normalizace databazi adresare
[*] Fitz Ladislav <ladislav.fitz(zv)kodytek(tec)cz> - 19.4.2004 11:40:34
zdravim
delam novy projek jehoz soucasti je i jednoduchy adresar, chtel bych se
zeptap zda je lepsi psc a mesto dat primo do tabulky s firmou nebo do nejake
pomocne (je dost adres z jednoho mesta) a to same s ico a dic (spousta adres
to nema) nebo by to bylo uz moc normalizovane
database jsou Access a MSSQL
Autorizace na linuxovych proxy
[*] Lebeda David <david.lebeda(zv)comarr(tec)cz> - 19.4.2004 10:58:30
Ahoj,
rad bych se optal linuxaru na tohle: jakou autorizaci byste pouzili na
linuxovem proxy, kdybyste meli pocit, ze Basic je moc slaba a chteli
byste pouzit neco lepsiho? NTLM na linuxu asi nebude, tak hledam, s
cim by se dalo v techto pripadech potkat, aby to aplikace umela
podporovat.
Diky
David Lebeda
Nejaky novy zaznam do PopUp menu v Prieskumnikovi
[*] Rastislav Lazan <lazan(zv)davidplus.sk> - 19.4.2004 10:14:21
Rad by som vedel, ako pridam do PopUp menu, ktore sa mi zobrazuje kliknutim
praveho tlacitka mysky v Prieskumnikovi (alebo inom Commanderi) na ZIP subor
novy zaznam, do ktoreho si zapisem nejaku akciu.
Dakujem.
Rastislav Lazan
lazan(zv)davidplus.sk
WinInet a NTLM
[*] Lebeda David <david.lebeda(zv)comarr(tec)cz> - 19.4.2004 10:16:22
Ahoj,
na strankach Microsoftu jsem nasel nejake navody na pouziti WinInet
API pro relizaci prace s HTTP protokolem. Je tam i ukazka reseni v
pripade pouziti proxy vyzadujiciho autorizaci. Existuji API funkce,
kterymi se nastavi jmeno a heslo pro proxy. Ale resi pouziti WinInet i
autorizaci NTLM? Rad bych dosahl toho, aby uzivatel me aplikace
musel vedet jmeno a heslo pro proxy, ale aby ho nemusela zajimat
metoda autorizace. Pomuzou mi k tomu WinInet funkce nebo bych
NTLM autorizaci stejne musel obslouzit nejak po svem?
Diky
David Lebeda
Jak najit nasledujici komponentu?
[*] Jaromir Cermak <cermak(zv)procom(tec)cz> - 19.4.2004 10:28:27
Ahoj vsichni
Mam takovy dotaz. Potreboval bych v kodu komponenty zjistit, zda ma nejakeho naslednika, tj. na jakou komponentu se posunu kdyz stisknu klavesu tab, pripadne potrebuju zjistit ze takova komponenta neexistuje. Metoda Find NextControl vraci v obou pripadech nil. Predem diky za radu.
Jaromir Cermak
IB/FB a zpusob zalohovani
[*] petr palicka <palicka.petr(zv)seznam(tec)cz> - 19.4.2004 10:22:25
Ahoj,
me IBX TIB(Backup|Restore)Service funguje jak
s FB 1.0.2 tak s FB 1.5. Pouzivam IBX 6.05 a
je dostupna verze min. 6.08 (ale tam jsem mel
nejake potize s TIBDataSetem).
Peca
Vypnuti XPMam pro jednu komponentu
[*] KALUS Jozef <jozef.kalus(zv)spordat.sk> - 19.4.2004 09:02:15
na tuto DLL by som sa velmi nespoliehal, pretoze existuje jej nahrada
(nejaka uprava), kde potom funguju aj ine themes, osobne som to skusal a
prave tuto knihovnu som musel vymenit za nejaku od tretej strany, ale
ake upravy v nej su to naozaj neviem, ja len, ze by som sa na nu vo
svojich programoch velmi nespoliehal, skus si dat naist na google
uxtheme, mozno ta to hodi na ten navod ako to vymenit a mrkni sa na to
co o tom pisu
joka
>Ahoj, nevite nekdo jak vypnout XP Manifest pro jednu
>komponentu, dle meho patrani jsem zjistil ze to jde nejak
>pres knihovnu uxtheme.dll v system32, otazka jak s tim
>pracovat?, nedelal jste s tim nekdo ? dik
>
>D7,8 WXPHme
>Radek Szurman
>
>
>
Vypnuti XPMam pro jednu komponentu
[*] Radek Szurman <surad(zv)digijoe(tec)com> - 19.4.2004 08:36:13
Ahoj, nevite nekdo jak vypnout XP Manifest pro jednu komponentu, dle meho patrani jsem zjistil ze to jde nejak pres knihovnu uxtheme.dll v system32, otazka jak s tim pracovat?, nedelal jste s tim nekdo ? dik
D7,8 WXPHme
Radek Szurman
ActionMainMenuBar a MDI aplikace
[*] Milan Tomes <delphi(zv)haida(tec)cz> - 19.4.2004 08:22:12
Ano je pravda, ze uzivatele reaguji na vizualni stranku aplikace (nekdy je
to samozrejme na ukor funkcnosti). Na druhou stranu - devExpress komponenty
nejsou nikterak levne (nas staly cca. 20000 Kc), ale usetri neskutecne mnoho
prace. Bohuzel mi treba chybela moznost ukladani nastaveni gridu do streamu,
takze jsem to musel dodelat sam a ke vsi spokojenosti. Nicmene tyto
komponenty jsou opravdu spicka. Kdyz si jen pomyslim, co prace mi usetrily u
uzivatelu (ne - tento sloupec nechceme - my chceme jiny :)))) tak je tato
investice celkem mala :)))))) Bylo by opravdu krasne, kdyby jejich toolbary
fungovali korektne i na dedenych formularich... Nic neni dokonale...
S pozdravem
Milan Tomes
> [mailto:delphi-l-owner(zv)clexpert(tec)cz]On Behalf Of Pavel Malinsky
> Sent: Monday, April 19, 2004 7:42 AM
>
> :)) Napodobne, bohuzel uzivatele silne reaguji treba prave na ksicht
> Office 2003, stromeckove gridy, vertikal gridy a mnoho dalsiho.
> Problem s dedenim nepoterebuju resit, takze volba padla prave
> na koupi DevExpress (a zatim s par vyhradami k plne spokojenosti).ActionMainMenuBar a MDI aplikace
[*] Pavel Malinsky <malinsky(zv)pmcom(tec)cz> - 19.4.2004 07:42:08
> -----Original Message-----
> From: delphi-l-owner(zv)clexpert(tec)cz
> [mailto:delphi-l-owner(zv)clexpert(tec)cz] On Behalf Of Milan Tomes
>
> Osobne doporucuji uplne se vykaslat na tyhle nove veci a
> pouzit klasicky
> TToolbar a je po starosti. Pokud Ti nevadi problem s dedenim,
> tak bych s
> klidem komponenty od devExpress pouzil. Mam koupeny cely
:)) Napodobne, bohuzel uzivatele silne reaguji treba prave na ksicht
Office 2003, stromeckove gridy, vertikal gridy a mnoho dalsiho.
Problem s dedenim nepoterebuju resit, takze volba padla prave
na koupi DevExpress (a zatim s par vyhradami k plne spokojenosti).
S pozdravem a dikem
=====================================
> Pavel Malinsky; malinsky(zv)pmcom(tec)cz <
=====================================
> GSM: 602 652 203 | ICQ: 322015967 <
=====================================
sinea - nestaci pamet
[*] Milan Tomes <delphi(zv)haida(tec)cz> - 19.4.2004 07:06:05
Na ten problem jsem poukazoval ja, ale nebyl to problem, ktery by se
projevil na takto malinkem mnozstvi dat (soude dle poctu zaznamu, ktere
posilal puvodni autor dotazu). Tato chyba se tykala vyberu cca. 100.000 -
250.000 zaznamu.
To Kacka SW: Poslete prosim jak velke vety (v byte) tahate do datasetu a
kolik zaznamu takto vyberete.
S pozdravem
Milan Tomes
> [mailto:delphi-l-owner(zv)clexpert(tec)cz]On Behalf Of Vaclav Krmela
> Sent: Sunday, April 18, 2004 3:39 PM
>
> Asi pred deseti dny tady probehla diskuze
> pod subjetem "Komponenty pre FB",
> kde nekdo poukazoval na problem nekterych
> datovych komponent s velkym poctem zaznamu.
> Nemuze byt problem v tom?IBExpert-vymazani tabulky
[*] Sztemon Martin <martin.sztemon(zv)logikon(tec)cz> - 19.4.2004 07:04:05
Drop Table
> Zdravim vsechny a pro odlehceni tady mam jednu zacatecnickou...
>
> Pripadam si uz trochu jako pitomec a mnozi moje podezreni pravdepodobne
> potvrdi.. Zkratka par desitek minut tady uz dumam nad tim, jak v IB
> Expert smazat vytvorenou tabulku v gdb. S tou tabulkou si samozrejme
> poradim z Delphi, ale... musi to byt strasne jednoduchy a uz me nic
> nenapada.
>
> Dekuji moc,
>
> Lada
>
>
>
ActionMainMenuBar a MDI aplikace
[*] Milan Tomes <delphi(zv)haida(tec)cz> - 19.4.2004 07:02:04
Osobne doporucuji uplne se vykaslat na tyhle nove veci a pouzit klasicky
TToolbar a je po starosti. Pokud Ti nevadi problem s dedenim, tak bych s
klidem komponenty od devExpress pouzil. Mam koupeny cely balik komponent
(gridy, grafy, toolbary atd..) a jsou to hodne kvalitni kousky. Nedavno jsem
delal nejake upravy do gridu a nebyl problem po nich prelouskat zdrojak. :)
S pozdravem
Milan Tomes
> [mailto:delphi-l-owner(zv)clexpert(tec)cz]On Behalf Of Pavel Malinsky
> Sent: Friday, April 16, 2004 6:22 PM
>
> jasne beru, ale co teda prosimte pouzivas ci navrhujes
> k pouziti (bez ohledu na free ci komercni) ?IB/FB a zpusob zalohovani
[*] Pavel Cisar <pcb(zv)atlas(tec)cz> - 18.4.2004 21:07:24
Haj hou!
On 18 Apr 2004 at 15:06, Ludek Paral wrote:
> nasledujici kod je plne funkcni pro IB6.0 , ale nejede pro FB 1.02. Mam
> D5/IBX4.4
Mozna by bylo vhodne aktualizovat IBX. Jinak neni mnoho duvodu, proc
by ServiceAPI nemelo fungovat na Firebirdu (rada nastroju jako
IBExpert ho pouziva bez problemu).
S pozdravem
Pavel Cisar (ICQ: 89017288)
Mobil: 724 281429
http://www.ibphoenix(tec)cz
Vse co potrebujete pro Firebird a InterBase
ADMIN: OT: spam interceptor
[*] Petr Zahradnik <clexpert(zv)clexpert(tec)cz> - 18.4.2004 20:19:20
Puvodni zprava ze dne 18.4.2004:
> Zdar, po odeslani me posledni (unita na kodovani textu) zpravy mi prisel
> nasledujici mail (ktery ma velmi prapodivnou hlavicku) s timto obsahem:
Jiste, jeste nekolikrat to sem posli...
Petr Zahradnik, pocitacovy expert
==========================================================
Petr Zahradnik, Computer Laboratory
web: http://www.clexpert(tec)cz, e-mail: clexpert(zv)clexpert(tec)cz
==========================================================
OT: spam interceptor
[*] Bronislav Klucka <bronislav.klucka(zv)pro2-soft(tec)com> - 18.4.2004 19:29:16
Zdar, po odeslani me posledni (unita na kodovani textu) zpravy mi prisel
nasledujici mail (ktery ma velmi prapodivnou hlavicku) s timto obsahem:
Od: Spam Interceptor
Predmet:Re: unita na kodovani textu
Text:
****************************
Bronislav Klucka,
This is Sip. I am running Spam Interceptor to get rid of junk email. Please
follow this link to verify that the message you sent me isn't junk email.
http://si20.com/auth?uid=828&mid=13948&sid=bronislav.klucka%40pro2-soft.com
Your email was intercepted because it got a spam rating of 5.4 and I set
Spam Interceptor to ask everyone who sends me a message rated over 2 to
authenticate. When you authenticate I'll receive your email and you'll never
have to authenticate for me again, no matter what spam rating your emails
get.
Thanks,
Sip
_______________________________________________________________
For more information on Spam Interceptor go to http://si20.com
****************************
ted vaham, zda to je ADMINuv spam filter, nebo nejaka bota.... nevite o tom
nekdo neco?
Brona
Integer to 32bit
[*] Petr Vones <pvones(zv)vol(tec)cz> - 18.4.2004 15:44:56
From: "Martin Kasman" <martinkasman(zv)martinkasman.sk>
> Potrebujem do hlavicky dbf subor podla predpisaneho formatu na pat znakov
> ulozit pocet zaznamov v 32 bitovom formate.
A vysledkem ma byt presne co ?
Petr Vones
sinea - nestaci pamet
[*] Vaclav Krmela <krmela(zv)ustinadorlici(tec)cz> - 18.4.2004 15:38:55
> From: Kacka software
>
> Sestava telo nema. Ma pouze zacatky a konce skupin.
> Celkem dve skupiny a
> zacatku jsou tri udaje a v koncich jsou tri nesouctovane
> a ctyri souctovane.
Za takove situace by pro Sineu nemel byt problem
sto tisic zaznamu.> Na cem zavisi pamet. Na poctu zanamu v tabulce -
> tak se mi to aspon jevi a nebo pouze na predloze?
Pokud sestava obsahuje pouze textove prvky,
muze se pocitat asi 300 Byte na kazdy prvek
ve vystupni sestave. U jednoduchych grafickych prvku
to je trochu vic. U obrazku zavisi na jejich velikosti.
Pokud dojde volna pamet, zacne se odkladat na disk.
To se projevi pouze vyraznym zpomalenim tvorby
sestavy. Nikdy to ale nevede k vyjimce.
Asi pred deseti dny tady probehla diskuze
pod subjetem "Komponenty pre FB",
kde nekdo poukazoval na problem nekterych
datovych komponent s velkym poctem zaznamu.
Nemuze byt problem v tom?
Vaclav Krmela
volani metod pomoci jejich jmena
[*] Jan Rizek <jan_rizek(zv)centrum(tec)cz> - 18.4.2004 15:20:52
je mozne zavolat metodu objektu podle jejiho jmena?
neco jako: Execute(MujObjekt,'moje_metoda');
hledam neco podobneho jako jsou funkce v TypInfo - napr. SetOrdProp a poidobne.. ale pro metody objektu..
netusite nekdo?
JR
IB/FB a zpusob zalohovani
[*] Ludek Paral <ludek.paral(zv)quick(tec)cz> - 18.4.2004 15:06:50
Ahoj,
nasledujici kod je plne funkcni pro IB6.0 , ale nejede pro FB 1.02. Mam
D5/IBX4.4
with TIBBackupService.Create(nil) do
try
if uppercase(Server) <> 'LOCALHOST' then Protocol := TCP
else Protocol := Local;
ServerName := Server;
LoginPrompt := False;
Params.Add('user_name=SYSDBA');
Params.Add('password=masterkey');
Active := True;
try
Options := [IgnoreLimbo];
DatabaseName := gdbpath;
BackupFile.Add(Dest_Dir + Dest_File + '.gbk');
ServiceStart;
while not Eof do
GetNextLine;
....
myslel jsem si, ze TIBBackupService pojede jak pro IB, tak pro FB. V knize
od Pavla Cisare je sice receno pouzivat zasadne gbak/gfix, asi holt na tom
neco bude...
Dik za info
Ludek
spam interceptor
[*] Petr Zahradnik <clexpert(zv)clexpert(tec)cz> - 18.4.2004 14:46:47
Puvodni zprava ze dne 18.4.2004:
> Od: Spam Interceptor
> ted vaham, zda to je ADMINuv spam filter, nebo nejaka bota.... nevite o tom
> nekdo neco?
Kdyz vahas, jestli je to neco ode me, tak opravdu nechapu, proc se
nezeptas primo me, ale ptas se 800 ostatnich lidi. Jinak ode me to
neni, coz se da snadno zjistit uz z toho mailu, a neni treba se ptat.
Petr Zahradnik, pocitacovy expert
==========================================================
Petr Zahradnik, Computer Laboratory
web: http://www.clexpert(tec)cz, e-mail: clexpert(zv)clexpert(tec)cz
==========================================================
unita na kodovani textu
[*] Karolina Nemanska <lafidek(zv)seznam(tec)cz> - 18.4.2004 14:44:47
v synapsi...
Karolina
> Zdar, nevite nekdo o unite na kodovani textu? resp. na prevod.. dam tam
text
> a unita ho prevede. napr:
> konvert('Nejaky text','windows-1250','utf-8');
>
> Brona
OT: spam interceptor
[*] Bronislav Klucka <bronislav.klucka(zv)pro2-soft(tec)com> - 18.4.2004 14:36:45
Zdar, po odeslani me posledni (unita na kodovani textu) zpravy mi prisel
nasledujici mail (ktery ma velmi prapodivnou hlavicku) s timto obsahem:
Od: Spam Interceptor
Predmet:Re: unita na kodovani textu
Text:
****************************
Bronislav Klucka,
This is Sip. I am running Spam Interceptor to get rid of junk email. Please
follow this link to verify that the message you sent me isn't junk email.
http://si20.com/auth?uid=828&mid=13948&sid=bronislav.klucka%40pro2-soft.com
Your email was intercepted because it got a spam rating of 5.4 and I set
Spam Interceptor to ask everyone who sends me a message rated over 2 to
authenticate. When you authenticate I'll receive your email and you'll never
have to authenticate for me again, no matter what spam rating your emails
get.
Thanks,
Sip
_______________________________________________________________
For more information on Spam Interceptor go to http://si20.com
****************************
ted vaham, zda to je ADMINuv spam filter, nebo nejaka bota.... nevite o tom
nekdo neco?
Brona
unita na kodovani textu
[*] Lukas Gebauer <gebylist(zv)mlp(tec)cz> - 18.4.2004 14:16:43
> Zdar, nevite nekdo o unite na kodovani textu? resp. na prevod.. dam tam
> text a unita ho prevede. napr: konvert('Nejaky
> text','windows-1250','utf-8');
Stahni si Synapsi, a podivej se na unitu synachar.pas. Najdes tam funkci,
ktera presne odpovida tve touze. ;-)
--
Lukas Gebauer.
E-mail: gebauerl(zv)mlp(tec)cz
WEB: http://www.ararat(tec)cz/synapse - Synapse Delphi and Kylix TCP/IP
Library
unita na kodovani textu
[*] Bronislav Klucka <bronislav.klucka(zv)pro2-soft(tec)com> - 18.4.2004 14:12:42
Zdar, nevite nekdo o unite na kodovani textu? resp. na prevod.. dam tam text
a unita ho prevede. napr:
konvert('Nejaky text','windows-1250','utf-8');
Brona
Graf do ISAPI
[*] Petr Vones <pvones(zv)vol(tec)cz> - 17.4.2004 23:27:44
From: "Jiri Virt" <virt(zv)volny(tec)cz>
> jak strcit graf do ISAPI aplikace? Jde to nebo to musim delat pres object
Pouzij TChart.
Petr Vones
sinea - nestaci pamet
[*] Kacka software <kackasw(zv)kackasw(tec)cz> - 17.4.2004 21:11:35
> > From: Kacka software
> >
> > Mam tabulku asi 50 udaju a asi 20 000 zaznamu. Delam nekolik
> > sestav ruzne tridene a ruzne souctovane.
> > U nekterych sestav to nacte od 9500 do 12 000 zaznamu a padne
> > na nedostatek pameti. Nektere udela cele. Pocet zaznamu,
> > ktere nacte je u kazde sestavy jiny. Pokud pouziji tabulku
> > asi s 8 000 zaznamu, tak je vse v poradku u vsech sestav.
>
> O jake verze Windows a Siney se jedna?
> Kolik je k dispozici systemovych prostredku pred zahajenim
> tvorby sestavy?
> Jak slozita je predloha, kolik prvku je v jednom tele sestavy,
> obsahuje telo obrazky?
>
> Vaclav Krmela
>
Win XP, sinea je lonska - v cervenu ci v cervenci upgradovana.
nasleduje opis vyuziti pameti
SiSoftware Sandra
System Memory Summary
Total System Memory : 1762MB
Free System Memory : 1240MB, 70%
Total Physical Memory : 511MB
Free Physical Memory : 208MB, 41%
Maximum Page File : 1251MB
Page File Size : 740MB
Free Page File : 1031MB, 82%
Page File : C:\pagefile.sys 768 1536
PSE36 - 36-bit Page Size Extension : No
Maximum System Pages : 798720
Kernel Statistics
Total Processes : 31
Total Threads : 309
Total Open Handles : 5716
Kernel Memory Information
Total Memory : 57MB
Paged Memory : 39MB
Non-Paged Memory : 17MB
Page Commit Charge Statistics
Total Committed : 56264
Peak Commits : 64961
Maximum Commits : 320253
Extended Memory Information
Allocated Memory Load : 59%
nikde nevidim, ze by skutecne pamet nestacila.
Sestava telo nema. Ma pouze zacatky a konce skupin. Celkem dve skupiny a
zacatku jsou tri udaje a v koncich jsou tri nesouctovane a ctyri souctovane.
Na druhe sestave, ktera z teto vychazi - ma pouze je jednu skupinu - pamet
staci.
Je zvlastni, ze na sestavu, ktera ma v tele 283 udaju pamet staci.
Na cem zavisi pamet. Na poctu zanamu v tabulce - tak se mi to aspon jevi a
nebo pouze na predloze?
Pokud to pomuze, mohu predlohu poslat.
Dik Radek
IBExpert_table_rename
[*] Jaroslav Uher <jarek(zv)iuher(tec)cz> - 17.4.2004 15:21:10
On 17 Apr 2004 at 2:56, Ladislav Novak wrote:
> Tak se tedy moc omlouvam za predchozi dotaz.. Tabulka smazana, ale
> poradi nekdo jak jednoduse v IB Expert tabulku prejmenovat...? Asi
> musi byt nejaky dobry duvod proc v kontextovem menu k jednotlivym
> tabulkam neni funkce 'rename'..?
obavam se, ze duvod je jediny.
SQL nezna Rename
Doporucuji nejprve nastudovat zakladni prikazy jazyka SQL (Create,
Drop, Alter ap.) a radeji vse psat jako scipt a ten v IBExpert potom
spoustet.
SQL databazi nenaklikas.
Pokud potrebujes zmenit strukturu tabulky, pouzij ALTER TABLE.
Kdyz jsi ji nestastne pojmenoval DROP a nasledne CREATE.
Na zachranu dat pred tim, nez ji DROP (nes) muzes v IBExpert pouzit
"Export data into Script".
Jarek Uher
pocet Timer-u v Delphi (win)
[*] Jan Fiala <jan.fiala(zv)wo(tec)cz> - 17.4.2004 05:50:33
15.4.2004 Petr Vones:
> Pocet timer je omezen systemem, tusim na cca 1000. Nicmene neni duvod mit vice
> jak jeden timer v cele aplikaci jako "casovou zakladnu" a z neho pak generovat
> udalosti pomoci vlastnich counteru.
Popr. pouzit nejakou nahradu, treba SimpleTimer, ktera pracuje jinym
zpusobem a "nezabira" Timery v systemu, ale je jeste vic nepresna nez
TTimer
--
Jan Fiala
mailto:jan.fiala(zv)wo(tec)cz
IBExpert_table_rename
[*] Ladislav Novak <lada.xt(zv)volny(tec)cz> - 17.4.2004 02:56:21
Tak se tedy moc omlouvam za predchozi dotaz.. Tabulka smazana, ale
poradi nekdo jak jednoduse v IB Expert tabulku prejmenovat...? Asi musi
byt nejaky dobry duvod proc v kontextovem menu k jednotlivym tabulkam
neni funkce 'rename'..?
Mozna zacinam byt unavny, ale snazim se s tim naucit a nejak se nedari..
Moc dekuji,
Lada
IBExpert-vymazani tabulky
[*] Ladislav Novak <lada.xt(zv)volny(tec)cz> - 17.4.2004 01:24:15
Zdravim vsechny a pro odlehceni tady mam jednu zacatecnickou...
Pripadam si uz trochu jako pitomec a mnozi moje podezreni pravdepodobne
potvrdi.. Zkratka par desitek minut tady uz dumam nad tim, jak v IB
Expert smazat vytvorenou tabulku v gdb. S tou tabulkou si samozrejme
poradim z Delphi, ale... musi to byt strasne jednoduchy a uz me nic
nenapada.
Dekuji moc,
Lada
shellexecute - vyreseno
[*] prgx(zv)email(tec)cz - 16.4.2004 23:40:07
Diky za rady.
Spravne reseni je:
ShellExecute(Handle, nil, 'net', 'send jmeno_uzivatele "text zpravy"', nil, SW_SHOWNORMAL);sinea - nestaci pamet
[*] Vaclav Krmela <krmela(zv)ustinadorlici(tec)cz> - 16.4.2004 19:01:48
> From: Kacka software
>
> Mam tabulku asi 50 udaju a asi 20 000 zaznamu. Delam nekolik
> sestav ruzne tridene a ruzne souctovane.
> U nekterych sestav to nacte od 9500 do 12 000 zaznamu a padne
> na nedostatek pameti. Nektere udela cele. Pocet zaznamu,
> ktere nacte je u kazde sestavy jiny. Pokud pouziji tabulku
> asi s 8 000 zaznamu, tak je vse v poradku u vsech sestav.
O jake verze Windows a Siney se jedna?
Kolik je k dispozici systemovych prostredku pred zahajenim
tvorby sestavy?
Jak slozita je predloha, kolik prvku je v jednom tele sestavy,
obsahuje telo obrazky?
Vaclav Krmela
sinea - nestaci pamet
[*] Kacka software <kackasw(zv)kackasw(tec)cz> - 16.4.2004 18:23:45
Mam tabulku asi 50 udaju a asi 20 000 zaznamu. Delam nekolik sestav ruzne tridene a ruzne souctovane.
U nekterych sestav to nacte od 9500 do 12 000 zaznamu a padne na nedostatek pameti. Nektere udela cele. Pocet zaznamu, ktere nacte je u kazde sestavy jiny. Pokud pouziji tabulku asi s 8 000 zaznamu, tak je vse v poradku u vsech sestav.
Nesetkal jste se nekdo s tim. Jak to resit?
Dik
Radek
ActionMainMenuBar a MDI aplikace
[*] Pavel Malinsky <malinsky(zv)pmcom(tec)cz> - 16.4.2004 18:21:44
> -----Original Message-----
> From: delphi-l-owner(zv)clexpert(tec)cz
> [mailto:delphi-l-owner(zv)clexpert(tec)cz] On Behalf Of Milan Tomes
> Sent: Friday, April 16, 2004 12:47 PM
> To: delphi-l(zv)clexpert(tec)cz
> Subject: Re: ActionMainMenuBar a MDI aplikace
>
> Z vlastni zkusenosti musim dodat, ze ani komercni komponenty
> od DevExpress
> nedokazi obejit nektere veci v Delphi. ExpressBar se bohuzel
> neumi vyporadat
>
> > [mailto:delphi-l-owner(zv)clexpert(tec)cz]On Behalf Of Pavel Malinsky
> > Sent: Friday, April 16, 2004 12:21 PM
> >
> > pouze negativni a kor ve spojeni s MDI. Radsi se podivej treba na
> > Toolbar2000,
> > (ja pouziva komercni DevExpress, ale nejsou nejlevnejsi, ovsem
> > stoji za to!)
Ahoj,
jasne beru, ale co teda prosimte pouzivas ci navrhujes
k pouziti (bez ohledu na free ci komercni) ?
S pozdravem a dikem
=====================================
> Pavel Malinsky; malinsky(zv)pmcom(tec)cz <
=====================================
> GSM: 602 652 203 | ICQ: 322015967 <
=====================================
Integer to 32bit
[*] Dalibor Toman <dtoman(zv)fortech(tec)cz> - 16.4.2004 18:09:42
On Friday, April 16, 2004 4:57 PM [CET], Martin Kasman
<martinkasman(zv)martinkasman.sk> wrote:
> Samozrejme, ze Integer je 32 bitovy, no ako 32 bitovy je ulozeny v
> pamati pocitaca. Ja som chcel, aby som ho dostal do premennej
> (najlepsie pchar) tak, ako je v pamati a nie uz klasicky v
> desiatkovej sustave.
> Nejaky algoritmus som uz nasiel, ktora vracia styri znaky, ktore
> predstavuju styri ascii kody v 32 bit celeho naseho cisla.
>
> procedure vyp(var a1,a2,a3,a4:word;pocz:longint);
> var cr:real; cc,cz:longint;
>
> begin
> cz:=pocz;
> if cz>=16777216 then
> begin
> a4:=pocz div 16777216; cz:=pocz mod 16777216;
> end;
> if cz>=65536 then
> begin
> a3:=cz div 65536; cz:=cz mod 65536;
> end;
> if cz>=256 then
> begin
> a2:=cz div 256; cz:=cz mod 256;
> end;
> a1:=cz;
> end;
>
> Len lepsia by bola priama funkcia v Delphi.
no vypada to jako kdyby to programoval muj 3lety syn (doufam, ze se
nedozvi, ze ho takhle shazuju). Pokud jsem byl s to to pochopit tak to
nedela nic jineho nez, ze to vraci 4 byty, ze kterych se 32bit integer
sklada. Elegantnejsi a nazornejsi reseni muze byt napriklad:
TYPE
TFourBytes = Packed Record
one : Byte;
two: Byte;
three : Byte;
four :Byte;
end;
VAR
I : Integer;
J : Byte;
begin
I := $12345678;
J := TfourBytes(I).one;
...
end.
Ovsem puvodni textove zadani zrejme popisuje uplne neco jineho :-)
D. Toman
Hledani v netridenem poli
[*] Dalibor Toman <dtoman(zv)fortech(tec)cz> - 16.4.2004 17:47:40
On Friday, April 16, 2004 3:17 PM [CET], Daniel Frantik
<frantik(zv)telpro(tec)cz> wrote:
> To zavisi na tom, kolikrat budes v jiz setridenem seznamu hledat
> nejake cislo... Trideni ma slozitost minimalne n*log(n), zatimco
> sekvencni pruchud n .... Takze musis hledat alespon log(n) krat aby
> melo smysl trideni... U hashovani zase roste rezie -> mimoto
> porovnani hashe bude pomalejsi nez porovnani integeru...
> Tedy ja bych krome extremnich pripadu zustal u sekvencniho pruchodu
k tomu hashovani - samozrejme je nesmysl vyrabet stringovy hash.
Nabizi se vyrobit hash o delce 8 ci 16 bitu (napriklad jen poscitat
jednotlive wordy - konkretni reseni zalezi na rozlozeni hodnot tech
32bit cisel v poli). Ovsem znamenalo by to prevest vstupni pole do
vice mensich 'policek' (pole - resp spojovy seznam cisel se stejnym
hasem) - cili uplne zmenit usporadani dat. Pokud napriklad to vstupni
pole stejne program od nekud nacita, pak muze misto nej rovnou
vytvorit hashovaci pole s odkazy do mensich 'policek'.
Vhodnost ci nevhodnost tohoto reseni samozrejme zavisi na konkretnich
potrebach programu atd
D. Toman
odstraneni komponenty z parent
[*] Martin Cajbik <cajbik(zv)sct.sk> - 16.4.2004 17:41:39
Zdravim,
problem je prave v tom, ze v obsluhe stlacenia Buttonu nie je mozne tento
zrusit (ani nepriamo), inak dojde prave k tomu Access Violation.
Najjednoduchsie riesenie je na stlacenie Buttonu iba zaslat uzivatelsku
spravu napriklad WM_USER+1 cez PostMessage (nie SendMessage) a odstranenie
panelu napisat ako reakciu na tuto spravu. Tym padom sa priamo v obsluhe
stlacenia odstranenie nevykona, ale dojde k nemu az nasledne.
Martin Cajbik
> Zdravim,
> mam tuto hierarchii kontrolu
>
> scrollbox
> panel
> button
> onclick=odstranpanel
> /button
> label
> /label
> /panel
> panel
> button
> /button
> label
> /label
> /panel
> ...
> /scrollbox
>
> kterou vytvarim dynamicky - pridavam do scrollboxu panely s odp. tlacitky
a
> labely a tlacitku priradim udalost, ktera by mela odstranit panel... ale
> kdyz zavolam na parent buttonu free, tak aplikace vyhodi exception - jaky
je
> tedy spravny postup? myslela jsem, ze control pri volani free sam zrusi
sve
> potomky...
>
> diky, Karolina
>
>
>odstraneni komponenty z parent
[*] Karolina Nemanska <lafidek(zv)seznam(tec)cz> - 16.4.2004 17:13:35
Zdravim,
mam tuto hierarchii kontrolu
scrollbox
panel
button
onclick=odstranpanel
/button
label
/label
/panel
panel
button
/button
label
/label
/panel
...
/scrollbox
kterou vytvarim dynamicky - pridavam do scrollboxu panely s odp. tlacitky a
labely a tlacitku priradim udalost, ktera by mela odstranit panel... ale
kdyz zavolam na parent buttonu free, tak aplikace vyhodi exception - jaky je
tedy spravny postup? myslela jsem, ze control pri volani free sam zrusi sve
potomky...
diky, Karolina
INDEX V INTERBASE
[*] Slavomir Skopalik <skopalik(zv)elektlabs(tec)cz> - 16.4.2004 17:31:37
Bohuzel jsi nenapsal na jake IB :( a v jake znakove sade.
Takze na IB5.6 je to 253 znaku pri 1Byte/znak, pokud je vice byte na
znak, tak je to mene (polovina, tretina, ...).
Slavek
> Neiete nahodou niekto, ze ked chcem indexovat column typu
> VARCHAR , ci existuje nejaka maximalna povolena dlzka? Ak
> ano, kolko? Napr. mozem pouzit pole typu VARCHAR (250) ako
> index? Dik Ivan Kozak
>
>
>
>
>
>
> Integer to 32bit
[*] Pavel Poles <delphi(zv)noni(tec)cz> - 16.4.2004 17:17:36
> Samozrejme, ze Integer je 32 bitovy, no ako 32 bitovy je ulozeny v pamati
> pocitaca. Ja som chcel, aby som ho dostal do premennej (najlepsie pchar)
> tak, ako je v pamati a nie uz klasicky v desiatkovej sustave.
A co treba
Move(MujInteger,MujPChar^,sizeof(integer));
Pavel Poles
Integer to 32bit
[*] Martin Kasman <martinkasman(zv)martinkasman.sk> - 16.4.2004 16:57:33
Samozrejme, ze Integer je 32 bitovy, no ako 32 bitovy je ulozeny v pamati
pocitaca. Ja som chcel, aby som ho dostal do premennej (najlepsie pchar)
tak, ako je v pamati a nie uz klasicky v desiatkovej sustave.
Nejaky algoritmus som uz nasiel, ktora vracia styri znaky, ktore predstavuju
styri ascii kody v 32 bit celeho naseho cisla.
procedure vyp(var a1,a2,a3,a4:word;pocz:longint);
var cr:real; cc,cz:longint;
begin
cz:=pocz;
if cz>=16777216 then
begin
a4:=pocz div 16777216; cz:=pocz mod 16777216;
end;
if cz>=65536 then
begin
a3:=cz div 65536; cz:=cz mod 65536;
end;
if cz>=256 then
begin
a2:=cz div 256; cz:=cz mod 256;
end;
a1:=cz;
end;
Len lepsia by bola priama funkcia v Delphi.
----- Original Message -----
From: "Petr Daricek" <petr.daricek(zv)seznam(tec)cz>> > Ako prelozim obycajne cislo do 32 bitoveho?
> >
> > Potrebujem do hlavicky dbf subor podla predpisaneho formatu na pat
znakov
> > ulozit pocet zaznamov v 32 bitovom formate.
>
> Pokud se nepletu, tak Integer je standartne 32 bitovy.
> Co je to "obycejne cislo"?
> Petr daricek
FastReport - tisk DBGridu
[*] Jaroslav Uher <jarek(zv)iuher(tec)cz> - 16.4.2004 16:41:31
On 16 Apr 2004 at 15:21, Miso wrote:
> > nedari se mi napojeni TfrPrintGrid na vlastni Preview
> >
> > PrintGrid1.BuildReport;
> > PrintGrid1.Preview := FormPrintPreviewFR.frPreview;
> > FormPrintPreviewFR.ShowModal;
> ..najskor ti tam asi chyba PrintGrid1.ShowReport..
> ..vzorovu pokusnu aplikaciu ti posielam na sukromny mail
diky, ale to ja umim, dva roky jsem delal s FreeReportem.
Ja potrebuji dynamicky tiskout z libovolneho DBGridu pole, ktere si
uzivatel predtim vybere. Nechci na kazdou sestavu tvorit report
rucne. Pole mohou byt 3, ale take 30.
V FreeReportu to nebyl az takovy problem, stacilo v Designeru polozit
BandCrossData, MasterHeader, MasterData a v
procedure TFormPrintDBGrid.frReport1PrintColumn(ColNo: Integer;
var Width: Integer);
begin
// ColNo zacina 1
if CheckListBox.Checked[ColNo -1] // jen zvolene sloupce
then Width := DBGridPrn.Columns[ColNo -1].Width +
(Canvas.TextWidth('0'))
else Width := 0;
FWidth := Width;
end;
si nastavit potrebnou sirku sloupcu
a tady ji aplikovat
procedure TFormPrintDBGrid.frReport1EnterRect(Memo: TStringList;
View: TfrView);
begin
if Memo[0] = '[Header]' then // je pro DBGrid
begin
View.dx := FWidth;
if PrintFrame // tisk ramecku
then View.FrameTyp := frftRight + frftBottom + frftLeft +
frftTop // full frame
else View.FrameTyp := 0; // no frame
end;
if Memo[0] = '[Cell]' then // je pro DBGrid
begin
View.dx := FWidth;
if PrintFrame // tisk ramecku
then View.FrameTyp := frftRight + frftBottom + frftLeft +
frftTop // full frame
else View.FrameTyp := 0; // no frame
end;
end;
Bohuzel ve FastReportu mi View.dx := FWidth vubec nereaguje a
View.FrameTyp take NE.
Ve FastReportu jsem nasel komponenu TfrPrintGrid, ktera vse umi
SUPER, jen mi odmita presmerovani na vlastni Preview, a data se
zobrazi jen na jejich Preview (PrintGrid1.ShowReport).
Jarek Uher
Jak vypnout XPMan u komponenty
[*] Radek Szurman <surad(zv)digijoe(tec)com> - 16.4.2004 15:41:27
Ahoj vsichni,
jsem v nasledujicim rozpolozeni, mam v aplikaci pouzit XPManifest (unit
XPMan) a mam tu app peknejsi, to se lidem libi, ale problem nastava u
jedne komponenty (mam k ni zdroj) ktera se pak nechova jak ma, konktretne
jde o TransparentMemo.
Nevite nekdo nejaky parametr nebo neco kde se da XPMan vypnout pro
jednotlivou komponentu ?
Potrebuju transparentmemo a xp si to upravi podle sveho designu, to je
problem.
Cau dik Radek Szurman
INDEX V INTERBASE
[*] Ivan Kozak <ivan(zv)boucek(tec)cz> - 16.4.2004 15:39:26
Neiete nahodou niekto, ze ked chcem indexovat column typu VARCHAR , ci
existuje nejaka maximalna povolena dlzka? Ak ano, kolko? Napr. mozem pouzit
pole typu VARCHAR (250) ako index? Dik
Ivan Kozak
Hledani v netridenem poli
[*] delphin(zv)post(tec)cz - 16.4.2004 15:27:25
> mam array of integer naplnene hodnotami ale nesetridene,
> v tomto poli potrebuji najit index zadaneho cisla.
> Jakym nejrychlejsim zpusobem by slo toto provest?
Pokud se jedna o jednorazovou akci, tak nejrychlejsi bude je sekvencne
projit. Na tohle existuje specializovana asm instrukce SCASD s jejiz
pouzitim to bude nejrychlejsi.
Pokud by se vyhledavalo opakovane, tak stoji za uvahu pole predem setridit a
vyhledavat binarne.FastReport - tisk DBGridu
[*] Miso <delphinpp(zv)atlas(tec)cz> - 16.4.2004 15:21:24
----- Original Message -----
From: "Jaroslav Uher" <jarek(zv)iuher(tec)cz>
> nedari se mi napojeni TfrPrintGrid na vlastni Preview
>
> PrintGrid1.BuildReport;
> PrintGrid1.Preview := FormPrintPreviewFR.frPreview;
> FormPrintPreviewFR.ShowModal;
>
..najskor ti tam asi chyba PrintGrid1.ShowReport..
..vzorovu pokusnu aplikaciu ti posielam na sukromny mail
Miso
Hledani v netridenem poli
[*] Daniel Frantik <frantik(zv)telpro(tec)cz> - 16.4.2004 15:17:23
To zavisi na tom, kolikrat budes v jiz setridenem seznamu hledat nejake
cislo... Trideni ma slozitost minimalne n*log(n), zatimco sekvencni
pruchud n .... Takze musis hledat alespon log(n) krat aby melo smysl
trideni... U hashovani zase roste rezie -> mimoto porovnani hashe bude
pomalejsi nez porovnani integeru...
Tedy ja bych krome extremnich pripadu zustal u sekvencniho pruchodu ...
Danik
> -----Original Message-----
> From: delphi-l-owner(zv)clexpert(tec)cz
> mam array of integer naplnene hodnotami ale nesetridene,
> v tomto poli potrebuji najit index zadaneho cisla.
> Jakym nejrychlejsim zpusobem by slo toto provest?ADMIN: Service
[*] Petr Zahradnik <clexpert(zv)clexpert(tec)cz> - 16.4.2004 15:11:22
Puvodni zprava ze dne 16.4.2004:
> Ahoj,
> jak docilim toho aby sluzba sama sobe zmenila stav z RUNNING na STOPPED.
> Jara
NAPOMENUTI ADMINISTRATORA KONFERENCE DELPHI ZA SPATNY NEBO ZADNY
SUBJEKT
Petr Zahradnik, pocitacovy expert
==========================================================
Petr Zahradnik, Computer Laboratory
web: http://www.clexpert(tec)cz, e-mail: clexpert(zv)clexpert(tec)cz
==========================================================
Hledani v netridenem poli
[*] Pavel Poles <delphi(zv)noni(tec)cz> - 16.4.2004 14:45:19
Zdravim konferenci,
mam array of integer naplnene hodnotami ale nesetridene,
v tomto poli potrebuji najit index zadaneho cisla.
Jakym nejrychlejsim zpusobem by slo toto provest?
Napada mne nekolik zpusobu:
1) Sekvencne
2) Vytvorit dvourozmerne pole, prvni sloupec puvodni hodnoty,
druhy sloupec indexi v puvodnim poli, setridit podle prvniho sloupce
a najit hodnotu pulenim intervalu - druhy sloupec vrati index v puvodnim
poli
3) Pole nacpat do HashedStringList a v tom vyhledavat, to ale asi nebude
nejrychlejsi kvuli konverzi IntToStr...
Predem dekuji za napady
Pavel Poles
FastReport - tisk DBGridu
[*] Jaroslav Uher <jarek(zv)iuher(tec)cz> - 16.4.2004 14:43:18
Ahoj,
nedari se mi napojeni TfrPrintGrid na vlastni Preview
PrintGrid1.BuildReport;
PrintGrid1.Preview := FormPrintPreviewFR.frPreview;
FormPrintPreviewFR.ShowModal;
se zobrazi prazdny.
Muze, prosim nekdo poradit ?
Diky,
preji hezky den
Jarek Uher
Service
[*] Svehla Jaroslav <svehla(zv)spelza(tec)cz> - 16.4.2004 14:27:17
Ahoj,
jak docilim toho aby sluzba sama sobe zmenila stav z RUNNING na STOPPED.
Jara
Cesta k cizi aplikaci ?
[*] Frantisek Bohac <bohacf(zv)vnol(tec)cz> - 16.4.2004 13:37:13
uses
JclSysInfo;
procedure TForm1.Button1Click(Sender: TObject);
begin
ShowMessage(GetProcessNameFromWnd(Application.Handle));
end;
S pozdravem
Frantisek Bohac
Jiri Betunak napsal(a):
>nevite nekdo jak zjistit cestu k programu kdyz znam jeho
>Handle pripadne caption ?
>
Cesta k cizi aplikaci ?
[*] Vaclav Krmela <krmela(zv)ustinadorlici(tec)cz> - 16.4.2004 13:31:12
> From: Jiri Betunak
>
> Prosim prosim nevite nekdo jak zjistit cestu k programu kdyz znam jeho
> Handle pripadne caption ?
Co treba takhle:
uses TlHelp32;
function GetAppPathFromWindowHandle(AHandle: THandle): string;
var me: ModuleEntry32;
DW: DWORD;
H: THandle;
begin
Result := '';
GetWindowThreadProcessId(AHandle, DW);
H := CreateToolhelp32Snapshot(TH32CS_SNAPMODULE, DW);
me.dwSize := SizeOf(ModuleEntry32);
if Module32First(H, me) then
Result := me.szExePath;
CloseHandle(H);
end;
Vaclav Krmela
Lokalizator AddTransl.pas
[*] Zbysek Hlinka <hlinka(zv)hlinka(tec)cz> - 16.4.2004 13:23:10
> -----Original Message-----
> From: delphi-l-owner(zv)clexpert(tec)cz
> [mailto:delphi-l-owner(zv)clexpert(tec)cz] On Behalf Of Lahoda Radek
> Sent: Friday, April 16, 2004 11:35 AM
>
> ale po prepnuti jazyka se vyrojila spousta vyjimek, coz
> predtim nedelalo, takze jsem to zatim cele vyresil prepinanim
> offline, zapisem do registru Locales jak radil navod k Lokalizatoru
Jo, VCL nesnasi, kdyz se u nekterych komponent meni resourcy zaziva. :-) Ale
s tim nic nenadelam, nemam opravneni opravovat VCL...
S pozdravem
Zbysek Hlinka
E-mail: hlinka zavin. hlinka(tec)cz
Instalace Firebirdu na Linuxu
[*] Martin Schayna <mschayna(zv)aktis(tec)cz> - 16.4.2004 12:53:08
Dalibor <dalibor(zv)torola(tec)cz> wrote:
> Byl by tady nekdo, kdo by mi pomohl rozjet Firebirdu 1.5 na Linuxu
> 2.4.20-18.7
>
> Po instalaci a spusteni mi to hlasi chybu, ze nemuze najit knihovnu
> libstdc++.so.5
>
> Co muzu delat?
Samozrejme doinstalovat neco co by tu knihovnu obsahovalo,
nepises na jaky Linux to chces nainstalovat (Slackware uvadis
pouze jako priklad kde ti FB nainstalovat sel). Pokud tvuj
Linux podporuje rpm, doporucuji hledat vhodny rpm balicek
podle toho souboru na http://rpmfind.net/linux/RPM/
Martin Schayna
ActionMainMenuBar a MDI aplikace
[*] Milan Tomes <delphi(zv)haida(tec)cz> - 16.4.2004 12:47:02
Z vlastni zkusenosti musim dodat, ze ani komercni komponenty od DevExpress
nedokazi obejit nektere veci v Delphi. ExpressBar se bohuzel neumi vyporadat
s dedenim formu a ja opravdu nechci, aby se na kazdem potomkovi muselo znovu
a znovu definovat ktere tlacitko na toolbaru ma byt a ktere ne. Po
konzultaci s vyvojari jsem se dozvedel, ze problem je ve streamingu
komponent v Delphi.
S pozdravem
Milan Tomes
> [mailto:delphi-l-owner(zv)clexpert(tec)cz]On Behalf Of Pavel Malinsky
> Sent: Friday, April 16, 2004 12:21 PM
>
> pouze negativni a kor ve spojeni s MDI. Radsi se podivej treba na
> Toolbar2000,
> (ja pouziva komercni DevExpress, ale nejsou nejlevnejsi, ovsem
> stoji za to!)Instalace Firebirdu na Linuxu
[*] Dalibor <dalibor(zv)torola(tec)cz> - 16.4.2004 12:41:01
Byl by tady nekdo, kdo by mi pomohl rozjet Firebirdu 1.5 na Linuxu 2.4.20-18.7
Po instalaci a spusteni mi to hlasi chybu, ze nemuze najit knihovnu
libstdc++.so.5
Co muzu delat?
Nedavno jsem to zkousel na Slackware 9.1 a tam nebyl problem
Jsem v tom lajk.
Dekuji za jakokoliv informaci
presunuti mysi na default tlacitko
[*] Martin Burle <mburle2(zv)volny(tec)cz> - 16.4.2004 12:35:00
> v XP lze, pokud to mysi ovladac umi, zapnout presunuti mysi na default
> tlacitko v dialozich.
> Jak toto naucit program v Delphi 6?
Kurzor muzes posunout kam potrebujes pomoci SetCursorPos(X,Y). Musis
prepocitavat souradnice ClientToScreen a ScreenToClient.
Pozor na vicemonitorve systemy.
Jinak zvaz, zda to je vubec to prave, me to dost znervoznuje, kdyz kurzor
nekam odskakuje. Muze to byt ale sikovne u nejakych malych vstupnich
dialogu, ktere se uz otviraji pobliz aktualni pozice mysi.
MB
Integer to 32bit
[*] Petr Daricek <petr.daricek(zv)seznam(tec)cz> - 16.4.2004 12:26:59
> Ako prelozim obycajne cislo do 32 bitoveho?
>
> Potrebujem do hlavicky dbf subor podla predpisaneho formatu na pat znakov
> ulozit pocet zaznamov v 32 bitovom formate.
>
> Vdaka za kazdu radu.
Pokud se nepletu, tak Integer je standartne 32 bitovy.
Co je to "obycejne cislo"?
Petr daricek
ActionMainMenuBar a MDI aplikace
[*] Pavel Malinsky <malinsky(zv)pmcom(tec)cz> - 16.4.2004 12:20:58
> -----Original Message-----
> From: delphi-l-owner(zv)clexpert(tec)cz
> [mailto:delphi-l-owner(zv)clexpert(tec)cz] On Behalf Of Jakub Sramek
>
> Ahoj,
>
[...]
> P.S. Pouziti ActionMainMenuBar a ActionToolBar se mi uz nezda az tak
> vyhodne... ale treba mate lespi zkusenosti a nebo vite jak na to...
> Mam D7 Professional
Ahoj,
obavam se, ze celej ten nestastnej bazmeg ActionMainMenuBar a
ActionToolBar
budes stejne muset zahodit a nepouzivat, protoze zkusenosti jsou (a nejen
moje)
pouze negativni a kor ve spojeni s MDI. Radsi se podivej treba na
Toolbar2000,
(ja pouziva komercni DevExpress, ale nejsou nejlevnejsi, ovsem stoji za to!)
.
Viz: http://www.jrsoftware.org/tb2k.php
Nebo: http://www.devexpress.com/?section=/products/VCL/Exbars
PS: Jinak byl slibovanej SP pro D7 na jaro, ale zatim porad nic.
Pochybuju vsak, ze s timhle neco bude udelano :(( .
S pozdravem a dikem
=====================================
> Pavel Malinsky; malinsky(zv)pmcom(tec)cz <
=====================================
> GSM: 602 652 203 | ICQ: 322015967 <
=====================================
presunuti mysi na default tlacitko
[*] Lahoda Radek <lahodar(zv)uniplet(tec)cz> - 16.4.2004 11:52:54
zdravim,
v XP lze, pokud to mysi ovladac umi, zapnout presunuti mysi na default
tlacitko v dialozich.
Jak toto naucit program v Delphi 6?
diky
Radek Lahoda
Integer to 32bit
[*] Martin Kasman <martinkasman(zv)martinkasman.sk> - 16.4.2004 11:44:53
Ako prelozim obycajne cislo do 32 bitoveho?
Potrebujem do hlavicky dbf subor podla predpisaneho formatu na pat znakov
ulozit pocet zaznamov v 32 bitovom formate.
Vdaka za kazdu radu.
Lokalizator AddTransl.pas
[*] Lahoda Radek <lahodar(zv)uniplet(tec)cz> - 16.4.2004 11:34:52
jo uz mi to funguje
stacilo vytvorit menu Language a priradit jeho nazev property
AddTransl.Langmenu
ale po prepnuti jazyka se vyrojila spousta vyjimek, coz predtim nedelalo,
takze jsem to zatim cele vyresil prepinanim offline, zapisem do registru
Locales jak radil navod k Lokalizatoru
FB - cannot find record back version
[*] Pavel Cisar <pcb(zv)atlas(tec)cz> - 16.4.2004 11:02:49
Haj hou!
On 16 Apr 2004 at 10:36, Jirka wrote:
> Ahoj,
> krokoval jsem tu proceduru a nastava to pri update jedne tabulky.
> Na te tabulce jsou triggery pro vsechny udalosti.
Jsem si to myslel :-) Problem bude v triggeru na UPDATE nebo DELETE,
nikoliv primo v procedure. Pravdepodobne se dela delete radku ktery
byl prave zmenen (to ve FB 1.0 haze chybu, v1.5 by mela byt uz
opravena), pripadne jine podobne zverstvo.
S pozdravem
Pavel Cisar (ICQ: 89017288)
Mobil: 724 281429
http://www.ibphoenix(tec)cz
Vse co potrebujete pro Firebird a InterBase
Proxy a ruzne autorizace
[*] Lebeda David <david.lebeda(zv)comarr(tec)cz> - 16.4.2004 11:02:48
> rozsirene authentifikacni metody jsou stejne jen 3:
> 1) zadna
> 2) basic
> 3) ntlm
>
> z nichz 3) neni definovana v RFC cili neni internetovym standardem.
>
Ahoj,
v zasade souhlas, po konzultaci s kolegy lze jine autorizace povazovat za nezajimave.
K ntlm: nekteri nasi zakaznici maji proxy server, ktery vyzaduje NTLM autorizaci, takze ji
chceme podporovat. V soucasne dobe pouzivame jakesi vicemene experimentalne
nalezene reseni, ktere navic rozlisuje NTLM a NTLM-ISA. To je nejak vlepene do
stavajiciho Pietta. Funguje to, ale povazujeme to za nouzove reseni. Kdyz se pred
dvema roky objevil pozadavek na realizaci, nedokazal kolega najit zadnou dokumentaci
a proste se zkouselo. Treba uz je dnes situace lepsi. Snazim se hledat na internetu a
pri tom se ptam i v konferenci, jestli nekdo o necem nevi.
Radi bychom proste nasli reseni, ktere nebude zalozene na amatarskych pokusech. Tj.
nejakou komponentu (tridu, knihovnu...) pro HTTP prenos, ktere se rekne jmeno a
heslo pro proxy, typ autorizace a tim to bude vyresene.
A nebo jeste jinak: je tu nekdo, kdo se jiz zabyval NTLM autorizaci ve svych aplikacich a
byl by ochoten aspon naznacit, jakou cestu pouzil k reseni?
Diky
David Lebeda
Cesta k cizi aplikaci ?
[*] Jiri Betunak <kindrik(zv)centrum(tec)cz> - 16.4.2004 10:36:44
Hello delphi-l,
Prosim prosim nevite nekdo jak zjistit cestu k programu kdyz znam jeho
Handle pripadne caption ?
predem diky za jakoukoliv odpoved a pomoc
priklady uvitam
--
Best regards,
Jiri mailto:kindrik(zv)centrum(tec)cz
ICQ#: 265297587
__________________________________________________________________
shellexecute
[*] Lukas Barton <look_as(zv)cnawr(tec)cz> - 16.4.2004 10:48:47
Parametry se zadavaji zvlast, misto nil za prikazem. Viz help k
ShellExecute.
Lukas
> Ahoj
>
> Zkousel jsem v aplikaci pouzit toto:
> ShellExecute(Handle, nil, 'net send jmeno_uzivatele "text zpravy"', nil,
nil, SW_SHOWNORMAL);
>
> Kdyz vyse uvedeny net send... zadam v command okne, vse je ok.
> Kdyz to volam v programu (viz. vyse) nezobrazi se zadna zprava.
>
> Co delam blbe ? Kdo poradi ? Jedu pod W2k, WXP, D5. Diky. PRGX
>
shellexecute
[*] Vaclav Riha - Soft Consult <vaclav_riha(zv)softconsult(tec)cz> - 16.4.2004 10:44:46
>ShellExecute(Handle, nil, 'net send jmeno_uzivatele "text zpravy"', nil, nil, SW_SHOWNORMAL);
>Kdyz vyse uvedeny net send... zadam v command okne, vse je ok.
Kdyz to volam v programu (viz. vyse) nezobrazi se zadna zprava.
Zkus COMMAND /C NET SEND JMENO ".....
S pozdravem Vaclav Riha
FB - cannot find record back version
[*] Jirka <jw-delphi(zv)seznam(tec)cz> - 16.4.2004 10:36:43
Ahoj,
krokoval jsem tu proceduru a nastava to pri update jedne tabulky.
Na te tabulce jsou triggery pro vsechny udalosti.
Jirka
Pavel Cisar wrote:
> Nedela ta procedure nejaky UPDATE nebo DELETE ? Pokud ano, mas na
> tabulkach ktere se meni nejake spouste na dane akce ? Pokud ano, jake
> (co delaji) ?
shellexecute
[*] prgx(zv)email(tec)cz - 16.4.2004 10:26:42
Ahoj
Zkousel jsem v aplikaci pouzit toto:
ShellExecute(Handle, nil, 'net send jmeno_uzivatele "text zpravy"', nil, nil, SW_SHOWNORMAL);
Kdyz vyse uvedeny net send... zadam v command okne, vse je ok.
Kdyz to volam v programu (viz. vyse) nezobrazi se zadna zprava.
Co delam blbe ? Kdo poradi ? Jedu pod W2k, WXP, D5. Diky. PRGX
ActionMainMenuBar a MDI aplikace
[*] Jakub Sramek <jsramek(zv)kodys(tec)cz> - 16.4.2004 10:22:41
Ahoj,
chtel bych pouzit ActionMainMenuBar v MDI aplikaci, ale narazil jsem na dva
problemy :
1) pokud maximalizuju dcerine okno, pak mi zmizi jeho BorderIcons (pri
pouziti klasickeho menu se BorderIcons maximalizovanych dcerinnych oken
zobrazi napravo v liste hlavniho menu)
2) lze provazat seznam otevrenych dcerinnych oken s nekterou polozkou
ActionMainMenuBar ? (pri pouziti klasickeho menu se nastavi vlastnost MDI
formulare WindowMenu na polozku hlavni nabidky - v teto nabidce se pak
zobrazuje seznam otevrenych oken)
P.S. Pouziti ActionMainMenuBar a ActionToolBar se mi uz nezda az tak
vyhodne... ale treba mate lespi zkusenosti a nebo vite jak na to...
Mam D7 Professional
Diky za rady,
Jakub.Proxy a ruzne autorizace
[*] Dalibor Toman <dtoman(zv)fortech(tec)cz> - 16.4.2004 10:06:39
On Thursday, April 15, 2004 3:45 PM [CET], Lebeda David
<david.lebeda(zv)comarr(tec)cz> wrote:
> Ahoj,
>
> delam takovou sondaz, co pouzit k programovani aplikace, ktera
> prenasi soubory pres internet. Stavajici reseni pouziva komponenty
F.
> Pietteho (ICS), ale jako problem se ukazuji ruzne autorizace u proxy
> serveru (basic, ntlm, kerberos...). Nevite nekdo o komponente
> (objektu, knihovne apod.), ktera by podporovala HTTP protokol i s
> proxy a mela by v sobe jiz zabudovanou podporu ruznych zpusobu
> autorizace, aby to clovek nemusel nejak amatersky dolepovat na
> kolene? Dokazali jsme do aplikace doplnit podporu NTLM autorizace,
> ale uvitali bychom, kdyby bylo jiz hotove reseni s co nejvetsim
> poctem tech autorizaci. Nemusi byt free.
>
rozsirene authentifikacni metody jsou stejne jen 3:
1) zadna
2) basic
3) ntlm
z nichz 3) neni definovana v RFC cili neni internetovym standardem.
PS: Jeste jsem se nesetkal s WWW serverem, ktery by vyzadoval nejakou
jinou (RFC definovanou) auth metodu...
D. Toman
FB - cannot find record back version
[*] Pavel Cisar <pcb(zv)atlas(tec)cz> - 16.4.2004 10:02:38
Haj hou!
On 16 Apr 2004 at 9:16, Jirka wrote:
> dnes mi zacala DB hlasit nasledujici chybu:
> "internal gds software consistency check (cannot find record back
> version (291))"
Nedela ta procedure nejaky UPDATE nebo DELETE ? Pokud ano, mas na
tabulkach ktere se meni nejake spouste na dane akce ? Pokud ano, jake
(co delaji) ?
S pozdravem
Pavel Cisar (ICQ: 89017288)
Mobil: 724 281429
http://www.ibphoenix(tec)cz
Vse co potrebujete pro Firebird a InterBase
FB - cannot find record back version
[*] Jirka <jw-delphi(zv)seznam(tec)cz> - 16.4.2004 09:48:37
Tak mi to hlasi i z IBExperta. Kdyz jsem to predtim zkousel tak jsem
nemel stejne parametry.
Jirka
Jirka wrote:
> Ahoj vsem,
> dnes mi zacala DB hlasit nasledujici chybu:
> "internal gds software consistency check (cannot find record back
> version (291))"
>
> Dela to pri spousteni jedne ulozene procedury z programu. Kdyz ale tu
> samou spustim z IBExperta tak to nic nenahlasi.
> Uz jsem zkousel i gfix a zalohu/obnovu, ale neuspel jsem.
>
> Nemate nekdo nejaky napad?
>
> FB 1.0.3, D6, IBX6.07
> Jirka
FB - cannot find record back version
[*] Jirka <jw-delphi(zv)seznam(tec)cz> - 16.4.2004 09:16:34
Ahoj vsem,
dnes mi zacala DB hlasit nasledujici chybu:
"internal gds software consistency check (cannot find record back
version (291))"
Dela to pri spousteni jedne ulozene procedury z programu. Kdyz ale tu
samou spustim z IBExperta tak to nic nenahlasi.
Uz jsem zkousel i gfix a zalohu/obnovu, ale neuspel jsem.
Nemate nekdo nejaky napad?
FB 1.0.3, D6, IBX6.07
Jirka
Generator sestav pro Delphi8
[*] Ing. Petr Kejval <petr.kejval(zv)worldonline(tec)cz> - 16.4.2004 09:08:33
Zacinam se v D8 teprve rozhlizet. Jaky generator sestav pouzivate pro
WinForm aplikace?
Petr Kejval
FB trigger - jmeno tabulky
[*] petr palicka <palicka.petr(zv)seznam(tec)cz> - 16.4.2004 08:50:31
Ahoj,
trigger se vytvari vzdy pro konkretni tabulku.
AFAIK nelze mit jeden trigger pro vice tabulek.
Jedine bys udelal univerzalni ulozenou proceduru a
tu volal z vice spousti. Potom ji muzes predat
nazev tabulky jako parametr.
Peca