Archív konference Delphi

Zpět na výběr roku archívu nebo přejít na fulltextové vyhledávání v konferenci.

IDispatch a properties

[*] Pavel Krehula <pavel.krehula(zv)nlm(tec)cz> - 3.12.2001 16:58:49



RK> Pokud ti staci jen zjisteni existence property, pak se podivej na
RK> GetIdsOfNames.
RK> Vice informaci na msdn.microsoft.com

Tohle mi prave nestaci, potrebuji zjistit typ te property (dispid uz mam), v msdn sem
hledal, ale smula je, ze nevim co presne hledat.

--
Best regards,
Pavel

pavel.krehula(zv)nlm(tec)cz


IB/FB - rolename

[*] Lud�k ZITA <konference(zv)sales(tec)cz> - 3.12.2001 17:26:36


----- Original Message -----
From: "Pavel Cisar" <pcb(zv)atlas(tec)cz>

FB 1.0 RC1 - CURRENT_ROLE (viz. Release Notes).

Diky.

> Take by mne zajimalo, jestli bude nekdy v budoucnu FB podporovat NT
> autentifikaci.

Vzhledem k tomu, ze FB je multiplatformni, musela by
implementace teto vlastnosti byt externi. Bud by se realizovala
zcela nezavisle (zkuste si to napsat jako proxy aplikaci v Delphi :-)
nebo jako plug-in k enginu. To by ovsem vyzadovalo zabudovani
plug-in mechanizmu do enginu. O tom se sice uvazuje, ale kdo vi
kdy a v jake podobe to bude (je nekdo ochotny to financovat ? ,-)

Aha ja jsem si myslel, ze pro Linux uz je tohle podporovano.
O investorovi momentalne nevim. Ja to zatim resim tim, ze ukladam cely
connection string
i s heslem pro IB v zakodovanem souboru v privatnim adresari na serveru. Ale
i kdyz jsem si na to napsal nejake nastroje je to porad pomerne slozita
administrace.

Ludek


IB-uzivatelska zmena hesla

[*] Rado Benc <bego(zv)pobox.sk> - 3.12.2001 17:28:41

Nazdar,

> Nevite nekdo jak docilit toho aby si uzivatel IB mohl zmenit pouze svoje
> vlastni heslo?

Pozri si:

http://www.volny(tec)cz/iprenosil/interbase/ip_ib_isc4.htm

HTH,

Rado
____________________________________
http://www.pobox.sk/ - prvy slovensky freemail

Killnuti EXPLORER.EXE

[*] Hurricane <hurricane(zv)quick(tec)cz> - 3.12.2001 17:30:37

Zdravim

Sam o sobe killnout nejde. Widle jsou blby a nedovolej ti to. IMHO je
nejlepsi prepsat v system.ini polozku shell a misto ni dat vlastni aplikaci,
ktera provede vse potrebne. Pak staci prepsat system.ini zpatky, spustit
explorer.exe (pokud neni spusteny a shell=explorer.exe, tak se spousti jako
shell a ne jako pruzkumnik) a zavrit svoji aplikaci. Nezapomen, ze ne
vsichni pouzivaji explorer, takze abys LiteSteparum nenadelal v systemu
bordel.

Hurricane

----- Original Message -----

Zdarek, v instalaci me aplikace potrebuji killnou explorer.exe, ale to
prinasi radu potizi, protoze prakticky nelze killnout, zkousel sem nekolik
zpusobu. Nemate nekdo napad? Dik za pomoc.
Korin

IDispatch a properties

[*] Tomas Bihary <delphi(zv)wige-mic(tec)cz> - 3.12.2001 17:31:02

hledej pouziti rozhrani

ITypeInfo a ITypeLib

Tomas

----- Original Message -----
From: "Pavel Krehula" <pavel.krehula(zv)nlm(tec)cz>
To: "Radim Kunz" <delphi-l(zv)clexpert(tec)cz>
Sent: Monday, December 03, 2001 4:58 PM
Subject: Re: IDispatch a properties


>
> RK> Pokud ti staci jen zjisteni existence property, pak se podivej na
> RK> GetIdsOfNames.
> RK> Vice informaci na msdn.microsoft.com
>
> Tohle mi prave nestaci, potrebuji zjistit typ te property (dispid uz mam),
v msdn sem
> hledal, ale smula je, ze nevim co presne hledat.
>
> --
> Best regards,
> Pavel
>
> pavel.krehula(zv)nlm(tec)cz


IB-uzivatelska zmena hesla

[*] Lud�k ZITA <konference(zv)sales(tec)cz> - 3.12.2001 17:34:13


----- Original Message -----
From: "Josef Semera" <semera(zv)atlas(tec)cz>

> Nevite nekdo jak docilit toho aby si uzivatel IB
mohl zmenit
> pouze svoje vlastni heslo?
>V IBX je komponenta pro spravu uzivatelu a hesel, ted si
nevzpomenu, jak se jmenuje.
IBSecurityService, ale ta to umozni pouze pro SYSDBA. A nebo
pokud dam uzivatelum pravo write pro ISC4. Ale to pak si je klidne mohou
menit i navzajem. IBSecurityService funguje stejne jako GSEC a tim se mi
to tak� nepovedlo.

Ahoj.
Sice tohle bude takova poloodpoved, ale vzpomnel jsem si ze v zacatcich s IB
jsem nekde videl upravu pro ics4.gdb, ktera :
1) Umoznovala uzivatelum menit sve heslo.
2) Zabranovala jim videt zakodovanou podobu hesel ostatnich uzivatelu (Pri
soucasnych vypocetnich vykonech je to IMHO trosku dira do IB)
3) Vytvarela historii logovani uzivatelu.

Samozrejme, ze uz nevim kde.

Ludek


Uzav�en� hl�ek program�

[*] Lud�k ZITA <konference(zv)sales(tec)cz> - 3.12.2001 17:45:07


----- Original Message -----

Dobr� den,
promi�te m�j dotaz.Odpov�� na n�j jsem na#el u� v archivu,ale te� kdy� j�
hled�m nem��u si pomoci.Zkr�tka nenajdu.
Jde o toto:Pot�ebuji v nastaven� �as a den restartovat po��ta� s win98.To
m�m zm�kl�,ale proto�e je po��ta� v s�ti,p�i vol�n� ExitWindowsEx() mi
vysko�� okno,kter� mi nahl�s�,�e jsou p�ipojen� u�ivatel� a jestli je chci
restartem odpojit.Tuto hl�#ku pot�ebuji tedy n�jak�m zp�sobem odp�lit a
u�ivatele odpojit.D�ky moc.
Tr�a Luk�#

Ahoj.
Zkus ExitWidowsEx(EWX_REBOOT or EWX_FORCE,0);

Ludek


Killnuti EXPLORER.EXE

[*] Hurricane <hurricane(zv)quick(tec)cz> - 3.12.2001 17:45:37

Zdravim

To IMHO neni dobry zpusob. Ja pouzivam LiteStepa (nahrada exploreru) uz
pekne dlouho a setkal jsem se s temito problemy:

MSOE vyvola dialog pro telef. pripojeni az za hoodne dlouho.
nefunguje spousteni HTML dokumentu napr z RARu.
nefunguje Hledat.. z popup menu slozek
plus nekolik malo nepodstatnych

Se seriakama nemam problemy.

Nahradou shellu se lze branit pouze proti BFU. Vzdy muzes v aplikaci dat
soubor-otevrit a muzes prochazet disk a spoustet programy jak chces. Kdyz
nekdo chce, tak se proste dostane. Mozna by pomohlo substitnout urcity
adresar (dokumenrty,..) a C zneviditelnit (TweakUI napr.).

Hurricane

----- Original Message -----

> Nakonec jsem to vyresil tak, ze a autostartu spustim aplikaci, ktera se
> roztahne pres celou obrazovku, zablokuje ruzne kombinace klaves (Alt-F4,
> Ctrl-Alt-Delete,..), a povoli jen tlacitka definovana v ini souboru, takze
> BFU muze spustit jen to, co mu povolis. Neni to ochrana proti zkusenym
> uzivatelum (o to ani neslo), ale ochrana pred nezkusenymi uzivateli, kteri
s
> Windows dovedou udelat neuveritelne veci.

Delsi: Chyby/nedostatky Kylix/D6

[*] Jan Sebel�k <honza(zv)haes(tec)cz> - 3.12.2001 18:45:51

Odes�latel: David Janko <djanko(zv)infoware(tec)cz>
Pro konferenci: Pokud je to OffTopic, tak se dopredu omlouvam, ale mam
pocit, ze to sem patri.

Ahoj Davide, diky za zpravu.
Podivam se na to a budu sbirat nazory z konference, ktere bych pak chtel probrat na seminari "Delphi 2002".

Honza
=========================================
= HAES - RNDr. Jan Sebelik
= http://www.haes(tec)cz
= Skolici a konzultacni stredisko pro Delphi a Win32
= Vojtiskova 206
= 507 81 Lazne Belohrad
= tel. 0434 692 569 (0776 347735)
=========================================

Delsi: Chyby/nedostatky Kylix/D6

[*] Ond�ej Sekera <sekera(zv)supreme(tec)cz> - 3.12.2001 19:28:14

Delphi ma zcela jiste mnoho nedostatku a bylo by nemoudre predpokladat, ze
se mnoho dalsich neobjevi pri slouceni dvou platforem. Jenom ve zkratce, co
sem si vzpomnel:

*Mnoho chyb Delphi 6 �e#� posledn� patch, mrkn�te na
http://community.borland.com/article/0,1410,27800,00.html
* Pouzivat DB komponenty Delphi je velmi originalni metoda sebevrazdy. Jsou
dobre tak vyrobeni domaci evidence knih, coz plati jak pro vizualni, tak
nevizualni komponenty. Existuji (casto i freewareove) nahrady, ktere
bezpecne funguji a vypadaji slusne. Doporu�uji nav#t�vit nap�.:
http://delphi.icm.edu.pl/, http://www.torry.net/index.htm, existuj� jich
stovky. Z originalnich komponent Delphi osobne pouzivam snad pouze TPanel a
TLabel, jinak mam vetsinu komponent vlastnich nebo prevzatych (casteji).
* Delphi DBGrid je v praxi na [CENSORED], je idealni v design rezimu, kdyz
potrebujete rychle videt DataSet.
* TDBImage pokud vim jpg i gif umi, pred casem jsem s jistymi problemy tyto
formaty zobrazoval
* Mnozstvi funkci do IDE Delphi doplnuji tzv. Expert sety; zminene
odsazovani rozhodne obsahuji (+1000 dalsich fci) - http://www.gexperts.org/
* TabOrder v design mode delal asi n�kdo v r�mci charity (mysl�m dement) -
tento nazor mam uz od verze 3.0, bohuzel, nikoliv tak Borland
* Rozpad oznaceni - ano, pokud oznacite komponenty s nestejnym Parent, ve
vetsine pripadu dojde ke zmene oznaceni na "nejaky" parent; dle mne zcela
zbytecne (viz. TabOrder)
* TColorDialog - taky me to prekvapilo. Udelal sem si vlastni.

Proste je to nove, mnoho chyb bude casem jiste odstraneno (mnoho pribyde :).
Nic si z toho nedelejte, neexistuje program, ve kterem neni chyba. Ja uz pul
roku predelavam komercni komponenty DeveloperExpress na alespon trochu
funkcni, obcas kleju jak pohan, tolik fatalnich nedostatku snad nemelo ani
Windows 95 prerelease...

Ondrej Sekera
Programator

----- Original Message -----
From: "David Janko" <djanko(zv)infoware(tec)cz>
To: <honza(zv)haes(tec)cz>
Cc: <delphi-l(zv)clexpert(tec)cz>
Sent: Monday, December 03, 2001 4:20 PM
Subject: Delsi: Chyby/nedostatky Kylix/D6


> Pro konferenci: Pokud je to OffTopic, tak se dopredu omlouvam, ale mam
> pocit, ze to sem patri.
>
> Zdravim,
> posilam slibenou zpravu.
> Vzhledem k tomu, ze nejsem zadny Delphi guru ale spise zacatecnik, nemohu
> vyloucit, ze nektere nedostatky muzou byt zpusobeny pouze mou neznalosti
> veci. Na druhu stranu jsem se ale OPRAVDU snazil cist manual. Za kazdou
> opravu budu vdecny (at jiz to bude oprava me kritiky nebo oprava chyb ze
> strany borlandu ;-) ). A pokud by se k tomu mohl vyjadrit nekdo
kompetentni
> primo od borlandu byl bych samozrejme rad dvojnasob - rad bych vyvijel v
> Kylix/D6 DB aplikace (a samozrejme bych si prislusne produkty zakoupil)
ale
> chyby uvedene jako #1 az #3 cini pro me ucely tyto produkty nepouzitelne
:(.
>
> ---
> Best Regards,
> David Janko
> programmer & Linux system administrator
> djanko(zv)infoware(tec)cz
> Czech Republic / Central Europe
>
>

TreeView

[*] Tomas Vida <vida(zv)uniware(tec)cz> - 3.12.2001 19:42:37

Ahoj,
potreboval bych do TreeView nacitat data z tabulky ulozene na sql
serveru. Tabulka obsahuje ID_polozky, nazev, kod.....

Predstavuji si, ze se mi do TreeView nactou z tabulky 'nazvy' a
'ID_polozky'. Zobrazovat chci ale pouze nazvy (ID_polozky mi slouzi pro
nasledny dotaz zpet na sql, takze musi byt svazano s nazvem...) Po
kliknuti na nazev v TreeView si potrebuju precist odpovidajici
ID_polozky.

Vubec nevim, jak na to. Muzete mi prosim poradit, kde zacit a jakym
smerem se mam ubirat?


diky
tomas

---
Odchoz� zpr�va neobsahuje viry.
Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.303 / Virov� b�ze: 164 - datum vyd�n�: 24.11.2001

HTML browser

[*] Jan Fiala <jan.fiala(zv)iol(tec)cz> - 3.12.2001 19:59:23

3.12.2001 bejcek(zv)centrum(tec)cz:
> Ahoj kluci tak zas neco,jedu jak sroubek tak zas neco potrebuju.
> Jak bych mohl zobrazit HTML text jako v klasickym notepadu,neco
> takoveho jsem videl na windows komandru po stisku F3:-)

To, co dela Windows Commander je docela trivialni. Proste vynecha vse,
co je uzavreno v zavorkach <> (az na odkazy, ktere uzavre do lomenych
zavorek) a tabulky, ktere oddeli tusim carkovane

> Docela by se mi to hodilo,bylo by dobre kdyby bylo i neco na
> ukladani v HTML formatu,nechce se mi to delat:-)

Co znamena neco na ukladani v HTML formatu ?

------
Jan Fiala
mailto:jan.fiala(zv)iol(tec)cz


Konfview a nejaka solidnejsi DB

[*] Milan ��ek - 3.12.2001 20:10:02

> > chci se zeptat, jestli jste se uz nekdo nepustil do upravy Konfview pro
> > nejakou lepsi a hlavne rychlejsi DB (nejlepe MySQL).
>
> Ahoj.
> Zkousel jsem IB i MySQL a oboji bylo na lokalnim stroji pomalejsi nez
> Paradox.

Tu rychlost bych prekousnul, i kdyz je to asi to nejdulezitejsi.

Stava se mi, ze naimportuji treba 10 mesicu a dalsi uz tam ani nahodou
nedostanu. Pise mi to, ze table does not exist a file or directory does not
exist. Ty data tam pak uz ani nahodou nedostanu, musim zalozit novou DB a
vse nacitat odznova.

Druhy problem je, ze kdyz projizdim vyhledane prispevky, obcas mi to hodi
nejakou chybu a misto textu prispevku zustane prazdny panel.

Ja do paradoxu vubec nevidim, s MySQL mam uz nejake zkusenosti, takze pokud
by jsi nasel verzi konfviewu pro MySQL, byl bych moc rad.

S pozdravem Milan Cizek, amatersky programator, D6 Enterprise
Win2k (SP2) a Win98 SE, cizek.milan(zv)seznam(tec)cz, ICQ: 59826637


jak na funkci (playsound a typy)?

[*] Milan ��ek - 3.12.2001 20:11:49

ahoj,
muzete mi nekdo prosim rict, proc mi nechodi nasledujici? V resources mam
ulozeny wavy s patricnymi nazvy (WAVE_INITIAL...), pokud pouziji napr.
PlaySound(PChar('WAVE_INITIAL')...) - vse mi chodi. Kdyz jsem to krokoval,
tak promena v te fci ma skutecne hodnotu 'WAVE_INITIAL'. Vite nekdo jak
nato? Moc diky.

type
TWAVE = (WAVE_INITIAL,
WAVE_STARTUP,
WAVE_BTNCLICK,
WAVE_CHBCLICK);

procedure Play_RSWAVE(const Sound: TWAVE);
begin
PlaySound(PChar(Sound),HInstance,SND_ASYNC or SND_MEMORY or SND_RESOURCE);
end;

A jeste jeden maly dotaz: je mozne mit zvuky v resourcu nekde jinde nez v
sekci WAVE? Myslim napriklad RCData\WAVE\... Jak potom volat jejich
prehrani?? Diky.

S pozdravem Milan Cizek, amatersky programator, D6 Enterprise
Win2k (SP2) a Win98 SE, cizek.milan(zv)seznam(tec)cz, ICQ: 59826637


Ulozeni formulare jako bmp

[*] Klimes Marek <xklime09(zv)stud.fee.vutbr(tec)cz> - 3.12.2001 20:37:05

Dobry den,
potykam s problemem jak do dokumetace vlozit obrazky s castmi meho
programu (hlavni form., dialog. okna,...). Pokud ulozim cely screen jako
bmp, je to nedostacujici, nebot obr. ma velke rozmery a jakekoliv zmene
rozmeru ztracim kvalitu a stava se necitelnym.....
Mohl byste mi nekdo poradit jak na to ??
Popr. jak bych ulozil formular nebo dialog. primo nejakym kodem jako bmp
nebo jiny graf. format ?
Moc dekuji, Marek.

IB/FB - rolename

[*] Pavel Cisar <pcb(zv)atlas(tec)cz> - 3.12.2001 20:57:20

Haj hou!

On 3 Dec 2001, at 17:26, Lud�k ZITA wrote:

> > Take by mne zajimalo, jestli bude nekdy v budoucnu FB podporovat NT
> > autentifikaci.
>
> Aha ja jsem si myslel, ze pro Linux uz je tohle podporovano.

To jsi nejspise zamenil dve veci :-) Na Linuxu je u verze classic
nutne, aby prihlaseny uzivatel na urovni os mel prava k databazi
(na urovni os). Ale to je AFAIK vec pouze Classic verze v lokalnim
pripojeni (tehdy bezi jako in process v ramci klientske aplikace).

S pozdravem

Pavel Cisar
Mobil: 0724 281429
http://www.ibphoenix(tec)cz
Vse co potrebujete pro Firebird a InterBase


IB restore metadata only

[*] Pavel Cisar <pcb(zv)atlas(tec)cz> - 3.12.2001 21:00:22

Haj hou!

On 3 Dec 2001, at 12:42, Roman wrote:

> Zkousel, v tom pripade to skonci o neco pozdeji s takovou tou
> klasickou chybou na tema "bad integer conversion or string
> truncatenation". A take jsou zkousel -i, -g, -c... zda se, ze
> metadata z toho opravdu nedostanu... jenom me stve, ze backup
> udelam bez problemu. Z restore pak dostanu jen to, co je pred
> chybou /tj. par tabulek/.

Asi ti to v tve situaci nepomuze, ale lze udelat backup jen metadat
(viz -m).

S pozdravem

Pavel Cisar
Mobil: 0724 281429
http://www.ibphoenix(tec)cz
Vse co potrebujete pro Firebird a InterBase


Ulozeni formulare jako bmp

[*] Jan Fiala <jan.fiala(zv)iol(tec)cz> - 3.12.2001 21:19:47

1. Pred snimanim nastavit rozliseni na 256 barev. Obrazky pak budou
mnohem mensi.
2. Myslim si, ze je mnohem lepsi nejaky snimac obrazovky (pokud ti
nestaci Alt+PrtScr a Malovani) nez zabudovavat kod do kazdeho
formulare.
3. Do dokumentace velmi casto neni treba ukladat cely formular, ale
jen vyrez, ktery obsahuje to podstatne (opet zmenseni)

Pokud by jsi to chtel delat programove, tak treba vytvorit TBitMap,
nastavit ji rozmery jako formular a pres Canvas.CopyRect prenest obsah
formulare do bitmapy. Tam uz muzes pouzit funkci BitMap.SaveToFile()

------
Jan Fiala
mailto:jan.fiala(zv)iol(tec)cz

3.12.2001 Klimes Marek:
> Dobry den,
> potykam s problemem jak do dokumetace vlozit obrazky s castmi meho
> programu (hlavni form., dialog. okna,...). Pokud ulozim cely screen jako
> bmp, je to nedostacujici, nebot obr. ma velke rozmery a jakekoliv zmene
> rozmeru ztracim kvalitu a stava se necitelnym.....
> Mohl byste mi nekdo poradit jak na to ??
> Popr. jak bych ulozil formular nebo dialog. primo nejakym kodem jako bmp
> nebo jiny graf. format ?
> Moc dekuji, Marek.

Ulozeni formulare jako bmp

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 3.12.2001 21:58:49

From: "Jan Fiala" <jan.fiala(zv)iol(tec)cz>
> 1. Pred snimanim nastavit rozliseni na 256 barev. Obrazky pak budou
> mnohem mensi.

Ahoj,

a mnohem hnusnejsi. Doporucuji spise pouzit nejakou vhodnou kompresi, v tomto
pripade asi PNG format. Navic je v mnoha pripadech prehlednejsi udelat vyrez
nejdulezitejsi casti.

> Pokud by jsi to chtel delat programove, tak treba vytvorit TBitMap,
> nastavit ji rozmery jako formular a pres Canvas.CopyRect prenest obsah
> formulare do bitmapy. Tam uz muzes pouzit funkci BitMap.SaveToFile()

TCustomForm.GetFormImage

Petr Vones

TreeView

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 3.12.2001 22:04:25

From: "Tomas Vida" <vida(zv)uniware(tec)cz>
> Predstavuji si, ze se mi do TreeView nactou z tabulky 'nazvy' a
> 'ID_polozky'. Zobrazovat chci ale pouze nazvy (ID_polozky mi slouzi pro
> nasledny dotaz zpet na sql, takze musi byt svazano s nazvem...) Po
> kliknuti na nazev v TreeView si potrebuju precist odpovidajici ID_polozky.

Ahoj,

TTreeNode ma vlastnost Data, takze ke kazdemu uzlu muzes alokovat nejakou
vlastni strukturu. Samozrejme pak nesmis zapomenout ty data uvolnit, idealne
se k tomu hodi udalost OnDeletion.

V Delphi 6 by to slo resit jeste vice elegantne, protoze tam je mozne si
odvodit od TTreeNode vlastni tridu a tu pak predat v udalosti
OnCreateNodeClass

Petr Vones


IB restore metadata only

[*] Lud�k ZITA <konference(zv)sales(tec)cz> - 3.12.2001 22:04:44


----- Original Message -----
From: "Roman" <sw.maurice(zv)seznam(tec)cz>
To: <delphi-l(zv)clexpert(tec)cz>
Sent: Monday, December 03, 2001 12:42 PM
Subject: Re: IB restore metadata only


> Z restore pak dostanu jen to, co je pred chybou /tj. par tabulek/.

Ahoj.

Mysli, ze se jedna o tohle :

>Je na nekterem poli s jinym CHARSETem definovana DEFAULT
>hodnota ? Pokud ano, pak je to znama chyba

http://sourceforge.net/tracker/index.php?func=detail&aid=212177&group_id=902
8&atid=109028

Resenim je tedy nepouzivat DEFAULT hodnoty.
Mel jsem stejny problem a jine reseni jsem nenalezl.
Ludek


Ulozeni formulare jako bmp

[*] Jan Fiala <jan.fiala(zv)iol(tec)cz> - 3.12.2001 22:08:38

3.12.2001 Petr Vones:
> From: "Jan Fiala" <jan.fiala(zv)iol(tec)cz>
>> 1. Pred snimanim nastavit rozliseni na 256 barev. Obrazky pak budou
>> mnohem mensi.

> a mnohem hnusnejsi. Doporucuji spise pouzit nejakou vhodnou kompresi, v tomto
> pripade asi PNG format. Navic je v mnoha pripadech prehlednejsi udelat vyrez
> nejdulezitejsi casti.

Zalezi, do ceho je pak vkladas. Pokud delas dokumentaci ve Wordu,
stejne se ti to prevede a ulozi v BMP, takze komprese je pak v haji.
A 256 barev v dokumentaci staci. Je to mnohem lepsi, nez to nasnimat v
TrueColor a pak prevadet. Jsou z pak toho klasicke sachovnice na
posuvnicich apod.

------
Jan Fiala
mailto:jan.fiala(zv)iol(tec)cz


ovladani DELPHI 6

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 3.12.2001 22:10:37

From: "Pavel ZIDEK" <delphi(zv)kopr(tec)cz>
> O zdrojaky neprijdu, ale program nejde zkompilovat a hlasi to chybu:
> Cannot debug project unless a host application is defined. Use the
> Run|Parametrs... dialog box.

Ahoj,

a nesnazis se spusit ten balicek do ktereho se komponenta pridala ?

Petr Vones


IB/FB - rolename

[*] Lud�k ZITA <konference(zv)sales(tec)cz> - 3.12.2001 22:14:23


----- Original Message -----
From: "Pavel Cisar" <pcb(zv)atlas(tec)cz>
To: <delphi-l(zv)clexpert(tec)cz>
Sent: Monday, December 03, 2001 8:57 PM
Subject: Re: IB/FB - rolename


Haj hou!

On 3 Dec 2001, at 17:26, Lud�k ZITA wrote:

> > Take by mne zajimalo, jestli bude nekdy v budoucnu FB podporovat NT
> > autentifikaci.
>
> Aha ja jsem si myslel, ze pro Linux uz je tohle podporovano.

>To jsi nejspise zamenil dve veci :-) Na Linuxu je u verze classic
>nutne, aby prihlaseny uzivatel na urovni os mel prava k databazi
>(na urovni os). Ale to je AFAIK vec pouze Classic verze v lokalnim
>pripojeni (tehdy bezi jako in process v ramci klientske aplikace).


Nejak jsem si asi spatne vylozil tohle :
Operating system-level groups are implicit in InterBase security on UNIX,
similarly to the way UNIX users automatically supplement the users in
isc4.gdb.

a existenci poli SYS_USER_NAME a GROUP_NAME v ics4.gdb



Ludek

Konfview a nejaka solidnejsi DB

[*] Lud�k ZITA <konference(zv)sales(tec)cz> - 3.12.2001 22:28:49


----- Original Message -----
From: "Milan #ݿek" <cizek.milan(zv)seznam(tec)cz>
> > Ahoj.
> > Zkousel jsem IB i MySQL a oboji bylo na lokalnim stroji pomalejsi nez
> > Paradox.
>
> Tu rychlost bych prekousnul, i kdyz je to asi to nejdulezitejsi.
>
> Stava se mi, ze naimportuji treba 10 mesicu a dalsi uz tam ani nahodou
> nedostanu. Pise mi to, ze table does not exist a file or directory does
not
> exist. Ty data tam pak uz ani nahodou nedostanu, musim zalozit novou DB a
> vse nacitat odznova.
>
> Druhy problem je, ze kdyz projizdim vyhledane prispevky, obcas mi to hodi
> nejakou chybu a misto textu prispevku zustane prazdny panel.
>
> Ja do paradoxu vubec nevidim, s MySQL mam uz nejake zkusenosti, takze
pokud
> by jsi nasel verzi konfviewu pro MySQL, byl bych moc rad.
>

Ahoj.
No mne podobne problemy Pdox nedela. (velmi zridka mi to lehlo podobne jak
popisujes v poslednim odstavci).
Ono u Paradoxu IMHO trochu vic zalezi i na zeleze (vim, ze u jednoho meho
pdoxoveho programku mel jeden z uzivatelu problemy presne pouze do doby nez
vymenil AMD za INTEL.) Ovsem nejak prilis podlozene to nemam.
Jinak ja jsem KonfView neprepisoval, ale v ocekavani vetsi rychlosti jsem si
data pretahl z DB do MySQL (IB) a zkousel jsem na to jit pres SQL dotazy.
Jak uz jsem psal bylo to pomalejsi.
Jinak spise bych v tomhle veril MySQL nez IB. Zdrojaky ke KonfView jsou a v
zasade by stacilo nahradit TQuery pomoci TMySQLQuery a filtrovani nahradit
SQL dotazama.

Ludek


Traffic mimo LAN

[*] Chytil <chytil4(zv)kn.vutbr(tec)cz> - 4.12.2001 01:59:07

Ahoj lidi.
Potreboval bych nakopnout spravnym smerem. Jsem na lokalni siti a potrebuji
merit odchozi a prichozi traffic mimo LAN. Tzn. z IP adres MIMO rozsah
123.456.xxx.xxx. Mate nekdo nejaky napad, jak to resit? Je na to neco v
D5ent? Popr. nejaka API funkce? Jak se vlastne da zjistit mnozstvi
prenesenych dat? Jsem v oblast siti zacatecnik, ale nikde jsem nic podobneho
nevidel a tak si to asi musim napsat sam. Dost to specha (hrozi mi sankce za
prekroceni limitu) a tak dekuji za kazde, i sebemensi, nakopnuti spravnym
smerem.
S pozdravem Tonda.

ovladani DELPHI 6

[*] Pavel ZIDEK <delphi(zv)kopr(tec)cz> - 4.12.2001 05:30:25

Delam to tak, ze:
Component|Install Component...vyberu atd a pak se rozjede okno Package -
dclusr.dpk. Tady stisknu Compile, komponenta se nainstaluje a program uz
nezkompiluji a dava vize uvedenou hlasku.
DELPHI jsou ciste, minuly tyden nainstalovane. Delalo to na starem PC, tak
nevim.
Pavel

Nemohu mit nejake zvlastni DELPHI. Patch z Borlandu nejde stahnout.
DELPHI jsou nainstalovana do adresare C:\D6\..., komponenty jsou v jinem
adresari C:\Dc6\...
Uz si nevi rady

Co kdybych vzal instalacky Do Belohradu a tam na nejakem PC zkusil D6
nainstalovat.
Pavel


> From: "Pavel ZIDEK" <delphi(zv)kopr(tec)cz>
> > O zdrojaky neprijdu, ale program nejde zkompilovat a hlasi to chybu:
> > Cannot debug project unless a host application is defined. Use the
> > Run|Parametrs... dialog box.
>
> a nesnazis se spusit ten balicek do ktereho se komponenta pridala ?
>
> Petr Vones


Konfview a nejaka solidnejsi DB

[*] Jan Sebel�k <honza(zv)haes(tec)cz> - 4.12.2001 07:46:06

> Odes�latel: Lud�k ZITA <konference(zv)sales(tec)cz>
> Jinak spise bych v tomhle veril MySQL nez IB.
Duvody? Argumenty?

Honza
=========================================
= HAES - RNDr. Jan Sebelik
= http://www.haes(tec)cz
= Skolici a konzultacni stredisko pro Delphi a Win32
= Vojtiskova 206
= 507 81 Lazne Belohrad
= tel. 0434 692 569 (0776 347735)
=========================================

ovladani DELPHI 6

[*] Jan Sebel�k <honza(zv)haes(tec)cz> - 4.12.2001 07:52:55

> Odes�latel: Pavel ZIDEK <delphi(zv)kopr(tec)cz>
> Co kdybych vzal instalacky Do Belohradu a tam na nejakem PC zkusil D6
> nainstalovat.
Pokud mas na mysli "Delphi 2000", pak tam rozhodne Delphi nainstalovano bude.
Anebo to chces zkusit driv nez 6.-7.2.2002? Taky mozno.

Honza
=========================================
= HAES - RNDr. Jan Sebelik
= http://www.haes(tec)cz
= Skolici a konzultacni stredisko pro Delphi a Win32
= Vojtiskova 206
= 507 81 Lazne Belohrad
= tel. 0434 692 569 (0776 347735)
=========================================

jak na funkci (playsound a typy)?

[*] Jiri Wendl, KSH-Data <wendl(zv)ksh-data(tec)cz> - 4.12.2001 07:56:26

> type
> TWAVE = (WAVE_INITIAL,
> WAVE_STARTUP,
> WAVE_BTNCLICK,
> WAVE_CHBCLICK);
>
> procedure Play_RSWAVE(const Sound: TWAVE);
> begin
> PlaySound(PChar(Sound),HInstance,SND_ASYNC or SND_MEMORY or SND_RESOURCE);
> end;

Ahoj
Tohle ti nemuze fungovat protoze obsah promene Sound neni string, ale ordinalni hodnota.
Tzn. poradove cislo.

Zkus si spise vytvorit konstantu se stringy a pak se do ni pres tu ordinalni hodnotu odkazovat.

const
SWave: array[0..3] of string = ('WAVE_INITIAL',
'WAVE_STARTUP',
'WAVE_BTNCLICK',
'WAVE_CHBCLICK');

procedure Play_RSWAVE(const Sound: TWAVE);
begin
PlaySound(PChar(SWave[Ord(Sound)]),HInstance,SND_ASYNC or SND_MEMORY or SND_RESOURCE);
end;


Preji hodne zdaru

Jirka
========================
KSH-Data s.r.o.
Dobrovsk�ho 56
56301 Lan#kroun
tel:0467/523258
tel+fax:0467/522181
e-mail:wendl(zv)ksh-data(tec)cz
www.ksh-data(tec)cz
ICQ:122972218

Mrtva RXLibrary?

[*] Ing. Petr #vejda <lingvista(zv)lingvista(tec)cz> - 4.12.2001 08:08:47

Muj dotaz zapadl v zapomneni, proto jej zkusim ozivit.

Existuje jeste firma co dela RXLibrary a kam premistila svuj web?

Je to pro me dost dulezite. Nemuzu pouzivat komponenty, ktere nemaji
"zarucen" dalsi vyvoj a plavou na vode.

Na jejich strankach (www.rxlib.com) jsem nejdrive nasel internetovy obchod a
ted dokonce PORNO (!!!) site.


Diky

Petr
---
Odchoz� zpr�va neobsahuje viry.
Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.303 / Virov� b�ze: 164 - datum vyd�n�: 24.11.2001


Ulozeni formulare jako bmp

[*] Jiri Novotny <novotny(zv)ftknw.upol(tec)cz> - 4.12.2001 08:23:26

> potykam s problemem jak do dokumetace vlozit obrazky s castmi meho
> programu (hlavni form., dialog. okna,...). Pokud ulozim cely screen jako
> bmp, je to nedostacujici, nebot obr. ma velke rozmery a jakekoliv zmene
> rozmeru ztracim kvalitu a stava se necitelnym.....

1. Nejlepsi by myslim bylo - nez kvuli dokumentaci vkladat
uzivatelsky nepotrebny kod do programu - ulozit pomoci
Alt-PrintScreen aktualni okno a pres nejaky graficky editor to dale
pripadne upravit.

2. Z nejakeho stareho programu jsem vystrachal kod pro ulozeni
formulare do JPG (pro BMP to lze upravit).

procedure TMujForm.UlozFormular(JmenoSouboru:String);
var
FormImage : TBitmap;
JP : TJpegImage;
begin
FormImage := GetFormImage;
try
JP := TJpegImage.Create;
try
with JP do begin
Assign(FormImage);
SaveToFile(JmenoSouboru);
ShowMessage('Ulozeno');
end;
finally
JP.Free;
end
finally
FormImage.Free;
end;
end;

Jirka.

Indexovy subor CDX

[*] Slavom�r �eke# - 4.12.2001 08:42:07

Ako v Delphi vytvorim databazu s indexovym suborom CDX ?

SURNE

Ak mozte napiste postup ako pre laika :) vdaka

Slavo


DELPHI 6

[*] Krayzel Libor <Libor.Krayzel(zv)czech-tv(tec)cz> - 4.12.2001 08:49:47

Mam dva dotazy:

a, jsou Delphi 6 opravdu free?
b, mohu je provozovat na stejnem stroji paralelne s Delphi 4?

Traffic mimo LAN

[*] Dalibor Toman <dtoman(zv)fortech(tec)cz> - 4.12.2001 08:53:47

> Potreboval bych nakopnout spravnym smerem. Jsem na lokalni siti a
potrebuji
> merit odchozi a prichozi traffic mimo LAN. Tzn. z IP adres MIMO
rozsah
> 123.456.xxx.xxx. Mate nekdo nejaky napad, jak to resit? Je na to
neco v
> D5ent? Popr. nejaka API funkce? Jak se vlastne da zjistit mnozstvi
> prenesenych dat? Jsem v oblast siti zacatecnik, ale nikde jsem nic
podobneho
> nevidel a tak si to asi musim napsat sam. Dost to specha (hrozi mi
sankce za
> prekroceni limitu) a tak dekuji za kazde, i sebemensi, nakopnuti
spravnym
> smerem.

Zadny nastroj ve Win (natoz v D5) neexistuje. Aby jsi byl schopen
merit data
odchazejici/prichazejici z do urcite site, musis mit neco co si ty
packety prohlidne
a rozhodne, zda je pocitat nebo ne.
Napada me jedine pouzit nejakou komercni aplikaci nebo packet snifer
driver a
nad nim postavit pocitadlo dat (ovsem sniffer neni uplne optimalni -
pokud nejde
nastavit tak, aby chytal jen minimalni mnozstvi bytu z paketu - mohlo
by dochazet
k zbrzdovani provozu pri velkych rychlostech)

D. Toman

Mrtva RXLibrary?

[*] skalsky(zv)oksystem(tec)cz - 4.12.2001 09:08:27

Zkus doj��ck� zrcadlo ...
http://www.fet.uni-hannover.de/~od/rxlib

P.S.
(zhruba tak pred 3-4 mesicema jsem byl naposledy na rxlib.com a 3x jsem
refreshnul a 3x se mi natahla jina stranka ... nastesti na 3. pokus ta
sprava, stanul jsem, co se dalo ... ). Mozna by stalo za pokus napsat
autorum RXLib maila ... tedy pokud uz nevalej sudy nekde na dne Orliku.

Milan
����
"still" Delphi beginner
D5-Ent, W98,
Skalsky(zv)oksystem(tec)cz
ICQ #67571111


--------------

Existuje jeste firma co dela RXLibrary a kam premistila svuj web?
Je to pro me dost dulezite. Nemuzu pouzivat komponenty, ktere nemaji
"zarucen" dalsi vyvoj a plavou na vode.

Na jejich strankach (www.rxlib.com) jsem nejdrive nasel internetovy obchod a
ted dokonce PORNO (!!!) site.

ovladani DELPHI 6

[*] Ondrej Kelle <O.Kelle(zv)digitalpublishing.de> - 4.12.2001 09:14:26

> Cannot debug project unless a host application is defined. Use the
> Run|Parametrs... dialog box.

To je predsa hlaska, ktoru dostanes vzdy, ked sa snazis spustit nejaku DLL
(package je tiez DLL).
DLL nie je spustitelna sama o sebe, potrebuje host .exe.

Podla mna tu chybu dostavas, pretoze aktivnym projektom v IDE je ta package.
Po jej instalacii by malo stacit ju zatvorit, aby sa opet aktivoval Tvoj
projekt.

HTH
TOndrej


dbExpress

[*] cis <cis(zv)atlas(tec)cz> - 4.12.2001 09:19:49

Hi,
provozuje nekdo dbExpress v aplikaci? Zkousel jsem pristup k IB, a vysledky
dost slabe. Uplne trapny SQL dotaz na BDE trva asi 3s a na dbExpress asi
minutu. Setkal se s tim nekdo?

alda


Pouziti Buffer

[*] <bejcek(zv)centrum(tec)cz> - 04.12.2001 09:44:37

Ahoj kluci muzete mi nekdo ukazat jak se da cist a zapisovat do
bufferu,hlavne mi jde o mazani a hledani na urcite pozici.Jestli
to tedy jde.Nejak to nemuzu najit v helpu:-)))
Profi amater Aldik Pavel D5 Ent W2000

-----
U�ite�n� informace pro v�no�n� pohodu
http://vanoce.centrum(tec)cz

DELPHI 6

[*] Ben, Martin (CAP, GCF) <Martin.Ben(zv)gecapital(tec)com> - 4.12.2001 09:45:17

Delphi 6 Personal Edition jsou free a ja je mam naistalovane spolu D5Ent a
chodi to bez problemu.

Martin Ben

PS: Ted prave vyslo nove cislo casopisu Computer, u ktereho je jako priloha
CD od Borlandu: D6PE, Kylix, JBuilder Trial, C++ Compiler a dalsi.

> -----Puvodni zprava-----
> Od: Krayzel Libor [mailto:Libor.Krayzel(zv)czech-tv(tec)cz]
> Odeslano: 04.12.2001 08:50
> Komu: 'delphi-l(zv)clexpert(tec)cz'
> Predmet: DELPHI 6
>
>
> Mam dva dotazy:
>
> a, jsou Delphi 6 opravdu free?
> b, mohu je provozovat na stejnem stroji paralelne s Delphi 4?
>

Indexovy subor CDX

[*] Bednar��k Dalibor <dalibor(zv)torola(tec)cz> - 4.12.2001 10:00:22

Ja to delam takhle

Vytvorim si DataModul na nej dam TDatabase a pojmenuji ho treba DBSklad

Do DBSklad.PARAMS dam

DEFAULT DRIVER=FOXPRO
PATH=c:\ //Cesta k databazi

Pri DBSklad.OnCreate provedu kod

Session.ConfigMode:=[cfmSession ];
TS:=TSTringList.Create;
TS.Add('LEVEL=25'); //DBF SOUBOR BUDE TYPU FOXPRO
TS.Add('LANGDRIVER=FOXCZWIN'); //DBF SOUBOR BUDE V 1250
Session.ModiFyDriver('FOXPRO',TS);
TS.Free;


Pro vytvareni tabulek pouzivam SQL

DBSklad.execute('create table Zbozi ( klic character(5), CISLO Numeric(6),
N Numeric(3), Val Float(6,3), Typ Numeric(1) )', nil, false,nil);

Pro vytvareni indexu pouzivam SQL

DBSklad.execute('create index KLIC on Zbozi (KLIC)' , nil, false,nil);


----- Original Message -----
From: "Slavom�r #eke�" <cekel(zv)noves.sk>
To: <delphi-l(zv)clexpert(tec)cz>
Sent: Tuesday, December 04, 2001 8:42 AM
Subject: Indexovy subor CDX


> Ako v Delphi vytvorim databazu s indexovym suborom CDX ?
>
> SURNE
>
> Ak mozte napiste postup ako pre laika :) vdaka
>
> Slavo
>

Traffic mimo LAN

[*] PeJaSoft <pejasoft(zv)volny(tec)cz> - 4.12.2001 10:07:37

Zkus se podivat po NetMonitoru od firmy Tiny Software. Zkousel jsem ho a je
z mnou testovanych nejlepsi.
Jako Shareware ti vydrzi, myslim, asi 3 mesice.

S pozdravem

Petr Jarkovsky
pejasoft(zv)post(tec)cz

----- Original Message -----
From: "Chytil" <chytil4(zv)kn.vutbr(tec)cz>

> Ahoj lidi.
> Potreboval bych nakopnout spravnym smerem. Jsem na lokalni siti a
potrebuji
> merit odchozi a prichozi traffic mimo LAN. Tzn. z IP adres MIMO rozsah
> 123.456.xxx.xxx. Mate nekdo nejaky napad, jak to resit? Je na to neco v
> D5ent? Popr. nejaka API funkce? Jak se vlastne da zjistit mnozstvi
> prenesenych dat? Jsem v oblast siti zacatecnik, ale nikde jsem nic
podobneho
> nevidel a tak si to asi musim napsat sam. Dost to specha (hrozi mi sankce
za
> prekroceni limitu) a tak dekuji za kazde, i sebemensi, nakopnuti spravnym
> smerem.
> S pozdravem Tonda.

IB restore metadata only

[*] Mirek Junek <mirek.junek(zv)worldonline(tec)cz> - 4.12.2001 10:36:19

Male doplneni od meho kolegy:

Pokud se jedna o DEFAULT, tak IB ma v sobe prastary bug, ktery se projevi
tim ze RESTORE neprobehne pro tabulky, kteri maji CHAR anebo VARCHAR s
default hodnotou, ktera obsahuje pismenka s diakritikou anebo azbukou.
Nejsem jisty, ale myslim ze u FB ten bug je v stavu "CLOSED".


----- Original Message -----
From: "Lud�k ZITA" <konference(zv)sales(tec)cz>
To: <delphi-l(zv)clexpert(tec)cz>
Sent: Monday, December 03, 2001 10:04 PM
Subject: Re: IB restore metadata only


|
| ----- Original Message -----
| From: "Roman" <sw.maurice(zv)seznam(tec)cz>
| To: <delphi-l(zv)clexpert(tec)cz>
| Sent: Monday, December 03, 2001 12:42 PM
| Subject: Re: IB restore metadata only
|
|
| > Z restore pak dostanu jen to, co je pred chybou /tj. par tabulek/.
|
| Ahoj.
|
| Mysli, ze se jedna o tohle :
|
| >Je na nekterem poli s jinym CHARSETem definovana DEFAULT
| >hodnota ? Pokud ano, pak je to znama chyba
|
|
http://sourceforge.net/tracker/index.php?func=detail&aid=212177&group_id=902
| 8&atid=109028
|
| Resenim je tedy nepouzivat DEFAULT hodnoty.
| Mel jsem stejny problem a jine reseni jsem nenalezl.
|
|
|
| Ludek
|
|

Desetinna mista v IB

[*] Petr Poto�ek <pp1(zv)volny(tec)cz> - 4.12.2001 10:45:35

Ahoj,
je mozne nekde nastavit, kolik desetinnych mist se ma pri vypoctech v
triggeru
pouzivat?
Docela jsem se zdesil nad vypoctem:
8000/176*176 = 7920.

Po ruznem zkouseni jsme dosel k zaveru, ze se k jednotlivym vypoctum pouzije
pocet desetinnych mist dle polozky s nejvyssim poctem desetinnych mist.
To by vsak znamenalo bud zbytecne desetinne mista ve strukture tabulek anebo
slozite zaokrouhlovani v triggerech.

Poradte, prosim, nekdo, jak na to jit jednoduseji.

Petr Potocek


Desetinna mista v IB

[*] Lebeda David <david.lebeda(zv)comarr(tec)cz> - 4.12.2001 11:05:13

> je mozne nekde nastavit, kolik desetinnych mist se ma pri vypoctech v
> triggeru pouzivat? Docela jsem se zdesil nad vypoctem: 8000/176*176 =
> 7920.
>

A jakeho typu jsou ta data?

David Lebeda


Mrtva RXLibrary?

[*] Ales Radikovsky <radik(zv)allstar(tec)cz> - 4.12.2001 11:05:55

> Existuje jeste firma co dela RXLibrary a kam premistila svuj web?
>
> Je to pro me dost dulezite. Nemuzu pouzivat komponenty, ktere nemaji
> "zarucen" dalsi vyvoj a plavou na vode.
>
> Na jejich strankach (www.rxlib.com) jsem nejdrive nasel
> internetovy obchod a
> ted dokonce PORNO (!!!) site.

No ja bych �ekl ze jsi cele RX komponenty spatne pochopil..... RXka jsou
freeware, kter� napsalo par schopnych rusu, zadna firma. Necekej, ze
obecne free komponenty budou mit zarucen dalsi vyvoj, jako kdyz do
nekoho cpes prachy za kazdou aktualizaci knihovny (a ani tam ta
zarucenost nen� zrovna nejlepsi). Pokud jsou nejake free komponenty
opravdu dobre, tak si sv�j zaruceny vyvoj zajisti samy, protoze se
vzdycky najde n�kdo, kdo ho aspon prelozi pro novou verzi Delphi. Ale
obavam se, ze u RX komponent uz pujde spis o ty upravy pro prelozeni v
nove verzi Delphi, ne o rozsirovani. Na druhou stranu jsou uz nektere
komponenty z RX s novymi verzemi Delphi celkem zbytecne.

Kazdopadne za sebe rikam ze Rxlib je skoda, pokud postupne zaniknou :(

Ales


Desetinna mista v IB

[*] Karel Rys <delphi(zv)zas-me(tec)cz> - 4.12.2001 11:31:36

Petr Poto�ek dne 4 Dec 2001 v 10:45:

> je mozne nekde nastavit, kolik desetinnych mist se ma pri vypoctech v
> triggeru pouzivat? Docela jsem se zdesil nad vypoctem: 8000/176*176 =
> 7920.

Ahoj,

neslo by pouzit CAST? I v SQL dotazec nekdy musim dat neco na zpusob
CAST(pole as float)/176*176

Karel Rys


Delphi 6 versus Win95

[*] Karel Rys <delphi(zv)zas-me(tec)cz> - 4.12.2001 11:33:36

Dobry den,

rad bych prevedl aplikaci do Delphi 6, ale ponekud me zarazilo, ze tam nikde nezminuji Windows 95. Mate s tim nekdo
zkusenosti? Chodi aplikace z D6 bez problemu pod Win95 nebo jsou nejake oblasti (komponenty, funkce, ...), ktere sice
kompilator vezme, ale pod Win95 mi to chodit nebude?

Diky, Karel Rys


OT: Ulozeni formulare jako bmp

[*] Marek Soukup <code(zv)btt(tec)cz> - 4.12.2001 11:40:27

> Zalezi, do ceho je pak vkladas. Pokud delas dokumentaci ve Wordu,
> stejne se ti to prevede a ulozi v BMP, takze komprese je pak v haji.
> Jan Fiala
> mailto:jan.fiala(zv)iol(tec)cz

Tady jenom malej OT: nevkladejte ty obrazky, ale odkazujte se na ne, neprijdete o format a hlavne se to lepe udrzuje (pokud vkladam obrazek, ktery se casto opakuje)
S pozdravem
Marek Soukup


Program na tvorbu vyvojovych schemat

[*] vladimir.michl(zv)hlubocky.del(tec)cz - 4.12.2001 11:48:17


> kresleni cehosi nez Visio. Mozna by stalo poohlednout se po
> necem, co ,,smrdi`` UML (coz Visio 2002 je, ale...).

No na skole jsme kreslili UML v Rational Rose (www.rational.com). Myslim
ze se od nich da stahnou i nejaka zkusebni verze. V knize Myslime v jazyku
UML jeste mluvi o nastroji Select Enterprise a Visual UML (od microsoftu,
rekl bych ze to je predchudce Visio).

Jinak OMG (Object Model Group - www.omg.org) skupina, ktera tvori UML,
podporuje prave Rational Rose.

Vladimir Michl

DELPHI 6

[*] Krayzel Libor <Libor.Krayzel(zv)czech-tv(tec)cz> - 4.12.2001 12:32:51

> Delphi 6 Personal Edition jsou free

Nejaka omezeni?

Mrtva RXLibrary?

[*] Do�ekal Radek <RDocekal(zv)CSAS(tec)cz> - 4.12.2001 12:49:36

Tezko rict, co delaji. Na nejakem ruskem webu (uz nevim, kde) jsem nasel
zpravu, ze ziskali mista v USA, o coz jim snad od zacatku slo (myslim, ze i
na puvodnim www.rxlib.com byla najaka hlaska v tomto smyslu). Kazdopadne
existuje port RXlib v2.75 do Delphi 6 od Olega Fjodorova na
http://www.oxygensoftware.com/download/rx275d6.zip.

S pozdravem
Radek Docekal
<mailto:rdocekal(zv)csas(tec)cz> ICQ: 9008367

> -----Original Message-----
> From: Ing. Petr �vejda [mailto:lingvista(zv)lingvista(tec)cz]
> Sent: Tuesday, December 04, 2001 8:09 AM
> To: Konference Delphi
> Subject: Mrtva RXLibrary?
>
>
> Muj dotaz zapadl v zapomneni, proto jej zkusim ozivit.
>
> Existuje jeste firma co dela RXLibrary a kam premistila svuj web?
>
> Je to pro me dost dulezite. Nemuzu pouzivat komponenty, ktere nemaji
> "zarucen" dalsi vyvoj a plavou na vode.
>
> Na jejich strankach (www.rxlib.com) jsem nejdrive nasel
> internetovy obchod a
> ted dokonce PORNO (!!!) site.
>
>
> Diky
>
> Petr


Interbase server - licencia

[*] Vakoni� Pavol <vakonic(zv)tyory.sk> - 4.12.2001 12:50:06

Zdravim,

vyvajam aplikaciu, ktora bude bezat na Interbase. Viete mi niekto poradit ako a kde legalne zakupit licenciu pre koncoveho uzivatela produktu Interbase server + klientov.

Dakujem

Palo

ADO, RDS

[*] Ing. Jarom�r Sola� <solar(zv)magion(tec)cz> - 4.12.2001 13:00:35

Dobry den,
nevite nekdo, jak ve vicevrstve aplikaci zalozene na ADO a RDS predam na
server podminky pro vyber podmnoziny dat? Napriklad na AS mam zakladni dotaz
(select * from tabulka). Uzivatel zada omezeni, ze ho zajimaji jen prvnich
deset (polozka1 < 10). Jak tuto podminku prenesu na AS pres RDS?

WNT4.0 SP5, D5Ent, ADOExpress (Adonis?)

S pozdravem

Ing. Jaromir Solar (jaromir.solar(zv)magion(tec)cz)
Magion system a.s. (http://www.magion(tec)cz)
tel./fax :0657/614 289

Interbase server - licencia

[*] Ota Maly <ota.maly(zv)volny(tec)cz> - 4.12.2001 13:03:40

Ahoj,
Pokud mluvime o Interbase 6 tak treba na http://shop.borland(tec)cz (mozna jeste
prodavaji i starsi, ale to nevim) nebo si muzes stahnout "necertifikovanou"
verzi, ktera je pro klienta i server zdarma(hledej na
http://www.ibphoenix.com).

S pozdravem
Ota Maly

PaPouch elektronika
http://www.papouch.com


Zdravim,

vyvajam aplikaciu, ktora bude bezat na Interbase. Viete mi niekto poradit
ako a kde legalne zakupit licenciu pre koncoveho uzivatela produktu
Interbase server + klientov.

Dakujem

Palo

DELPHI 6

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 4.12.2001 13:39:28

From: "Krayzel Libor" <Libor.Krayzel(zv)czech-tv(tec)cz>
> > Delphi 6 Personal Edition jsou free
> Nejaka omezeni?

Ahoj,

pouze pro nekomercni aplikace.

Petr Vones


Delphi 6 versus Win95

[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 4.12.2001 13:42:01

From: "Karel Rys" <delphi(zv)zas-me(tec)cz>
> rad bych prevedl aplikaci do Delphi 6, ale ponekud me zarazilo, ze tam nikde
> nezminuji Windows 95. Mate s tim nekdo zkusenosti? Chodi aplikace z D6 bez
> problemu pod Win95 nebo jsou nejake oblasti (komponenty, funkce, ...), ktere
> sice kompilator vezme, ale pod Win95 mi to chodit nebude?

Ahoj,

rekl bych ze je to dano vyvojem, proste nelze donekonecna podporovat tolik
verzi Windows, koneckoncu podporu Win95 ukoncil i Microsoft. Vetsina veci asi
chodit bude. Z komponent ktere nebudou chodit na Win95 jsou to tusim Shell
komponenty. Jedinou moznosti je danou aplikaci vyzkouset.

Petr Vones

OT: Rada pod jakym OS programovat?

[*] <suky(zv)atlas(tec)cz> - 4.12.2001 13:55:19

Dovolte mi moji malou narazku, ale ....
nekolikrat se tu lidi ptali pod jakym operacnim systeme je nejlepsi psat v Delphi. Mam jednu radu, ktera vychazi z me vlastni zkusenosti.
Piste program pod MS Windows ME, jako ja. Za par dni zjistite, ze Windows98, nebo ME neni to prave orechove a hned vam bude jasne jaky OS pouzit.
Druhou stranu problemu je fakt, ze se na WinME projevi kazda drobna vada v aplikaci, predevsim problemy se system. prostredky. Budete se snazit psat aplikaci velmi stridme a budete si davat pozor co vsechno pouzivate a zda je to opravdu nevyhnutelne.

Jeste jednou sorry tak trochu za OT, ale momentalne jsem na WinME nastavany. Koupil jsem si notebook a k nim dostal ME, dlouho tam asi nevydrzi, alespon do doby nez si nasetrim na Win2000 ktere povazuji za omyl Microsoftu, delam na nich na jinem pocitaci a nikdy se mi neseknul pocitac a Delphi nehavarovali na sys. prostredcich.

P.S.
Prosim, pokud nekdo chcete reagovat na tento email, tak na moji adresu, at nam Admin neda do kozichu.

Michal


Delsi: Chyby/nedostatky Kylix/D6

[*] Radek Cervinka <radek.cervinka(zv)centrum(tec)cz> - 4.12.2001 13:59:58

Par poznamek:

DBComponenty (a casto nejen ty):
[#4.1] Kazda je jinak vysoka ci siroka a u nekterych (napr.
[Lookup]ComboBox) nelze vysku ani zmenit ! Jak nekdo chce s timhle dosahnout
profesionalniho vzhledu aplikace to tedy netusim, o nejakych standardech ani
nemluve ...;

[#4.3] TDBImage: neumi GIF, JPEG ...;
umi, ale musi se ten format zaregistrovat, mimochodem na GIF je treba mit
licenci

[#5.2] Srovnat TabOrder na komponentach je casto nemozne - prirazuje jim
existujici, nedovoli priradit vlastni a pod. - deje se zejmena pokud
komponenty kopiruji.
- prave tlacitko na formular a TabOrder mi zatim mockrat neselhalo

[#5.3] Help: pod linuxem strasne pomaly
- to je fakt hrozny

[#5.4] EDITOR: celkem mi tam chybi veci bezne v UNIX develop editorech,
napriklad odsazovani oznaceneho bloku, predat oznaceny text externimu
skriptu a vlozit jeho vysledek a pod.. V Kylixu je navic dost pomaly.
- odsazeni ctrl+K+I, ctrl+K+U (indent, unindent)
- Kylix 2 je trosku rychlejsi

[#5.6] U RAD nastroje bych cekal nejaky generator zakladu projektu a
generator zarovnanych db komponent dle definice datasetu;
- File/New.. /Business/ DatabaseFormWizard

Ruzne:
[#7.1] Instalace: generating font matrix se mi nikdy nedokoncil (Kylix, pry
opraveno ve verzi 2)
- u Kylixu 1 a MDK 8 mi to fongovalo normalne, ted mam MDK 8.1 a kylix 1 i 2
to delaji

[#7.2] Ukonceni: celkem casto hazi Access Violation ve 2 modulech (Delphi)
- pozorval jsem a aspon u mne to souvisi z dedicnosti formularu (kdyz tam
moc sachuju)

Radek

Delsi: Chyby/nedostatky Kylix/D6

[*] David Janko <djanko(zv)infoware(tec)cz> - 4.12.2001 14:03:43

Dekuji za odpoved.

----- Original Message -----
From: "Ond�ej Sekera" <sekera(zv)supreme(tec)cz>
To: <delphi-l(zv)clexpert(tec)cz>; <honza(zv)haes(tec)cz>
Sent: Monday, December 03, 2001 7:28 PM
Subject: Re: Delsi: Chyby/nedostatky Kylix/D6


> Delphi ma zcela jiste mnoho nedostatku a bylo by nemoudre predpokladat, ze
> se mnoho dalsich neobjevi pri slouceni dvou platforem. Jenom ve zkratce,
co
> sem si vzpomnel:
To jsem predpokladal, jen si myslim, ze body #1-#3 by v necem takovem jako
je Delphi (myslim ze je silne DB orientovano) melo chodit naprosto
spolehlive, je to dost dulezity zaklad ...> *Mnoho chyb Delphi 6 �e#� posledn� patch, mrkn�te na
> http://community.borland.com/article/0,1410,27800,00.html
Ano, ale ne tyto, dela to i s update ...

> * Pouzivat DB komponenty Delphi je velmi originalni metoda sebevrazdy.
Jsou
> dobre tak vyrobeni domaci evidence knih, coz plati jak pro vizualni, tak
> nevizualni komponenty. Existuji (casto i freewareove) nahrady, ktere
> bezpecne funguji a <zkraceno>
Hledal jsem a nic pouzitelneho pro DB zatim nenasel - pekne vypadal ZEOS,
jenze zkuste si ho pouzit v CLX i kdyz autori tvrdi, ze by mel fungovat :(.
Psal jsem jim o tom i do konf. ale vypada to nadale zcela mrtve. To je
problem i s ostatnimi komponentami ktere jsem nasel - zkuste je nainstalovat
a pak dat nova CLX app - a zmizi ... a navic vsechny vychazi z tridy
TDataset a jestli je ta chyba #1.1 v nem, tak nejspis nepomuzou. Jestli
nekdo vi kde bych mohl sehnat funkci CLX DB komponenty (potrebuji hl.
komunikaci s mysql) pripadne je pouziva, budu moc vdecny (muzou byt i
komercni, pokud tam bude rozumna cena a bude moznost si je vyzkouset, ze
opravdu chodi). Uvedene linky jsem az na jeden uz prosel, na ten novy se
samozrejme podivam, ale velkou nadeji v tom nevidim :(. Dekuji.

> * TDBImage pokud vim jpg i gif umi, pred casem jsem s jistymi problemy
tyto
> formaty zobrazoval
me hodil unsupported format nebo tak neco ....

> * Mnozstvi funkci do IDE Delphi doplnuji tzv. Expert sety; zminene
> odsazovani rozhodne obsahuji (+1000 dalsich fci) -
http://www.gexperts.org/
Diky, pokud budou DB komponenty tak jiste projdu (bez nich mi odsazeni
nepomuze ;-) ).

> * TabOrder v design
> * Rozpad oznaceni ...
<zkraceno>
No, ve verzi 6 uz to asi neco vypovida o firme ktera to dela ... ale neni to
to nejdulezitejsi, prezil bych to ...

> * TColorDialog - taky me to prekvapilo. Udelal sem si vlastni.
To ja bohuzel zatim neumim, ale viz predchozi.

> Proste je to nove, mnoho chyb bude casem jiste odstraneno (mnoho pribyde
:).
....
Spica, tohle reknu svym zakaznikum :-)))))))))))

.... tolik fatalnich nedostatku snad nemelo ani
> Windows 95 prerelease...
pak panbuh s nami a zle pryc ;-) ... ja sem prave v te dobe utekl k linuxu
;-)

---
Best Regards,
David Janko
programmer & Linux system administrator
djanko(zv)infoware(tec)cz
Czech Republic / Central Europe

dbExpress

[*] David Janko <djanko(zv)infoware(tec)cz> - 4.12.2001 14:13:13

Zkousel jsem to - ne s IB ale mysql. Na rychlost si v principu stezovat
nemuzu, ale je fakt ze zdrzuji operace ktere to dela kolem toho - dle logu
mysql snad kazdy dataset dela connect/disconect, dokolecka se to pta na
indexy po kazdem selectu, zbytecne to pouziva transakcni prikazy mysql i
kdyz to po nem nikdo nechce, neprisel jsem na to kde nastavit komprimovany
prenos ..... mozna ze to zatezuje tohle ?

Best Regards,
David Janko
programmer & Linux system administrator
djanko(zv)infoware(tec)cz
Czech Republic / Central Europe


> Hi,
> provozuje nekdo dbExpress v aplikaci? Zkousel jsem pristup k IB, a
vysledky
> dost slabe. Uplne trapny SQL dotaz na BDE trva asi 3s a na dbExpress asi
> minutu. Setkal se s tim nekdo?
>
> alda
>

Desetinna mista v IB

[*] Petr Potocek <pp1(zv)volny(tec)cz> - 4.12.2001 14:38:28

Citatel je Integer, jmenovatel a nasobek - Numeric(6,0) a vysledek je typu
Numeric(8,0).

V pripade, ze je jmenovatel Numeric(6,2) tak je vysledek 7999
a pokud je citatel typu Double precision tak je vysledek spravny.

Petr Potocek

----- Original Message -----
From: "Lebeda David" <david.lebeda(zv)comarr(tec)cz>
To: <delphi-l(zv)clexpert(tec)cz>
Sent: Tuesday, December 04, 2001 11:05 AM
Subject: Re: Desetinna mista v IB


> > je mozne nekde nastavit, kolik desetinnych mist se ma pri vypoctech v
> > triggeru pouzivat? Docela jsem se zdesil nad vypoctem: 8000/176*176 =
> > 7920.
> >
>
> A jakeho typu jsou ta data?
>
> David Lebeda
>

QuickReport a IB-computed field

[*] Petr Poto�ek <pp1(zv)volny(tec)cz> - 4.12.2001 14:44:22

Ahoj,
je normalni, ze se pri tisku pocitane polozky vytisne nazev namisto hodnoty
polozky nebo zase delam neco spatne?
(W2000, D6, IB6)

Petr Potocek


Mrtva RXLibrary?

[*] Milan Vajda <milanv(zv)ba.sanet.sk> - 4.12.2001 15:03:42

Na torry je rx2.75 upravena pre D6
http://www.torry.net/vcl/packs/huge/rx275d6.zip


Problem z tiskovymi joby

[*] Tom� Otrusin�k���:��)�#�⚚�#�? - 4.12.2001 15:06:01

Dobry den!

Potreboval bych poradit s problemem s ktery jsme se setkal! Pri zjistovani
tiskovych uloh na libovolne tiskarne me tento kod funguje na Win98 ale na
Win2000 me zjisti pouze prvni tiskovy job a pokud je ve fronte dva a vice
jobu tak rutina nefunguje. Rutina je prebrana z knihy "1001 tipu a triku pro
Delphi". Za pripadne rady diky!

Tomas Otrusinik


procedure TForm1.Button2Click(Sender: TObject);
const
MaxJobs = 1024;
type
TArrayOfJobs = array[1..1024] of TJobInfo2;
var
NumJobs: Integer;
pcbNeed,pcReturned : Dword;
Cnt : Integer;
PrinterName, Driver, Port : array[0..255] of char;
hPrinter, hDeviceMode: THandle;
Buffer: Pointer;

begin
Printer.GetPrinter(PrinterName,Driver,Port,hDeviceMode);
if WinSpool.OpenPrinter((zv)PrinterName,hPrinter,nil) then
begin
Memo1.Lines.Clear;
GetPrinter(hprinter,2,nil,0,(zv)pcbNeed);
GetMem(Buffer,pcbNeed);
if GetPrinter(hPrinter,2,Buffer,pcbNeed,(zv)pcbNeed) then
begin
if EnumJobs(hPrinter,0,NumJobs,2,Buffer,pcbNeed,pcbNeed,pcReturned)
then
begin
Memo1.Lines.Add('Po?et tiskov�ch �loh='+IntToStr(pcReturned));
for cnt:=1 to pcReturned do
begin

Memo1.Lines.Add('*************************************************');
Memo1.Lines.Add('JobId='+
IntToStr(TArrayofJobs(Buffer^)[Cnt].JobId));
if TArrayOfJobs(Buffer^)[Cnt].pPrinterName<>nil then
Memo1.Lines.Add('N�zev tisk�rny='+
TArrayofJobs(Buffer^)[Cnt].pPrinterName);
if TArrayOfJobs(Buffer^)[Cnt].pDocument<>nil then
Memo1.Lines.Add('N�zev dokumentu='+
TArrayofJobs(Buffer^)[Cnt].pDocument);
end;
end;
end;
FreeMem(Buffer,pcbNeed);
end;
WinSpool.ClosePrinter(hPrinter);
end;

Instalacia IBO

[*] Tomas =?iso-8859-2?Q?Michal=EDk?= <michalik(zv)proca(tec)cz> - 04.12.2001 15:15:13

ahoj,

v dobe IBO 3 bylo v zipu eval. verze neco jako D5_DCU.zip, to se muselo
rozbalit do IBO adresare. Cekal bych, ze to s IBO4 nadale plati. Udelal
jsi to ?

Tom

delphi(zv)zvlauto.sk wrote:
>
> Delphi 5 Prof. IBO4. Instaloval to niekto v tejto konfiguracii? Ako?
>
> Robo.

=================================

Tomas Michalik
ProCA, s. r. o.
V Luzich 818, Praha 4
Czech Republic

e-mail: michalik(zv)proca(tec)cz
tel: +420 2 67283446


Delsi: Chyby/nedostatky Kylix/D6

[*] Ondrej Kelle <O.Kelle(zv)digitalpublishing.de> - 4.12.2001 15:42:35

> [#5.6] U RAD nastroje bych cekal nejaky generator zakladu projektu a
> generator zarovnanych db komponent dle definice datasetu;
> - File/New.. /Business/ DatabaseFormWizard

Tiez sa da na existujuci formular pridat label a edit pre kazde pole pomocou
drag&drop z Fields Editora, ak mas definovane persistentne polia.
Prave som si to narychlo vyskusal:

1. File\New Application
2. na Form1 som dal TTable, nastavil DBDEMOS, customer.db
3. doubleclick na Table1 otvori Fields Editor
4. pridal som persistent fields: vo Fields Editore "Add All Fields" (Ctrl+F)
5. select all, drag&drop na Form1

Vytvorilo to na Form1 novy TDataSource (s odkazom na Table1) a pre kazde
pole zvlast TLabel a TEdit (a priradilo datasource). Funguje to rovnako aj
na TFrame. Ak je drop target iny formular nez ten, kde je source dataset,
dokonca to zobrazi prompt, ci chces prislusnu unitu pridat do 'uses' clause.

TOndrej


Mrtva RXLibrary?

[*] David Janko <djanko(zv)infoware(tec)cz> - 4.12.2001 16:00:43

Ovsem nikoliv pro CLX (aspon DBKomponenty).


----- Original Message -----
From: "Milan Vajda" <milanv(zv)ba.sanet.sk>
To: <delphi-l(zv)clexpert(tec)cz>
Sent: Tuesday, December 04, 2001 3:03 PM
Subject: Re: Mrtva RXLibrary?> Na torry je rx2.75 upravena pre D6
> http://www.torry.net/vcl/packs/huge/rx275d6.zip
>

Desetinna mista v IB

[*] Lebeda David <david.lebeda(zv)comarr(tec)cz> - 4.12.2001 16:24:30

> Citatel je Integer, jmenovatel a nasobek - Numeric(6,0) a vysledek je
> typu Numeric(8,0).
>
> V pripade, ze je jmenovatel Numeric(6,2) tak je vysledek 7999
> a pokud je citatel typu Double precision tak je vysledek spravny.
>
Pripada mi v poradku, ze kdyz delas vypocet na typech bez
desetinnych mist, ze ani mezivysledky neobsahuji desetinna
mista. Aspon me to tak kdysi ucili v cecku, ze je potreba v techto
pripadech tusim aspon prvni operand pretypovat na double nebo
jiny realny typ a s tim pak pocitat. Mozna to nerikam presne,
cecko uz jsem dlouho nevidel, ale o to tu nejde - zkratka
popisovane chovani vypoctu mi pripada v poradku.

David Lebeda


Store procedure

[*] Blazek Jaroslav <Jaroslav.Blazek(zv)access-it(tec)cz> - 04.12.2001 16:27:37

Ahojky,
mam nasledujici dva problemy

1.Ulozim do databaze novou proceduru

ADOStoreProcedure ji priradim
- vse probiha v poradku do te doby nez zjistim, ze jsem v procedure udelal chybu.
- tu proceduru vymazu - drop procedure ....
- opravim ji, parametry procedury zustavaji stejne.
- refresnu i ADOStoreProcedure, ale od te doby uz se mnou nechce komunikovat
- pri prirazeni ADOStoreProcedure.Parameters[1].Value=Neco;
mi to hodi - "List index out of bounds(1)" - pritom paramtry procedury zustanou stejne.
- musim tedy komponentu ADOStoreProcedure vymazat a nasledne ji znovu pridat a znova nastavit.
- pak vse zase funguje

---cim to muze byt ?

2. ulozim do databaze svoji proceduru, ktera pridava nejaky record posledni parametr vraci ID ulozeneho recordu, pokud record existuje vrati 0
a) pri ukladani prvniho noveho recordu vrati posledni parametr ID - ulozi se
b) pri ukladani druheho noveho recordu uz vrati 0 - neulozi se

- pri opetovnem precompilovani probehnou stejne body a), b)

maly priklad procedury

CREATE PROCEDURE AddNeco ((zv)ANeco CHAR(20), (zv)RId INT OUTPUT)
AS
BEGIN
SELECT (zv)RId=IdNeco FROM TNeco WHERE Neco=(zv)ANeco
IF ((zv)RId IS NULL)
BEGIN
SELECT (zv)RId=MAX(IdNeco) FROM TNeco
IF ((zv)RId IS NULL)
SET (zv)RId=1
ELSE
SET (zv)RId=(zv)RId+1
INSERT INTO TNeco (IdNeco,Neco)
VALUES ((zv)RId,(zv)ANeco)
END
ELSE
SET (zv)RId=0
END

////////////////////////////////
W2000, D5, MS SQL 2000
///////////////////////////////

Diky

Bc. Jaroslav Blazek
Access-IT Ceska Lipa
jaroslav.blazek(zv)access-it(tec)cz
www.access-it(tec)cz
+420605/813644


TCPIP - prenos dat

[*] Zdenek Janish <medusa(zv)brajan(tec)cz> - 4.12.2001 16:37:48

Dobry den,

Neni jiz nekde vyresen prenos bloku dat nebo streamru pomoci TServerSocket a
TClientSocket?
Komponenta, Rutinky, navod...

Uz jsem s nimi pracoval, ale (moc se v tom neorintuji):

Jak mam poznat, ze data byly odeslany a na druhe strane uzpesne prijaty?
Jak zajistit ze uz prisly vsechna data?

Mam si vytvorit vlastni strukturu "paketu", kterou si budu nechavat
potvrzovat? Neni to uz implementovano?

Dekuji

Zdenek Janish


DELPHI 6

[*] JIM Design <jim.design(zv)iol(tec)cz> - 4.12.2001 16:41:21

Ahoj,

to muze byt docela sranda kdyz se nekdo zivi poradentstvim a dava slovni
doporuceni na zaklade zkouseni v techto free delphi6.

M.Jirman

-----Original Message-----
From: delphi-l-owner(zv)clexpert(tec)cz [mailto:delphi-l-owner(zv)clexpert(tec)cz]On
Behalf Of Petr Vones

From: "Krayzel Libor" <Libor.Krayzel(zv)czech-tv(tec)cz>
> > Delphi 6 Personal Edition jsou free
> Nejaka omezeni?

Ahoj,

pouze pro nekomercni aplikace.

Petr Vones

Killnuti EXPLORER.EXE

[*] Ivan Novotn� <korin.delphi(zv)centrum(tec)cz> - 4.12.2001 16:52:21


> Zdravim
>
> To IMHO neni dobry zpusob. Ja pouzivam LiteStepa (nahrada exploreru) uz
> pekne dlouho a setkal jsem se s temito problemy:
>
> MSOE vyvola dialog pro telef. pripojeni az za hoodne dlouho.
> nefunguje spousteni HTML dokumentu napr z RARu.
> nefunguje Hledat.. z popup menu slozek
> plus nekolik malo nepodstatnych

Dik za rady. Dialog telefoniho pripojeni me nezlobi, jelikoz pocitace jsou
pripojene na net pres proxy.. :)
Spousteni HTML a take (myslim) stahovani se uskutecnuje prikazem
explorer.exe parametr. Vsak si zkuste napsat explorer c:\windows\calc.exe..
:) to si asi budu muset vyresit sam ve svem programu.

> Se seriakama nemam problemy.
>
> Nahradou shellu se lze branit pouze proti BFU. Vzdy muzes v aplikaci dat
> soubor-otevrit a muzes prochazet disk a spoustet programy jak chces. Kdyz
> nekdo chce, tak se proste dostane. Mozna by pomohlo substitnout urcity
> adresar (dokumenrty,..) a C zneviditelnit (TweakUI napr.).
> Hurricane

Ochranit pocitac pred dialogy otevrit a ulozit soubor bylo asi tak nejtezsi.
Proto se po spusteni libovolneho programu z me aplikace skryji vsechny
jednotky z dialogu, zakaze se spousteni *.exe,com,scr,pif,vbs,bas,reg,key a
ja nevim ceho jeste...... Ale i presto staci do Editboxu "jmeno souboru"
napsat C: a hned se uzivatel dostane na disk. Proto muj program hlida
spustene dialogy a pokud napisete do "jmena souboru" c: tak vam to prepise
na standartni cestu pro dokumenty, napr. T:\.
Korin

> ----- Original Message -----
>
> > Nakonec jsem to vyresil tak, ze a autostartu spustim aplikaci, ktera se
> > roztahne pres celou obrazovku, zablokuje ruzne kombinace klaves (Alt-F4,
> > Ctrl-Alt-Delete,..), a povoli jen tlacitka definovana v ini souboru,
takze
> > BFU muze spustit jen to, co mu povolis. Neni to ochrana proti zkusenym
> > uzivatelum (o to ani neslo), ale ochrana pred nezkusenymi uzivateli,
kteri
> s
> > Windows dovedou udelat neuveritelne veci.
>
>

Desetinna mista v IB

[*] Rado Benc <bego(zv)pobox.sk> - 4.12.2001 17:15:28

Nazdar,

> Citatel je Integer, jmenovatel a nasobek - Numeric(6,0) a vysledek je
> typu Numeric(8,0).

Podla Data Definition Guide:
---
NUMERIC datatype

NUMERIC(x,y)
In the syntax above, InterBase stores exactly x digits. Of that number,
exactly y digits are to the right of the decimal point. For example,

NUMERIC(5,2)
declares that a column of this type always holds numbers with exactly 5
digits, with exactly two digits to the right of the decimal point: ppp.ss.
---
V tvojom pripade je NUMERIC(6, 0) interne ulozeny ako SMALLINT, vysledok
je potom

8000 / 176 = 45,454545454545454545454545454545

- medzivysledok je po zaokrukleni na 0 desatinnych miest : 45

45 * 176 = 7920.

- po zaokruhleni na 0 desatinnych miest (pises ze vysledok je typu NUMERIC
(8, 0), co je interne INTEGER) to sedi na chlp. InterBase ma pravdu. :-)

> V pripade, ze je jmenovatel Numeric(6,2) tak je vysledek 7999

V tpmto pripade je vysledok prvej operacie:

8000 / 176 = 45.45 ( 2 desatinne miesta)

a 45.45 * 176 = 7999,2

- po zaokruhleni na 0 desatinnych miest (NUMERIC(8, 0)) teda 7999.
Dva body pre Interbase. :-)

> a pokud je citatel typu Double precision tak je vysledek spravny.

Pochopitelne.

Volba datovych typov je dopodrobna popisana v Data Definition Guide,
stiahnutelnej AFAIK z www.ibphoenix.com , www.borland.com apod.

Konkretna volba datoveho typu zavisi od toho, co chces dosiahnut.

Odporucam (pokial mozno) nepouzivat SQL dialect 1 - datove typy (hlavne
numericke) su v dialekte 3 podstatne variabilnejsie a mozno sa vyhnut
mnohym problemom s pesnostou.

HTH,

Rado
____________________________________
http://www.pobox.sk/ - profesionalny e-mail zadarmo

Delsi: Chyby/nedostatky Kylix/D6

[*] David Janko <djanko(zv)infoware(tec)cz> - 4.12.2001 17:26:34

Take jsem to zkusil ;-) - new CLX app,
dbExpress=SQLClientdataset+dbgrid+atd., pridam pole (ctrl+f) + nastavim
lookup, vyberu vsechny a zkusim pretahnout na form a NEJDE TO. Na ctrl+c/v
hodi "cannot paste ...field in ...".
Delam nekde chybu nebo to klasicky nejde (v CLX a/nebo dbExpressu) ?

Dekuji za vas cas.
---
Best Regards,
David Janko
programmer & Linux system administrator
djanko(zv)infoware(tec)cz
Czech Republic / Central Europe

----- Original Message -----
From: "Ondrej Kelle" <O.Kelle(zv)digitalpublishing.de>
> Tiez sa da na existujuci formular pridat label a edit pre kazde pole
pomocou
> drag&drop z Fields Editora, ak mas definovane persistentne polia.
> Prave som si to narychlo vyskusal:
>
> 1. File\New Application
> 2. na Form1 som dal TTable, nastavil DBDEMOS, customer.db
> 3. doubleclick na Table1 otvori Fields Editor
> 4. pridal som persistent fields: vo Fields Editore "Add All Fields"
(Ctrl+F)
> 5. select all, drag&drop na Form1
>
> Vytvorilo to na Form1 novy TDataSource (s odkazom na Table1) a pre kazde
> pole zvlast TLabel a TEdit (a priradilo ...

DELPHI 6

[*] Ota Maly <ota.maly(zv)volny(tec)cz> - 4.12.2001 17:33:42

> Ahoj,
>
> to muze byt docela sranda kdyz se nekdo zivi poradentstvim a dava slovni
> doporuceni na zaklade zkouseni v techto free delphi6.
>
> M.Jirman
>

To je prece jednoznacne komercni pouziti -> nelze pouzit Open Edition.
Alespon tak to chapu ja..

Ota Maly


Store procedure

[*] ing. Pavel �ilinec����)b���zf�#�3 - 4.12.2001 17:44:51

Zkus doplnit prvotni nulovani vystupni promenne a pripadne potom jeste
zkus pomoci print zjistovat, kde a co se deje (v Query Analyzer to uvidis)
> CREATE PROCEDURE AddNeco ((zv)ANeco CHAR(20), (zv)RId INT OUTPUT)
> AS
> BEGIN
set (zv)RID = null
> SELECT (zv)RId=IdNeco FROM TNeco WHERE Neco=(zv)ANeco
print '1: ' + coalesce((zv)RId, '<null>')
> IF ((zv)RId IS NULL)
> BEGIN
> SELECT (zv)RId=MAX(IdNeco) FROM TNeco
> IF ((zv)RId IS NULL)
> SET (zv)RId=1
> ELSE
> SET (zv)RId=(zv)RId+1
> INSERT INTO TNeco (IdNeco,Neco)
> VALUES ((zv)RId,(zv)ANeco)
print '2: ' + coalesce((zv)RId, '<null>')
> END
> ELSE
> SET (zv)RId=0
> END

------
ing. Pavel �ilinec
mailto:zilinec(zv)email(tec)cz


problemy s databazemi

[*] Jan Sluka <snipe(zv)seznam(tec)cz> - 04.12.2001 17:57:02

Dobry den,

delam v Delphi aplikaci, ktera pracuje s datovym
skladem v DBase 5.

Pri tvorbe jsem se setkal se dvema nasledujicimi
problemy:

1. kdyz si pomoci TQuery a TDBGrid zobrazim obsah
jedne z tabulek, mam tam 3 zaznamy, pokud se vsak
podivam primo do prislusneho .dbf, jsou tam pouze
zaznamy 2 :-((

2. cim je zpusobeno hlaseni, ze mam nizkou MAXFILEHANDLES
(implicitne je v BDE 48, dal jsem tam 96) a stejne se nekdy
toto hlaseni objevi, co je jeho pricinou (spatny pristup
k datovemu skladu?!)

Dik za odpovedi

JS

______________________________________________________________________
ARDO SISA TOUR 2001 Sisa Sklovska a jeji host Richard Muller na turne
http://www.ddpromotion(tec)cz/czech/music/sisa.htm


Vystup z tabulek do Wordu

[*] Viktor Marek <viktor(zv)mbox.vol(tec)cz> - 4.12.2001 18:05:34

Poradi nekdo jak z datab�ze provest export dat do MS Wordu, nebo WordPadu?

Diky za rady

Viktor Marek
viktor(zv)mbox.vol(tec)cz


---
Odchoz� zpr�va neobsahuje viry.
Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.303 / Virov� b�ze: 164 - datum vyd�n�: 24.11.2001


TCPIP - prenos dat

[*] bleak <bleak(zv)atlas(tec)cz> - 4.12.2001 18:18:38

doporu�uji komponenty Midware na http://www.overbyte.be. Maj� u� hotov�
funkce SENDFILE, GETFILE a dal#�. J� se rval nejprve ze Synapse, potom s
INDY a skon�il jsem u Midware, kde mi v#echno chod� napoprv�...
bleak

----- Original Message -----
From: "Zdenek Janish" <medusa(zv)brajan(tec)cz>
To: <delphi-l(zv)clexpert(tec)cz>
Sent: Tuesday, December 04, 2001 4:37 PM
Subject: TCPIP - prenos dat


> Dobry den,
>
> Neni jiz nekde vyresen prenos bloku dat nebo streamru pomoci TServerSocket
a
> TClientSocket?
> Komponenta, Rutinky, navod...
>
> Uz jsem s nimi pracoval, ale (moc se v tom neorintuji):
>
> Jak mam poznat, ze data byly odeslany a na druhe strane uzpesne prijaty?
> Jak zajistit ze uz prisly vsechna data?
>
> Mam si vytvorit vlastni strukturu "paketu", kterou si budu nechavat
> potvrzovat? Neni to uz implementovano?
>
> Dekuji
>
> Zdenek Janish
>

Adonis a store procedure

[*] Lstiburek Pavel <Lstiburek(zv)ceb(tec)cz> - 4.12.2001 18:42:21

Mam problem,
se store procedure u MS-SQL a ADONIS,
pokud ma procedura neco udelat (update tabulky) a potom vratit DataSet,
oblasi mi TADOStoredProc "Operation is not allowed when the object is
closed".
Myslim, ze jsem to jiz kdysi zlomil, ale nemohu si zaboha vzpomenou jak.
Muzete mi nekdo postrcit.

Diky Pavel


Adonis a store procedure

[*] Ji�� Foldyna <jiri.f(zv)avizo(tec)cz> - 4.12.2001 18:45:54

> P�edm�t: Adonis a store procedure
> Mam problem,
> se store procedure u MS-SQL a ADONIS,
> pokud ma procedura neco udelat (update tabulky) a potom
> vratit DataSet,
> oblasi mi TADOStoredProc "Operation is not allowed when the object is
> closed".
> Myslim, ze jsem to jiz kdysi zlomil, ale nemohu si zaboha
> vzpomenou jak.
> Muzete mi nekdo postrcit.

Ahoj,

SET NOCOUNT ON/OFF ?

Jiri Foldyna
mailto:jiri.f(zv)avizo(tec)cz

Probl�m s tiskem

[*] milos <milos.kolias(zv)seznam(tec)cz> - 4.12.2001 19:15:54

Dobr� den.
M�m probl�m s tiskem na s�#ov� tisk�rn� v Novellu.
P�i tisku pravideln� pad� program vytvo�en� v Delphi na chybu ACCESS VIOLATION...
Nem��u p�ij�t na to ��m je to zp�soben�.
Spr�vce s�t� tvrd�, �e je to chyba programu, ale na lok�ln� tisk�rn� se to nest�v�.

D�ky za ka�dou radu.
S pozdravem
Milo#

OT: TPrinter a HPLJ1000

[*] Pavol Stolc <pstolc(zv)sc.sknet.sk> - 4.12.2001 19:17:42

Ahoj vospolok,

pred par dnami tu isla informacia o probleme strankovania HPLJ1000 pri
pouziti metody TPrinter.NewPage.

Kedze uvazujem o kupe tejto tlaciarne, zaujimalo by ma ci ma este niekto
takuto skusenost, aby som nekupil dekoraciu do police.

Pavol Stolc
pstolc(zv)sc.sknet.sk


Probl�m s tiskem

[*] Pavel ZIDEK <delphi(zv)kopr(tec)cz> - 4.12.2001 19:28:26

Zdravim,
Jestlize mas nainstalovany OFFICE 97/2000 a k tomu jeste nejaky antivirak (blba zkusenost s AVG), tak jedno zkus odinstalovat nebo nejak deaktivovat a melo by to jet. Mam obavy, ze nejaky TimeOut techto dvou programu se nekde hada.
Mel jsem podobne problemy. Po odinstalovani - obojiho - problemy prestaly.
Pavel ZIDEK

P.S. jeste se muze hadat Win fronta s fontou NOVELLu

Dobr� den.
M�m probl�m s tiskem na s�#ov� tisk�rn� v Novellu.
P�i tisku pravideln� pad� program vytvo�en� v Delphi na chybu ACCESS VIOLATION...
Nem��u p�ij�t na to ��m je to zp�soben�.
Spr�vce s�t� tvrd�, �e je to chyba programu, ale na lok�ln� tisk�rn� se to nest�v�.

D�ky za ka�dou radu.
S pozdravem
Milo#

DATA Z KONFERENCE ZA LISTOPAD 2001

[*] Slavek Rydval <rk(zv)atrey.karlin.mff.cuni(tec)cz> - 4.12.2001 19:37:21

Preji vsem pekneho dne,

prave jsem na stranku
atrey.karlin.mff.cuni(tec)cz/~rk/DataZKonference.shtml umistil data za
listopad 2001.

Slavek


Durex - Let's make kids better.
-------------------------------------------------
http://atrey.karlin.mff.cuni(tec)cz/~rk
http://swnet(tec)cz
-------------------------------------------------


Vystup z tabulek do Wordu

[*] Jan Fiala <jan.fiala(zv)iol(tec)cz> - 4.12.2001 20:01:17

4.12.2001 Viktor Marek:
> Poradi nekdo jak z datab�ze provest export dat do MS Wordu, nebo WordPadu?

Co myslis tim export dat do Wordu ? Je tim myslena nejaka sestava,
ktera se da precist ve Wordu ?

------
Jan Fiala
mailto:jan.fiala(zv)iol(tec)cz


problemy s databazemi

[*] Jan Fiala <jan.fiala(zv)iol(tec)cz> - 4.12.2001 20:03:50

4.12.2001 Jan Sluka:
> delam v Delphi aplikaci, ktera pracuje s datovym
> skladem v DBase 5.

> Pri tvorbe jsem se setkal se dvema nasledujicimi
> problemy:

> 1. kdyz si pomoci TQuery a TDBGrid zobrazim obsah
> jedne z tabulek, mam tam 3 zaznamy, pokud se vsak
> podivam primo do prislusneho .dbf, jsou tam pouze
> zaznamy 2 :-((

Jedna se o obycejne Select * from tabulka nebo je to select pres vice
tabulek ?

> 2. cim je zpusobeno hlaseni, ze mam nizkou MAXFILEHANDLES
> (implicitne je v BDE 48, dal jsem tam 96) a stejne se nekdy
> toto hlaseni objevi, co je jeho pricinou (spatny pristup
> k datovemu skladu?!)

Tady asi pujde o to, kolik tabulek soucasne oteviras (nezapomen na
indexy, ktere si nejaky ten handle vezmou taky).
Reseni, ktera na zacatku otevrou vsechny tabulky a pak s nimi pracuje
nejsou zrovna idealni.

------
Jan Fiala
mailto:jan.fiala(zv)iol(tec)cz


Probl�m s tiskem

[*] Jan Fiala <jan.fiala(zv)iol(tec)cz> - 4.12.2001 20:07:48

4.12.2001 milos:
> Dobr� den.
> M�m probl�m s tiskem na s�#ov� tisk�rn� v Novellu.
> P�i tisku pravideln� pad� program vytvo�en� v Delphi na chybu ACCESS VIOLATION...
> Nem��u p�ij�t na to ��m je to zp�soben�.
> Spr�vce s�t� tvrd�, �e je to chyba programu, ale na lok�ln� tisk�rn� se to nest�v�.

Zkus nainstalovat na pocitac stejnou tiskarnu, jakou mas sitovou, ale
nasmeruj ji na lokalni port. Tisknout pak budes na tu sitovou.

O jakou tiskarnu se jedna ?
Quick Report ma problemy s novejsimi ovladaci laserovych a
inkoustovych tiskaren.
Opravy jsou na Qusoftu, ale potrebujes zdrojaky QuickReportu

------
Jan Fiala
mailto:jan.fiala(zv)iol(tec)cz


TCPIP - prenos dat

[*] Gebauer Lukas <gebylist(zv)mlp(tec)cz> - 4.12.2001 20:13:45

Me v Synapsi beha vsechno napoprve. ;-)

V pripade Synapse staci na odeslani bloku dat pouzit Sendstring ci
SendBuffer metody... Ze data odsla poznas podle toho, ze Synapse
pokracuje dalsi instrukci az kdyz je operace provedena.

A na prijem se da velmi pohodlne pouzit metody RecvBufferEx (kdyz vis
kolik dat ma prijit), RecvPacket (kdyz vis ze neurcite mnostvi dat
jde temer pohromade), RecvStrinf (kdyz potrebujes cist data po
radcioch) ci RecvTerminated (kdyz mas bok dat zakonceny nejakou pevne
danou sekveci bytu)

Domnivam se, ze na to potrebujes ti za pomoci tehto funkci staci pet
minut prace. ;-)))

> doporu�uji komponenty Midware na http://www.overbyte.be. Maj� u� hotov�
> funkce SENDFILE, GETFILE a dal#�. J� se rval nejprve ze Synapse, potom s
> INDY a skon�il jsem u Midware, kde mi v#echno chod� napoprv�...
> bleak

-- Lukas Gebauer.

E-mail: gebauerl(zv)mlp(tec)cz
http://www.ararat(tec)cz/synapse/ - Synapse Delphi and Kylix TCP/IP Lib.

sndPlaySound - jeden detail

[*] Milan ��ek - 4.12.2001 20:25:31

ahoj,
chci se zeptat, jestli je mozne prehravat zvuk tak, aby nemohl byt prerusen
(to se mi povedlo pomoci SND_NOSTOP), ale take, aby neblokoval pripadne
dalsi zvuky. Tzn. pokud prehravam zvuk pri startu programu, ktery trva
rekneme 10sekund a uzivatel v tu chvili klikne na tlacitko, ktere ma
cvaknout - v tomto pripade ale necvakne, protoze predchozi zvuk se stale
prehrava. Je mozne nejakym zpusobem docilit, aby se zvuky prehravaly "pres
sebe"?

Diky

Pouzivam:
SndPlaySound(MyStream.memory,SND_NOSTOP or SND_ASYNC or SND_MEMORY)
SndPlaySound(PChar(Sounds[Index]),SND_NOSTOP or SND_ASYNC or SND_MEMORY or
SND_RESOURCE);

S pozdravem Milan Cizek, amatersky programator, D6 Enterprise
Win2k (SP2) a Win98 SE, cizek.milan(zv)seznam(tec)cz, ICQ: 59826637


Jak odstranit nepouzivane resource

[*] Milan ��ek - 4.12.2001 20:25:33

Petr Vones:
> kdyz je nepouzivas tak zadnou pamet nezabiraji (pokud ovsem nepouzivas
> zrudnosti jako UPX 'compressor', tam je pak ale spotreba pameti zase tak
> obrovska, ze par resourcu to uz nezachrani). Ty glyphy jsou tam z unitu
> Buttons a nijak moc nevadi. Daleko horsi jsou co do spotreby zdroju prave
> tlacitka s bitmapami - TBitBtn (neplati pro D6, tam uz je to opraveno).

Ahoj,
jestli dobre chapu, tak muzu mit v resources napr. 1MB wavu a dokud
nezavolam PlaySound(), nezabiraji vubec nic ???
Jinak jsem odstranil ze vsech unit jednotku Buttons, ale glyphy zustaly.
Patrne to bude nekde jinde, ale pokud to nic nezabira, prestane me to tizit
:-)

Diky

S pozdravem Milan Cizek, amatersky programator, D6 Enterprise
Win2k (SP2) a Win98 SE, cizek.milan(zv)seznam(tec)cz, ICQ: 59826637


Kylix - konsolove aplikace

[*] Jiri Kratochvil <jiri.kratochvil(zv)webzin(tec)cz> - 4.12.2001 21:13:06

Preji pekny vecer,

pisi v Kylixu konsolovou aplikaci a citelne mi chybeji prikazy ClrScr, GotoXY
a ReadKey.

Muze mi nekdo poradit, jak na tyto funkce?

Pouzivam Kylix 1 OE

Diky za Vase odpovedi.
Jiri Kratochvil

sndPlaySound - jeden detail

[*] V�t Jur�sek - konference <delphi(zv)obecpohori(tec)cz> - 4.12.2001 21:19:43

tusim, ze by to mel umet directsound a taky nevim, jestli to nezalezi na
tom, zda karta podporuje prehravani vice zvuku najednou (SBLive to umi)


----- Original Message -----
Sent: Tuesday, December 04, 2001 8:25 PM
Subject: sndPlaySound - jeden detail


> ahoj,
> chci se zeptat, jestli je mozne prehravat zvuk tak, aby nemohl byt
prerusen
> (to se mi povedlo pomoci SND_NOSTOP), ale take, aby neblokoval pripadne
> dalsi zvuky. Tzn. pokud prehravam zvuk pri startu programu, ktery trva
> rekneme 10sekund a uzivatel v tu chvili klikne na tlacitko, ktere ma
> cvaknout - v tomto pripade ale necvakne, protoze predchozi zvuk se stale
> prehrava. Je mozne nejakym zpusobem docilit, aby se zvuky prehravaly "pres
> sebe"?
>
> Diky
>
> Pouzivam:
> SndPlaySound(MyStream.memory,SND_NOSTOP or SND_ASYNC or SND_MEMORY)
> SndPlaySound(PChar(Sounds[Index]),SND_NOSTOP or SND_ASYNC or SND_MEMORY
or
> SND_RESOURCE);
>
> S pozdravem Milan Cizek, amatersky programator, D6 Enterprise
>


---
Odchoz� zpr�va neobsahuje viry.
Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.303 / Virov� b�ze: 164 - datum vyd�n�: 24.11.2001


problemy s databazemi

[*] Jan Sluka <snipe(zv)seznam(tec)cz> - 04.12.2001 23:08:04

Dne 4.�prosinec�2001, <delphi-l(zv)clexpert(tec)cz> napsal:

> 4.12.2001 Jan Sluka:
> > delam v Delphi aplikaci, ktera pracuje s datovym
> > skladem v DBase 5.
>
> > Pri tvorbe jsem se setkal se dvema nasledujicimi
> > problemy:
>
> > 1. kdyz si pomoci TQuery a TDBGrid zobrazim obsah
> > jedne z tabulek, mam tam 3 zaznamy, pokud se vsak
> > podivam primo do prislusneho .dbf, jsou tam pouze
> > zaznamy 2 :-((
>
> Jedna se o obycejne Select * from tabulka nebo je to select pres vice
> tabulek ?
>

Je to select z vice tabulek (ale neni to kartezsky soucin) vyberou
se zaznamy s id napr 1, 2, 3 a pritom v tom dbf jsou pouze zaznamy s
id 2, 3 :-((

> > 2. cim je zpusobeno hlaseni, ze mam nizkou MAXFILEHANDLES
> > (implicitne je v BDE 48, dal jsem tam 96) a stejne se nekdy
> > toto hlaseni objevi, co je jeho pricinou (spatny pristup
> > k datovemu skladu?!)
>
> Tady asi pujde o to, kolik tabulek soucasne oteviras (nezapomen na
> indexy, ktere si nejaky ten handle vezmou taky).
> Reseni, ktera na zacatku otevrou vsechny tabulky a pak s nimi pracuje
> nejsou zrovna idealni.

Jedna se o to, ze plnim graf hodnotama z databaze pomoci TQuery,
ktere vytvarim za behu a ihned po nacteni dat do grafu instanci
TQuery zrusim, tak nevim ..,

JS

______________________________________________________________________
Vyberte Vas "Nejoblibenejsi automobil roku 2002 v CR"
a hlasujte na adrese http://www.autoroku(tec)cz. Hlavni vyhra 600 000 Kc!!!

ovladani DELPHI 6

[*] Roman <sw.maurice(zv)seznam(tec)cz> - 4.12.2001 23:13:31

> Delam to tak, ze:
> Component|Install Component...vyberu atd a pak se rozjede okno Package -
> dclusr.dpk. Tady stisknu Compile, komponenta se nainstaluje a program uz
> nezkompiluji a dava vize uvedenou hlasku.
> DELPHI jsou ciste, minuly tyden nainstalovane. Delalo to na starem PC, tak
> nevim.

Nejak v tom postupu nevidim: zavru balicek, otevru project.
Ta chybova hlaska znamena, ze se pokousis spustit nejakou cast aplikace /tj.
knihovnu, nebo napr. ten balicek/

Roman
OOOOOOOOOOOOOOOO
O sw.maurice(zv)cbox(tec)cz
O http://kouzelne.misto(tec)cz
OOOOOOOOOOOOOOOO

Uprava predkov

[*] Roland Turcan <rolo(zv)sedas.sk> - 5.12.2001 00:11:35

Ahoj.

Mam svoj Grid odvodeny od

MojGrid>TDBGridSinea>TCustomDBGrid

a potrebujem spravit to ze:

Ak sa vyvola OnColumnMove tak Sinea zavola CustomDBGrid.ColumnMoved a on
vykona ten riadok 4, ale ja ho potrebujem az vo svojom gride vyvolat po
vykonani metody CustomDBGridu, Sinei a az potom potrebujem ho potrebujem
zavolat. Ako zamedzit aby sa mi nevolalo v CustomGridu ?

procedure TCustomDBGrid.ColumnMoved(FromIndex, ToIndex: Longint);
begin
FromIndex := RawToDataColumn(FromIndex);
ToIndex := RawToDataColumn(ToIndex);
Columns[FromIndex].Index := ToIndex;
if Assigned(FOnColumnMoved) then FOnColumnMoved(Self, FromIndex, ToIndex);
end;

procedure TDbGridSinea.ColumnMoved(FromIndex, ToIndex: Longint);
begin
inherited ColumnMoved(FromIndex, ToIndex);
if FActiveTitleIndex = FromIndex then SetActiveTitleIndex(ToIndex);
end;

procedure TDBGridMoj.ColumnMoved(FromIndex, ToIndex: Longint);
begin
inherited;
if Assigned(OnColumnMoved) then
Self.OnColumnMoved(Self,FromIndex,ToIndex);
end;

Chcem eliminovat aby sa mi OnColumnMoved navolalo dvakrat.

Dakujem

S pozdravom

Roland Turcan - amatersky programator
D5Pro, Firebird 1.0, IBX4.62, Win2000Pro/CZ, Win98CZSE


TCPIP - prenos dat - vyreseno

[*] Zdenek Janish <medusa(zv)brajan(tec)cz> - 5.12.2001 01:20:40

na http://www.overbyte.be jsou komponenty, ktere mi naprosto vyhovuji.

Dekuji vsem!

Zdenek Janish

Dva dotazy

[*] borkovec(zv)email(tec)cz - 5.12.2001 07:13:41

Dobre jitro,
1. Mate nekdo zkusenosti s cards.dll? Pripadne odkazy, volani ....
2. Je mozno pracovat na IB s vice nez jednou DB?
Zkousel jsem zapisy like MSSQL (DB..table) i jine, ale nejak se stale nedari.
Za odpovedi dekuji
R&B

---
Alef NULA - Authorized Cisco Systems Distributor
Alef NULA - technick� podpora, #kolen� Cisco - http://www.alef0(tec)cz

OT: Heslo do win2k

[*] Commanche <komurka(zv)myto(tec)cz> - 5.12.2001 07:31:41

Zdravim,
tohle je opravdu velky OT, ale snad mi nekdo poradi:
Mam na win2k jednoho uzivatele a chtel bych zrusit zadavani hesla pred
prihlasenim,
nevite nekdo jak na to?
Dekuji za odpoved...

Commanche

mailto:komurka(zv)myto(tec)cz
---
Odchoz� zpr�va neobsahuje viry.
Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.303 / Virov� b�ze: 164 - datum vyd�n�: 24.11.2001


Vystup z tabulek do Wordu

[*] Pavel Gazda <Pavel.Gazda(zv)seznam(tec)cz> - 5.12.2001 07:35:44

> Poradi nekdo jak z datab�ze provest export dat do MS Wordu, nebo WordPadu?
>

Podivej se ve Wordu na hromadnou korespondenci

Pavel Gazda


Delsi: Chyby/nedostatky Kylix/D6

[*] Ondrej Kelle <O.Kelle(zv)digitalpublishing.de> - 5.12.2001 07:40:47

> Take jsem to zkusil ;-) - new CLX app,
> dbExpress=SQLClientdataset+dbgrid+atd., pridam pole (ctrl+f)
> + nastavim lookup, vyberu vsechny a zkusim pretahnout na form a
> NEJDE TO. Na ctrl+c/v hodi "cannot paste ...field in ...".
> Delam nekde chybu nebo to klasicky nejde (v CLX a/nebo dbExpressu) ?

Zda sa, ze to nejde s CLX. Nezavisi to od konkretneho typu datasetu
(dbExpress), Fields Editor je by default registrovany pre kazdeho potomka
TDataSet.
V DSDesign.pas a DesignIntf.pas som nasiel vsetok kod suvisiaci s drag &
drop (TDragFields, TFieldsTarget) vykomentovany sposobom {$IFDEF MSWINDOWS}
... {$ENDIF}.
Neviem, preco sa Borland takto rozhodol. Zeby boli problemy s implementaciou
drag&drop v (danej verzii) QT na Linuxe? Ale tu uz mozem len hadat, pretoze
o CLX, QT, Kylix a vobec Linuxe neviem skoro nic.

HTH
TOndrej


Heslo do win2k

[*] Ji�� Kratochv�l����*��J�##!�)?���o� - 5.12.2001 07:43:15


> nevite nekdo jak na to?
Doporucuji konferenci cz.comp.windows.nt


"Commanche" <komurka(zv)myto(tec)cz> p�#e v diskusn�m p��sp�vku
news:NGENIAFECDJDBNKHFNKFCEAGCKAA.komurka(zv)myto(tec)cz...
> Zdravim,
> tohle je opravdu velky OT, ale snad mi nekdo poradi:
> Mam na win2k jednoho uzivatele a chtel bych zrusit zadavani hesla pred
> prihlasenim,
> Dekuji za odpoved...
>
> Commanche
>
> mailto:komurka(zv)myto(tec)cz
> ---
> Odchoz� zpr�va neobsahuje viry.
> Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
> Verze: 6.0.303 / Virov� b�ze: 164 - datum vyd�n�: 24.11.2001
>

Store procedure

[*] Blazek Jaroslav <Jaroslav.Blazek(zv)access-it(tec)cz> - 05.12.2001 07:44:41

No jo mas pravdu, to "set (zv)rid=null" opravdu pomohlo....
Ale nechapu to, to SELECT (zv)RId=..... spatne nastavi nebo co?

Bc. Jaroslav Blazek
Access-IT Ceska Lipa
jaroslav.blazek(zv)access-it(tec)cz
www.access-it(tec)cz
+420605/813644

>>> zilinec(zv)email(tec)cz 4.12.01 17:44 >>>
Zkus doplnit prvotni nulovani vystupni promenne a pripadne potom jeste
zkus pomoci print zjistovat, kde a co se deje (v Query Analyzer to uvidis)
> CREATE PROCEDURE AddNeco ((zv)ANeco CHAR(20), (zv)RId INT OUTPUT)
> AS
> BEGIN
set (zv)RID = null
> SELECT (zv)RId=IdNeco FROM TNeco WHERE Neco=(zv)ANeco
print '1: ' + coalesce((zv)RId, '<null>')
> IF ((zv)RId IS NULL)
> BEGIN
> SELECT (zv)RId=MAX(IdNeco) FROM TNeco
> IF ((zv)RId IS NULL)
> SET (zv)RId=1
> ELSE
> SET (zv)RId=(zv)RId+1
> INSERT INTO TNeco (IdNeco,Neco)
> VALUES ((zv)RId,(zv)ANeco)
print '2: ' + coalesce((zv)RId, '<null>')
> END
> ELSE
> SET (zv)RId=0
> END

------
ing. Pavel �ilinec
mailto:zilinec(zv)email(tec)cz


OT: Heslo do win2k

[*] Tomas Rosa <trosa(zv)seznam(tec)cz> - 05.12.2001 07:50:39

A co takhle "Tento Pocitac \ Ovladaci panely \ Uzivatele & hesla \ "[x]
Pred pouzitim pocitace musi uzivatel zadat heslo""??? Nepomohlo to?>tohle je opravdu velky OT, ale snad mi nekdo poradi:
>Mam na win2k jednoho uzivatele a chtel bych zrusit zadavani hesla pred
>prihlasenim,
>nevite nekdo jak na to?
>Dekuji za odpoved...
>

S pozdravem
Tomas Rosa

------------------------=[ pinknet on every screen ]=----------------------
Tomas Rosa
Tomas.Rosa(zv)PinkNet(tec)cz
Contact me via EFFATA.NET, my EID: trosa(zv)effata.net
PinkNet Web Server for Win32 - FREEWARE http://pnws.pinknet(tec)cz/
---------------------------------------------------------------------------


Store procedure

[*] ing. Jan Fiala <jan.fiala(zv)iol(tec)cz> - 5.12.2001 07:54:32

5.12.2001 Blazek Jaroslav:
> No jo mas pravdu, to "set (zv)rid=null" opravdu pomohlo....
> Ale nechapu to, to SELECT (zv)RId=..... spatne nastavi nebo co?

A co by tam mel priradit, kdyz tam treba nic neni ?

------
ing. Jan Fiala
mailto:jan.fiala(zv)iol(tec)cz


> Bc. Jaroslav Blazek
> Access-IT Ceska Lipa
> jaroslav.blazek(zv)access-it(tec)cz
> www.access-it(tec)cz
> +420605/813644

>>>> zilinec(zv)email(tec)cz 4.12.01 17:44 >>>
> Zkus doplnit prvotni nulovani vystupni promenne a pripadne potom jeste
> zkus pomoci print zjistovat, kde a co se deje (v Query Analyzer to uvidis)
>> CREATE PROCEDURE AddNeco ((zv)ANeco CHAR(20), (zv)RId INT OUTPUT)
>> AS
>> BEGIN
> set (zv)RID = null
>> SELECT (zv)RId=IdNeco FROM TNeco WHERE Neco=(zv)ANeco
> print '1: ' + coalesce((zv)RId, '<null>')
>> IF ((zv)RId IS NULL)
>> BEGIN
>> SELECT (zv)RId=MAX(IdNeco) FROM TNeco
>> IF ((zv)RId IS NULL)
>> SET (zv)RId=1
>> ELSE
>> SET (zv)RId=(zv)RId+1
>> INSERT INTO TNeco (IdNeco,Neco)
>> VALUES ((zv)RId,(zv)ANeco)
> print '2: ' + coalesce((zv)RId, '<null>')
>> END
>> ELSE
>> SET (zv)RId=0
>> END

> ------
> ing. Pavel �ilinec
> mailto:zilinec(zv)email(tec)cz


DBGrid a calculated

[*] Pavel ZIDEK <delphi(zv)kopr(tec)cz> - 5.12.2001 07:55:46

Zdravim,
nejak se mi nedari pridat vypocitavanou polozku.
1. rozjedu Fields Editor nejake tabulky
2. pravym tlacitkem na mysi dam New field
3. vyplnim Name a Type dam Float
4. dam OK a vypadne chybova hlaska
Data Field not permitted on open Dataset

Co delam blbe
Pavel

----- KOPR software -----
Pavel ZIDEK
http://www.kopr(tec)cz, kopr(zv)kopr(tec)cz, delphi(zv)kopr(tec)cz


OT: Heslo do win2k

[*] daniel.hrna(zv)sme(tec)cz - 5.12.2001 08:03:08

Nejjednodus� bude asi pozit TweakUi, tam je to nastaveni a velice
jednoduche.

D.

-----Original Message-----
From: Tomas Rosa [mailto:trosa(zv)seznam(tec)cz]
Sent: Wednesday, December 05, 2001 7:51 AM
To: delphi-l(zv)clexpert(tec)cz
Subject: Re: OT: Heslo do win2k


A co takhle "Tento Pocitac \ Ovladaci panely \ Uzivatele & hesla \ "[x]
Pred pouzitim pocitace musi uzivatel zadat heslo""??? Nepomohlo to?>tohle je opravdu velky OT, ale snad mi nekdo poradi:
>Mam na win2k jednoho uzivatele a chtel bych zrusit zadavani hesla pred
>prihlasenim,
>nevite nekdo jak na to?
>Dekuji za odpoved...
>

S pozdravem
Tomas Rosa

------------------------=[ pinknet on every screen ]=----------------------
Tomas Rosa
Tomas.Rosa(zv)PinkNet(tec)cz
Contact me via EFFATA.NET, my EID: trosa(zv)effata.net
PinkNet Web Server for Win32 - FREEWARE http://pnws.pinknet(tec)cz/
---------------------------------------------------------------------------


Mrtva RXLibrary?

[*] Ka.Kewasa <kewasa(zv)quick(tec)cz> - 5.12.2001 08:04:06

Ahoj,

Na finskem WEBu jsou k nalezeni nejake opravy Rx (dva, tri problemy resi
tez Fjodorovova verze pro D6). Faktem ale je, ze se jiz dalsi veci do Rx
nevkladaji, protoze, jak sami Rusove pisou, autori "emigrovali" a maji na
Floride jine starosti ;-)). Existuje take spousta komponent a rozsireni,
ktere pochazi primo z Rx (mam na mysli predevsim rozsireny rxDBGrid, ktery
je paradni) a existuji knihovy, vzajemne se podporujici RxLib -> vgLIB ->
agLib atp. Pokud Vam necini problem azbuka, je mozne nalezt na RU spousty
dalsich komponent a knihovnich kompletu (PolarisLib atp.). Pokud to usetri
praci, tak to lze pouzit jako plug-in, byt jenom kvuli jedne komponente nebo
procedure. Jsou ale komponenty z baliku, ktere nejsou bez zavazku. Pro cely
balik je obvykle definovan nejaky obskurni predek a z nej odvozeny vsechny
komponenty baliku. Ted mam na mysli predevsim komercni knihovny Orpheus od
TurboPower (s jistymi problemy pri upgradu z verze 2 na 3) a nebo knihovny
HighGear pro D3 (vyvoj uz skoncil, firma neexistuje, ale docela v pohode je
lze pouzit i pod D5). To pak nakyne exac i o 300 kilo pokud se pouzije
slozita komponenta. Existuji i rozsahle komplety knihoven jako je LMD tools
nebo BUpack, ale ty jsem priliz nezkoumal. Snad ma na ne reference nekdo v
konferenci.

Rx bude mrtva, az ji nebude nikdo pouzivat...

Zdravicko

Ka.

sndPlaySound - jeden detail

[*] Daniel Rott <roxton(zv)seznam(tec)cz> - 5.12.2001 08:16:10

> > Je mozne nejakym zpusobem docilit, aby se zvuky prehravaly
> > "pres sebe"?

> tusim, ze by to mel umet directsound a taky nevim, jestli to
> nezalezi na tom, zda karta podporuje prehravani vice zvuku
> najednou (SBLive to umi)

Funguje to i pres standardni funkce waveOut, zrejme zalezi
na nejakem systemovem driveru, u mne na pocitaci s NT4.0
mi to zacalo fungovat po instalaci nejakeho Service Packu,
Exploreru ci Media Playeru, nevim presne, ihned jsem si
toho nevsiml. U Win2000 to na stejnem hardwaru funguje
od prvotni instalace.

Daniel

Problem s RX - TFormStorage

[*] Krayzel Libor <Libor.Krayzel(zv)czech-tv(tec)cz> - 5.12.2001 08:17:29

Od jiste doby mi nejde vlozit do StoredProps vlastnost Checked checkboxu.
Netusim proc. Vzdy kdyz vyberu tuto vlastnost, do storedproperties se mi
ulozi vlastnost Color.

DBGrid a calculated

[*] Daniel Fojt�k <xfojtik(zv)centrum(tec)cz> - 5.12.2001 08:18:29

Ta tabulka je otevrena... Nastav active=false a pak pujde pocitanou polozku
pridat.

Dan

-----Original Message-----
From: delphi-l-owner(zv)clexpert(tec)cz [mailto:delphi-l-owner(zv)clexpert(tec)cz]On
Behalf Of Pavel ZIDEK
Sent: Wednesday, December 05, 2001 7:56 AM
To: konference DELPHI
Subject: DBGrid a calculated


Zdravim,
nejak se mi nedari pridat vypocitavanou polozku.
1. rozjedu Fields Editor nejake tabulky
2. pravym tlacitkem na mysi dam New field
3. vyplnim Name a Type dam Float
4. dam OK a vypadne chybova hlaska
Data Field not permitted on open Dataset

Co delam blbe
Pavel

----- KOPR software -----
Pavel ZIDEK
http://www.kopr(tec)cz, kopr(zv)kopr(tec)cz, delphi(zv)kopr(tec)cz


---
P��choz� zpr�va neobsahuje viry.
Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.303 / Virov� b�ze: 164 - datum vyd�n�: 24.11.2001


Indexovy subor CDX

[*] Slavom�r �eke# - 5.12.2001 08:22:07

Vdaka za mnozstvo informacii ... ale ... neviem ci je problem vo mne,
alebo v delphi ... vysvetlim.

Kolega ma soft na spravu DB vytvoreny v CA-Visual Objects ... databaza
je typu dbf (FoxPro) s indexovym suborom CDX ...

Prerabame a ideme rozsirovat soft v Delphi ... a teraz ten problem ...

Delphi necita dobre jeho indexovy subor, sice mi zoradi data podla
kluca, ale pri hladani kluc zlyha ... nenajde danu polozku,

na druhej strane, ak ja vytvorim indexovy subor, tak jeho soft zlyha pri
hladani podla kluca ...

Tak sa mi vidi, ze tu plati "Ked dvaja robia to iste, nemusi to byt to
iste"

Sa mi vidi, ze moj indexovy subor a jeho indexovy subor, i ked by mali
byt rovnakeho formatu, tak NIE SU ... ako je to mozne? To si kazda firma
robi svoje ?
Ved to je BORDEL ...

Ak nebolo potrebne, aby dana databaza bezala aj v Delphi aj v CA-VO, tak
sa jednoducho preindexuje v tom ktorom softe ... ale kym nebude plne
funkcny soft v Delphi, tak ta databaza musi bezat korektne ako u mna tak
aj u neho. PROSIM PORADTE.

ak sa mylim, prosim opravte ma ... skusali sme to aj s MDX aj s CDX ...
vsetko zle ...

Zatial vdaka ...

Slavo


Uprava predkov

[*] Ondrej Kelle <O.Kelle(zv)digitalpublishing.de> - 5.12.2001 08:26:23

> procedure TDBGridMoj.ColumnMoved(FromIndex, ToIndex: Longint);
> begin
> inherited;
> if Assigned(OnColumnMoved) then
> Self.OnColumnMoved(Self,FromIndex,ToIndex);
> end;
>
> Chcem eliminovat aby sa mi OnColumnMoved navolalo dvakrat.

procedure TDBGridMoj.ColumnMoved(FromIndex, ToIndex: Longint);
var
SaveMovedEvent: TMovedEvent;
begin
SaveMovedEvent := OnColumnMoved;
OnColumnMoved := nil;
try
inherited ColumnMoved(FromIndex, ToIndex);
finally
OnColumnMoved := SaveMovedEvent;
end;
if Assigned(OnColumnMoved) then
Self.OnColumnMoved(Self,FromIndex,ToIndex);
end;

HTH
TOndrej


OT: Heslo do win2k

[*] Ales Martinik <amartinik(zv)artbrno(tec)cz> - 5.12.2001 08:26:58

Nebo www.sysinternals.com utilities - Miscelaneous - Miscelaneous -
Autologon 1.0
Nastavi nebo zrusi. Delka: 8KB.
Funguje i pro NT. Freeware.
Na tom serveru jsou vubec zajimave veci.

Kdyby byly povoleny prilohy, poslal bych primo.
Zkuste primy odkaz
http://www.sysinternals.com/ntw2k/source/misc.shtml#AutoLogon
nevim, jestli bude fungovat

Zdravi
A. Martinik

> -----Original Message-----
> From: delphi-l-owner(zv)clexpert(tec)cz [mailto:delphi-l-owner(zv)clexpert(tec)cz]On
> Behalf Of daniel.hrna(zv)sme(tec)cz
> Sent: Wednesday, December 05, 2001 8:03 AM
> To: delphi-l(zv)clexpert(tec)cz
> Subject: RE: OT: Heslo do win2k
>
>
> Nejjednodus� bude asi pozit TweakUi, tam je to nastaveni a velice
> jednoduche.
>
> D.
>
>
>
> -----Original Message-----
> From: Tomas Rosa [mailto:trosa(zv)seznam(tec)cz]
> Sent: Wednesday, December 05, 2001 7:51 AM
> To: delphi-l(zv)clexpert(tec)cz
> Subject: Re: OT: Heslo do win2k
>
>
> A co takhle "Tento Pocitac \ Ovladaci panely \ Uzivatele &
> hesla \ "[x]
> Pred pouzitim pocitace musi uzivatel zadat heslo""??? Nepomohlo to?
>
> >tohle je opravdu velky OT, ale snad mi nekdo poradi:
> >Mam na win2k jednoho uzivatele a chtel bych zrusit zadavani
> hesla pred
> >prihlasenim,
> >nevite nekdo jak na to?
> >Dekuji za odpoved...
> >
>
> S pozdravem
> Tomas Rosa
>
> ------------------------=[ pinknet on every screen
> ]=----------------------
> Tomas Rosa
> Tomas.Rosa(zv)PinkNet(tec)cz
> Contact me via EFFATA.NET, my EID: trosa(zv)effata.net
> PinkNet Web Server for Win32 - FREEWARE http://pnws.pinknet(tec)cz/
> --------------------------------------------------------------
> -------------

Store procedure

[*] Blazek Jaroslav <Jaroslav.Blazek(zv)access-it(tec)cz> - 05.12.2001 08:54:24

Kdyz tam nic neni, tak by to mel nastavit na NULL nebo ne?
A o tom je ta dalsi podminka....

Bc. Jaroslav Blazek
Access-IT Ceska Lipa
jaroslav.blazek(zv)access-it(tec)cz
www.access-it(tec)cz
+420605/813644

>>> jan.fiala(zv)iol(tec)cz 5.12.01 7:54 >>>
5.12.2001 Blazek Jaroslav:
> No jo mas pravdu, to "set (zv)rid=null" opravdu pomohlo....
> Ale nechapu to, to SELECT (zv)RId=..... spatne nastavi nebo co?

A co by tam mel priradit, kdyz tam treba nic neni ?

------
ing. Jan Fiala
mailto:jan.fiala(zv)iol(tec)cz > Bc. Jaroslav Blazek
> Access-IT Ceska Lipa
> jaroslav.blazek(zv)access-it(tec)cz
> www.access-it(tec)cz
> +420605/813644

>>>> zilinec(zv)email(tec)cz 4.12.01 17:44 >>>
> Zkus doplnit prvotni nulovani vystupni promenne a pripadne potom jeste
> zkus pomoci print zjistovat, kde a co se deje (v Query Analyzer to uvidis)
>> CREATE PROCEDURE AddNeco ((zv)ANeco CHAR(20), (zv)RId INT OUTPUT)
>> AS
>> BEGIN
> set (zv)RID = null
>> SELECT (zv)RId=IdNeco FROM TNeco WHERE Neco=(zv)ANeco
> print '1: ' + coalesce((zv)RId, '<null>')
>> IF ((zv)RId IS NULL)
>> BEGIN
>> SELECT (zv)RId=MAX(IdNeco) FROM TNeco
>> IF ((zv)RId IS NULL)
>> SET (zv)RId=1
>> ELSE
>> SET (zv)RId=(zv)RId+1
>> INSERT INTO TNeco (IdNeco,Neco)
>> VALUES ((zv)RId,(zv)ANeco)
> print '2: ' + coalesce((zv)RId, '<null>')
>> END
>> ELSE
>> SET (zv)RId=0
>> END

> ------
> ing. Pavel �ilinec
> mailto:zilinec(zv)email(tec)cz

DBGrid a calculated

[*] Pavel ZIDEK <delphi(zv)kopr(tec)cz> - 5.12.2001 08:55:08

Zdravim,
uz znam odpoved, je treba nastavit Table.Activate := false;
Pavel

> nejak se mi nedari pridat vypocitavanou polozku.
> 1. rozjedu Fields Editor nejake tabulky
> 2. pravym tlacitkem na mysi dam New field
> 3. vyplnim Name a Type dam Float
> 4. dam OK a vypadne chybova hlaska
> Data Field not permitted on open Dataset
>
> Co delam blbe
> Pavel
>
> ----- KOPR software -----
> Pavel ZIDEK
> http://www.kopr(tec)cz, kopr(zv)kopr(tec)cz, delphi(zv)kopr(tec)cz


Dva dotazy

[*] Ondrej Kelle <O.Kelle(zv)digitalpublishing.de> - 5.12.2001 09:08:37

> 1. Mate nekdo zkusenosti s cards.dll? Pripadne odkazy, volani ....

unit cards;

interface

uses
Windows;

const
CardsDll = 'cards.dll';

var
RA: Integer; // Rank
SU: Integer; // Suit
cd: Integer; // Card

(*--------------------------------------------------------------------------
---
cdtDraw and cdtDrawExt mode flags
----------------------------------------------------------------------------
-*)

const
mdFaceUp = 0; // Draw card face up, card to draw specified by
cd
mdFaceDown = 1; // Draw card face down, back specified by cd
(cdFaceDownFirst..cdFaceDownLast)
mdHilite = 2; // Same as FaceUp except drawn with NOTSRCCOPY
mode
mdGhost = 3; // Draw a ghost card -- for ace piles
mdRemove = 4; // draw background specified by rgbBgnd
mdInvisibleGhost = 5; // ?
mdDeckX = 6; // Draw X
mdDeckO = 7; // Draw O

(*--------------------------------------------------------------------------
---
Suit and card indices. Orders of BOTH are important
----------------------------------------------------------------------------
-*)

const
suClub = 0;
suDiamond = 1;
suHeart = 2;
suSpade = 3;
suMax = 4;
suFirst = suClub;
raAce = 0;
raTwo = 1;
raThree = 2;
raFour = 3;
raFive = 4;
raSix = 5;
raSeven = 6;
raEight = 7;
raNine = 8;
raTen = 9;
raJack = 10;
raQueen = 11;
raKing = 12;
raMax = 13;
raNil = 15;
raFirst = raAce;

cdAClubs = 0;
cd2Clubs = 4;
cd3Clubs = 8;
cd4Clubs = 12;
cd5Clubs = 16;
cd6Clubs = 20;
cd7Clubs = 24;
cd8Clubs = 28;
cd9Clubs = 32;
cdTClubs = 36;
cdJClubs = 40;
cdQClubs = 44;
cdKClubs = 48;
cdADiamonds = 1;
cd2Diamonds = 5;
cd3Diamonds = 9;
cd4Diamonds = 13;
cd5Diamonds = 17;
cd6Diamonds = 21;
cd7Diamonds = 25;
cd8Diamonds = 29;
cd9Diamonds = 33;
cdTDiamonds = 37;
cdJDiamonds = 41;
cdQDiamonds = 45;
cdKDiamonds = 49;
cdAHearts = 2;
cd2Hearts = 6;
cd3Hearts = 10;
cd4Hearts = 14;
cd5Hearts = 18;
cd6Hearts = 22;
cd7Hearts = 26;
cd8Hearts = 30;
cd9Hearts = 34;
cdTHearts = 38;
cdJHearts = 42;
cdQHearts = 46;
cdKHearts = 50;
cdASpades = 3;
cd2Spades = 7;
cd3Spades = 11;
cd4Spades = 15;
cd5Spades = 19;
cd6Spades = 23;
cd7Spades = 27;
cd8Spades = 31;
cd9Spades = 35;
cdTSpades = 39;
cdJSpades = 43;
cdQSpades = 47;
cdKSpades = 51;

(*--------------------------------------------------------------------------
---
Face down cds
----------------------------------------------------------------------------
-*)

const
cdFaceDown1 = 54;
cdFaceDown2 = 55;
cdFaceDown3 = 56;
cdFaceDown4 = 57;
cdFaceDown5 = 58;
cdFaceDown6 = 59;
cdFaceDown7 = 60;
cdFaceDown8 = 61;
cdFaceDown9 = 62;
cdFaceDown10 = 63;
cdFaceDown11 = 64;
cdFaceDown12 = 65;
cdFaceDownFirst = cdFaceDown1;
cdFaceDownLast = cdFaceDown12;(*--------------------------------------------------------------------------
---
cdtInit

Initialize cards.dll -- called once at app boot time.

Arguments:
int FAR *pdxCard: returns card width
int FAR *pdyCard: returns card height

Returns:
TRUE if successful.
----------------------------------------------------------------------------
-*)
// BOOL _declspec(dllexport) cdtInit(int FAR *pdxCard, int FAR *pdyCard);

function cdtInit(var pdxCard, pdyCard: Integer): BOOL; stdcall;

(*--------------------------------------------------------------------------
---
cdtDraw

Draw a card

Arguments:
HDC hdc
int x: upper left corner of the card
int y: upper left corner of the card
int cd: card to draw (depends on md)
int md: mode
mdFaceUp: draw face up card (cd in cdAClubs..cdKSpades)
mdFaceDown: draw face down card (cd in
cdFaceDown1..cdFaceDown12)
mdHilite: draw face up card inversely
mdGhost: draw a ghost card, cd ignored
mdRemove: draw rectangle of background color at x,y
mdDeckX: draw an X
mdDeckO: draw an O
DWORD rgbBgnd: table background color (only required for mdGhost and
mdRemove)

Returns:
TRUE if successful
----------------------------------------------------------------------------
-*)
// BOOL _declspec(dllexport) cdtDraw(HDC hdc, int x, int y, int cd, int md,
DWORD rgbBgnd);

function cdtDraw(hdc: THandle; x, y, cd, md, rgbBgnd: Integer): BOOL;
stdcall;

(*--------------------------------------------------------------------------
---
cdtDrawExt

Same as cdtDraw except will stretch the cards to an arbitray extent

Arguments:
HDC hdc
int x
int y
int dx
int dy
int cd
int md
DWORD rgbBgnd:

Returns:
TRUE if successful
----------------------------------------------------------------------------
-*)
// BOOL _declspec(dllexport) cdtDrawExt(HDC hdc, int x, int y, int dx, int
dy,
// int cd, int md, DWORD rgbBgnd);

function cdtDrawExt(hdc: THandle; x, y, dx, dy, cd, md, rgbBgnd: Integer):
BOOL; stdcall;

(*--------------------------------------------------------------------------
---
cdtAnimate

Draws the animation on a card. Four cards support animation:

cd #frames description
cdFaceDown3 4 robot meters
cdFaceDown10 2 bats flapping
cdFaceDown11 4 sun sticks tongue out
cdFaceDown12 4 cards running up and down sleave

Call cdtAnimate every 250 ms for proper animation speed.

Arguments:
HDC hdc
int cd cdFaceDown3, cdFaceDown10, cdFaceDown11 or cdFaceDown12
int x: upper left corner of card
int y
int ispr sprite to draw (0..1 for cdFaceDown10, 0..3 for others)

Returns:
TRUE if successful
----------------------------------------------------------------------------
-*)
// BOOL _declspec(dllexport) cdtAnimate(HDC hdc, int cd, int x, int y, int
ispr);

function cdtAnimate(hdc: THandle; cd, x, y, ispr: Integer): BOOL; stdcall;

(*--------------------------------------------------------------------------
---
cdtTerm

Call once at app termination
----------------------------------------------------------------------------
-*)
// VOID _declspec(dllexport) cdtTerm(VOID);

procedure cdtTerm; stdcall;

implementation

function cdtInit; external CardsDll name 'cdtInit';
function cdtDraw; external CardsDll name 'cdtDraw';
function cdtDrawExt; external CardsDll name 'cdtDrawExt';
function cdtAnimate; external CardsDll name 'cdtAnimate';
procedure cdtTerm; external CardsDll name 'cdtTerm';

end.

Otestoval som to iba velmi zbezne.

> 2. Je mozno pracovat na IB s vice nez jednou DB?

Je mozne mat transakciu nad viacerymi databazami:
http://www.borland.com/interbase/ib6/ib6_featureandbenefits.html

Ak Ti ide o JOIN nad tabulkami z viacerych databaz, cize nejaku obdobu
"heterogenous query" z BDE Local SQL, to myslim nepojde:
<devguide>
With InterBase you can open and access any number of databases at the same
time. You
cannot join tables from separate databases, but you can use cursors to
combine
information. See the Embedded SQL Guide for information about multi-database
applications programming.
</devguide>

HTH
TOndrej


TCPIP - prenos dat

[*] Dalibor Toman <dtoman(zv)fortech(tec)cz> - 5.12.2001 09:14:44


>V pripade Synapse staci na odeslani bloku dat pouzit Sendstring ci
>SendBuffer metody... Ze data odsla poznas podle toho, ze Synapse
>pokracuje dalsi instrukci az kdyz je operace provedena.

skutecne? Myslim, ze jedine co je jiste je, ze data byla predana beze
zbytku
systemovym bufferum. Na druhou stranu TCP linky se muzou dostat az o
dost
pozdeji...

D. Toman

IB/FB - rolename

[*] Pavel Cisar <pcb(zv)atlas(tec)cz> - 5.12.2001 09:19:29

Haj hou!

On 3 Dec 2001, at 22:14, Lud�k ZITA wrote:

> Nejak jsem si asi spatne vylozil tohle :
> Operating system-level groups are implicit in InterBase security on UNIX,
> similarly to the way UNIX users automatically supplement the users in
> isc4.gdb.
>
> a existenci poli SYS_USER_NAME a GROUP_NAME v ics4.gdb

Bejvavalo, nez Borland rozbil co mohl cca 1992-1996 (a neco take
udelal docela dobre, aby jsme jim nekrivdili :-). Me se to nepodarilo
zprovoznit, ale je pravda ze jsem do toho az tak moc neslapal.
Celkove chce security ve FB predelat, takze se timhle nikdo moc
nezabyval.

S pozdravem

Pavel Cisar
Mobil: 0724 281429
http://www.ibphoenix(tec)cz
Vse co potrebujete pro Firebird a InterBase


Vystup z tabulek do Wordu

[*] Jan Sebel�k <honza(zv)haes(tec)cz> - 5.12.2001 09:26:28

> Odes�latel: Viktor Marek <viktor(zv)mbox.vol(tec)cz>
> Poradi nekdo jak z datab�ze provest export dat do MS Wordu, nebo WordPadu?
Nemam ted po ruce Delphi 5,6.
V Delphi 4 je na to priklad Demos/Activex/Oleauto/Autoctrl.
V novejsich verzich to muze byt trochu jinak.

Honza
=========================================
= HAES - RNDr. Jan Sebelik
= http://www.haes(tec)cz
= Skolici a konzultacni stredisko pro Delphi a Win32
= Vojtiskova 206
= 507 81 Lazne Belohrad
= tel. 0434 692 569 (0776 347735)
=========================================

Store procedure

[*] Lebeda David <david.lebeda(zv)comarr(tec)cz> - 5.12.2001 09:30:51

> Kdyz tam nic neni, tak by to mel nastavit na NULL nebo ne?
> A o tom je ta dalsi podminka....

Rekl bych, ze po pouhe deklaraci promenne obsahuje promenna
nahodnou hodnotu, nikoli null. No a jestlize ten select, ktery tam
mas dal, vraci nula zaznamu, zustane RID nezmenene, tj. stale
nahodne.

David Lebeda

> > No jo mas pravdu, to "set (zv)rid=null" opravdu pomohlo....
> > Ale nechapu to, to SELECT (zv)RId=..... spatne nastavi nebo co?
>
> > Zkus doplnit prvotni nulovani vystupni promenne a pripadne potom
> > jeste zkus pomoci print zjistovat, kde a co se deje (v Query
> > Analyzer to uvidis)
> >> CREATE PROCEDURE AddNeco ((zv)ANeco CHAR(20), (zv)RId INT OUTPUT)
> >> AS
> >> BEGIN
> > set (zv)RID = null
> >> SELECT (zv)RId=IdNeco FROM TNeco WHERE Neco=(zv)ANeco
> > print '1: ' + coalesce((zv)RId, '<null>')
> >> IF ((zv)RId IS NULL)
> >> BEGIN
> >> SELECT (zv)RId=MAX(IdNeco) FROM TNeco
> >> IF ((zv)RId IS NULL)
> >> SET (zv)RId=1
> >> ELSE
> >> SET (zv)RId=(zv)RId+1
> >> INSERT INTO TNeco (IdNeco,Neco)
> >> VALUES ((zv)RId,(zv)ANeco)
> > print '2: ' + coalesce((zv)RId, '<null>')
> >> END
> >> ELSE
> >> SET (zv)RId=0
> >> END


Store procedure

[*] ing. Jan Fiala <jan.fiala(zv)iol(tec)cz> - 5.12.2001 09:42:20

5.12.2001 Blazek Jaroslav:
> Kdyz tam nic neni, tak by to mel nastavit na NULL nebo ne?
> A o tom je ta dalsi podminka....

Select vraci nejakou datovou mnozinu. Pokud nic nevybere, vraci
prazdnou mnozinu a rekl bych ze se neprovede ani zadne prirazeni.

------
ing. Jan Fiala
mailto:jan.fiala(zv)iol(tec)cz


Archivacia db v IB6

[*] <delphi(zv)zvlauto.sk> - 5.12.2001 09:47:06

Ahojte,

Ako riesite uzivatelsku archivaciu databazy v IB6? Zalohujete subor *.gdb,
alebo ako? (Teda ako to mam osetrit programovo)

Vdaka.

Robo.

dbExpress

[*] Jan Sebel�k <honza(zv)haes(tec)cz> - 5.12.2001 10:12:01

> Odes�latel: cis <cis(zv)atlas(tec)cz>
> provozuje nekdo dbExpress v aplikaci? Zkousel jsem pristup k IB, a vysledky
> dost slabe. Uplne trapny SQL dotaz na BDE trva asi 3s a na dbExpress asi
> minutu. Setkal se s tim nekdo?

To zalezi na pristupu.
napr.
TQuery po otevreni nacte jenom tolik zaznamu, kolik potrebuje (napr. do gridu).
TClientDataSet, pri propojeni napr. pres dbExpress nacte vsechno (viz PacketRecords).

Server by mel stejny select vyhodnocovat stejne.
Takze pokud dam TQuery.Last (Ctrl+End v gridu), melo by to byt priblizne stejne.

Anebo je to jinak?

Honza
=========================================
= HAES - RNDr. Jan Sebelik
= http://www.haes(tec)cz
= Skolici a konzultacni stredisko pro Delphi a Win32
= Vojtiskova 206
= 507 81 Lazne Belohrad
= tel. 0434 692 569 (0776 347735)
=========================================

Ciarovy kod v nativnom mode

[*] DHederer(zv)softip.sk - 5.12.2001 10:19:59

Dobry den,

potreboval by som tlacit ciarove kody v nativnom mode t.j. na ihlickovych
tlaciarnach.
Robil niekto nieco podobne?

Win 2000 Pro, Delphi 5 Enterprise a ReportBuilder 5.

DELPHI 6

[*] Jan Sebel�k <honza(zv)haes(tec)cz> - 5.12.2001 10:20:46

> Odes�latel: Petr Vones <pvones(zv)mbox.vol(tec)cz>
> pouze pro nekomercni aplikace.

> > M.Jirman
> > to muze byt docela sranda kdyz se nekdo zivi poradentstvim a dava slovni
> > doporuceni na zaklade zkouseni v techto free delphi6.

> Odes�latel: Ota Maly <ota.maly(zv)volny(tec)cz>
> To je prece jednoznacne komercni pouziti -> nelze pouzit Open Edition.
> Alespon tak to chapu ja..

Ozehava otazka, hlavne pro me.
Nekomercni aplikace nebo nekomercni pouziti?
Pravda, nemluvim o Delphi 6 Personal Edition, ale o Delphi 6 Classroom.

Zalezi na tom, jak je formulovano licencni ujednani uvnitr krabice.
Mam koupeno 10 licenci Delphi 6 Professional Classroom.
Licence Agreement zhruba rika:

For educational use only. All distribution must be non-commercial, in other words, you may not receive any direct or indirect compensation for your distribution.

Takze bych rekl, ze pravdu ma Petr Vones: nekomercni aplikace
V Delphi 6 Classroom nemohu vyvijet komercni aplikace.
O nekomercnim pouziti tam neni ani zminka.
Anebo se mylim?

Honza
=========================================
= HAES - RNDr. Jan Sebelik
= http://www.haes(tec)cz
= Skolici a konzultacni stredisko pro Delphi a Win32
= Vojtiskova 206
= 507 81 Lazne Belohrad
= tel. 0434 692 569 (0776 347735)
=========================================

Store procedure

[*] Blazek Jaroslav <Jaroslav.Blazek(zv)access-it(tec)cz> - 05.12.2001 10:51:25

Jeste mi nikdo neodpovedel na prvni dotaz, tohle mi dela doma i na IB, ale tam staci jen IBDatabase.Active, IBTransaction.Active nastavit na false a opet na true a vse funguje normalne. Ale, kdyz to udelam i s ADOConection, tak to nefacha. A musim postupovat viz. nize.....

Diky za kazdou pomoc....

Bc. Jaroslav Blazek
Access-IT Ceska Lipa
jaroslav.blazek(zv)access-it(tec)cz
www.access-it(tec)cz
+420605/813644

>>> Jaroslav.Blazek(zv)access-it(tec)cz 4.12.01 16:27 >>>
Ahojky,
mam nasledujici dva problemy

1.Ulozim do databaze novou proceduru

ADOStoreProcedure ji priradim
- vse probiha v poradku do te doby nez zjistim, ze jsem v procedure udelal chybu.
- tu proceduru vymazu - drop procedure ....
- opravim ji, parametry procedury zustavaji stejne.
- refresnu i ADOStoreProcedure, ale od te doby uz se mnou nechce komunikovat
- pri prirazeni ADOStoreProcedure.Parameters[1].Value=Neco;
mi to hodi - "List index out of bounds(1)" - pritom paramtry procedury zustanou stejne.
- musim tedy komponentu ADOStoreProcedure vymazat a nasledne ji znovu pridat a znova nastavit.
- pak vse zase funguje

---cim to muze byt ?

////////////////////////////////
W2000, D5, MS SQL 2000
///////////////////////////////

Diky

Bc. Jaroslav Blazek
Access-IT Ceska Lipa
jaroslav.blazek(zv)access-it(tec)cz
www.access-it(tec)cz
+420605/813644

Archivacia db v IB6

[*] Kaka�ka Pavol <kakacka(zv)proca(tec)cz> - 5.12.2001 10:57:05

From: <delphi(zv)zvlauto.sk>
> Ako riesite uzivatelsku archivaciu databazy v IB6? Zalohujete subor *.gdb,
> alebo ako? (Teda ako to mam osetrit programovo)

Pomocou backup/restore. V IBX su na to komponenty a v helpu priklady.

Kaka�ka Pavol
KasiX(zv)atlas(tec)cz

DELPHI 6

[*] Josef Madlik <madlik(zv)jsp(tec)cz> - 5.12.2001 11:05:12

> > Ahoj,
> >
> > to muze byt docela sranda kdyz se nekdo zivi poradentstvim a dava slovni
> > doporuceni na zaklade zkouseni v techto free delphi6.
> >
> > M.Jirman
> >
>
> To je prece jednoznacne komercni pouziti -> nelze pouzit Open Edition.
> Alespon tak to chapu ja..
>
> Ota Maly

Presne tak. Primo od Borlandu jsem se ujistil, ze Delphi 6 jsou Free pro
nekomercni subjekty a pro nekomercni ucely!
J.M.

DELPHI 6

[*] Gebauer Lukas <gebylist(zv)mlp(tec)cz> - 5.12.2001 11:17:30

> > To je prece jednoznacne komercni pouziti -> nelze pouzit Open Edition.
> > Alespon tak to chapu ja..
> Presne tak. Primo od Borlandu jsem se ujistil, ze Delphi 6 jsou Free pro
> nekomercni subjekty a pro nekomercni ucely!

Co jsou to 'nekomercni ucely'??? Je to i psani proramu, ktere jsou
sireny zadarmo?

-- Lukas Gebauer.

E-mail: gebauerl(zv)mlp(tec)cz
http://www.ararat(tec)cz/synapse/ - Synapse Delphi and Kylix TCP/IP Lib.

DELPHI 6

[*] Ladislav Fitz <ladislav.fitz(zv)kodytek(tec)cz> - 5.12.2001 11:22:45

mam k tomuto dotaz (mozna budu za blba, ale co)

je komercnim vyuzitim vytvoreni programu pro firmu kde jsem zamestnan ktery
se nebude prodavat, ale je jen pro interni potrebu, eventuelne zakaznik
dotatne jen tiskovy vystup z tohoto programu?

Ciarovy kod v nativnom mode

[*] kuchar(zv)unicodesys(tec)cz - 5.12.2001 11:30:20

cau

kdysi davno jsem neco podobneho delal, jedinym rozumnym spusobem bylo
tenkrat carovy kod nacpat do Timage jako obrazek a ten jsem pustil na
tiskarnu, pokud jsem chtel tlacit primo, tak to nedelalo tenkrat dobrotu,
carove ctecky ( ted uz nevim typ, ale byly klavesnicove ) to nechteli nejak
precist, slo tam hlavne o dodrzeni spravne sirky carek a na ty jsem vedel
tiskarnu presvedcit jenom kdyz jsem to narval uz do spominane komponenty


Adonis a store procedure

[*] bardon <bardon(zv)akord-soft(tec)cz> - 5.12.2001 11:39:13

Zatim mi to vzdy pomohlo (SET NOCNOUNT...), ale princip je v tom, ze ADO umi
vracet vice datasetu a da se volit, ktery chces...

> P�edm�t: Adonis a store procedure
> Mam problem,
> se store procedure u MS-SQL a ADONIS,
> pokud ma procedura neco udelat (update tabulky) a potom
> vratit DataSet,
> oblasi mi TADOStoredProc "Operation is not allowed when the object is
> closed".
> Myslim, ze jsem to jiz kdysi zlomil, ale nemohu si zaboha
> vzpomenou jak.
> Muzete mi nekdo postrcit.

Ahoj,

SET NOCOUNT ON/OFF ?

Jiri Foldyna
mailto:jiri.f(zv)avizo(tec)cz


Indexovy subor CDX

[*] Lstiburek Pavel <Lstiburek(zv)ceb(tec)cz> - 5.12.2001 11:40:54

Pripona souboru bohuzel neznamena, ze se jedna o stejny typ indexu nebot
cele jmeno souboru s indexem je ulozeno v hlavicce DBF souboru. Zkuste tu
tabulku otevrit pomoci FoxPro, zda si s indexem poradi, pripadne to pomoci
foxpro preindexovat, zda to nebude lepsi (prectou to oba opragramy, ...).

Pavel

>
> Vdaka za mnozstvo informacii ... ale ... neviem ci je problem vo mne,
> alebo v delphi ... vysvetlim.
>
> Kolega ma soft na spravu DB vytvoreny v CA-Visual Objects ... databaza
> je typu dbf (FoxPro) s indexovym suborom CDX ...
>
> Prerabame a ideme rozsirovat soft v Delphi ... a teraz ten problem ...
>
> Delphi necita dobre jeho indexovy subor, sice mi zoradi data podla
> kluca, ale pri hladani kluc zlyha ... nenajde danu polozku,
>
> na druhej strane, ak ja vytvorim indexovy subor, tak jeho
> soft zlyha pri
> hladani podla kluca ...
>
> Tak sa mi vidi, ze tu plati "Ked dvaja robia to iste, nemusi to byt to
> iste"
>
> Sa mi vidi, ze moj indexovy subor a jeho indexovy subor, i ked by mali
> byt rovnakeho formatu, tak NIE SU ... ako je to mozne? To si
> kazda firma
> robi svoje ?
> Ved to je BORDEL ...
>
> Ak nebolo potrebne, aby dana databaza bezala aj v Delphi aj v
> CA-VO, tak
> sa jednoducho preindexuje v tom ktorom softe ... ale kym nebude plne
> funkcny soft v Delphi, tak ta databaza musi bezat korektne
> ako u mna tak
> aj u neho. PROSIM PORADTE.
>
> ak sa mylim, prosim opravte ma ... skusali sme to aj s MDX aj
> s CDX ...
> vsetko zle ...
>
> Zatial vdaka ...
>
> Slavo
>

TCPIP - prenos dat

[*] Gebauer Lukas <gebylist(zv)mlp(tec)cz> - 5.12.2001 11:45:03

> >V pripade Synapse staci na odeslani bloku dat pouzit Sendstring ci
> >SendBuffer metody... Ze data odsla poznas podle toho, ze Synapse
> >pokracuje dalsi instrukci az kdyz je operace provedena.
> skutecne? Myslim, ze jedine co je jiste je, ze data byla predana beze
> zbytku systemovym bufferum. Na druhou stranu TCP linky se muzou dostat
> az o dost pozdeji...

No to mas pravdu.. ale IMHO nemas sanci zjistit nic lepsiho...
(respektve vsechny zname zpusoby komunikace s winsockem hlasi jako
stav odeslano prave tento okamzik, takze dost pochybuji, ze by v
tomto ohledu nejake jina komponenty pracovaly lepe...

...a zpravidla okamzik od predani systemu do skutecneho odeslani je
velmi maly...
-- Lukas Gebauer.

E-mail: gebauerl(zv)mlp(tec)cz
http://www.ararat(tec)cz/synapse/ - Synapse Delphi and Kylix TCP/IP Lib.

Ciarovy kod v nativnom mode

[*] Hol�k Martin <martin.holik(zv)vytahy(tec)com> - 5.12.2001 11:58:14

> Dobry den,
>
> potreboval by som tlacit ciarove kody v nativnom mode t.j. na ihlickovych
> tlaciarnach.
> Robil niekto nieco podobne?
>
> Win 2000 Pro, Delphi 5 Enterprise a ReportBuilder 5.

Ja jsem mnel take tento problem.
Podivej se na www.codeware(tec)cz zde se nach�z� fonty pro tvorbu c�rkov�ho k�du
(font je c�rkov�m k�dem). Takto vytvoren� c�rkov� k�d lze vitisknout na
libovoln� tisk�rne (i jehlickov�).

Martin Hol�k

spravce(zv)vytahy.com


---
Odchoz� zpr�va neobsahuje viry.
Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.303 / Virov� b�ze: 164 - datum vyd�n�: 24.11.2001


DELPHI 6

[*] Dalibor Toman <dtoman(zv)fortech(tec)cz> - 5.12.2001 11:59:13

> je komercnim vyuzitim vytvoreni programu pro firmu kde jsem
zamestnan ktery
> se nebude prodavat, ale je jen pro interni potrebu, eventuelne
zakaznik
> dotatne jen tiskovy vystup z tohoto programu?

predpokladam, ze firma ma z toho vystupu nejaky profit?


D. Toman

DELPHI 6

[*] Zbysek Hlinka <hlinka(zv)hlinka(tec)cz> - 5.12.2001 12:26:24

On 5 Dec 2001 at 11:22, Ladislav Fitz wrote:

> mam k tomuto dotaz (mozna budu za blba, ale co)
>
> je komercnim vyuzitim vytvoreni programu pro firmu kde jsem zamestnan
> ktery se nebude prodavat, ale je jen pro interni potrebu, eventuelne
> zakaznik dotatne jen tiskovy vystup z tohoto programu?

Pokud tento program slouzi nejakym zpusobem k vytvareni zisku, pak ano. Coz je ve firme
vlastne vsechno. :-)

S pozdravem

Zbysek Hlinka

Phone: 0603 551 282


DELPHI 6

[*] Ladislav Fitz <ladislav.fitz(zv)kodytek(tec)cz> - 5.12.2001 12:29:28

> predpokladam, ze firma ma z toho vystupu nejaky profit?


vpodstate jde o prodejky


Sortovanie na ADOQuery

[*] Miroslav Hro��o <hrossik(zv)nrsys.sk> - 5.12.2001 12:32:49

Zdravim,
mam jednu otazku:

Preco ked pouzijem - "select * from XXX order by NAZOV"
dostanem data do gridu v nasledovnom poradi
A-AAA
A-BBB
A AAA
A BBB

Ak vsak pouzijem "select * from XXX"
a po otvoreni ADOQuery vykonam
ADOQuery.Sort := 'NAZOV'; tak dostanem data v nasledovnom poradi
A AAA
A BBB
A-AAA
A-BBB

Problem je len " - " diakritika problem nerobi;

Vie mi niekto poradit co urobit aby : "data po Sortovani" = "data po selecte
s ORDER BY"

D5 Ent,Ado Expres,MSSQL 7.0


Miro


Archivacia db v IB6

[*] <delphi(zv)zvlauto.sk> - 5.12.2001 12:37:44

No to je pekne. Ale ja by som to chcel riesit bez IBX.
A backup/restore? Tiez nevyhovuje.
"Jednoducho" aby u��vate� stla�il tla�itko a v#etko mu to niekde
archivovalo.

Robo.

-----Original Message-----
From: delphi-l-owner(zv)clexpert(tec)cz [mailto:delphi-l-owner(zv)clexpert(tec)cz]On
Behalf Of Kaka�ka Pavol
Sent: Wednesday, December 05, 2001 10:57 AM
To: delphi-l(zv)clexpert(tec)cz
Subject: Re: Archivacia db v IB6


From: <delphi(zv)zvlauto.sk>
> Ako riesite uzivatelsku archivaciu databazy v IB6? Zalohujete subor *.gdb,
> alebo ako? (Teda ako to mam osetrit programovo)

Pomocou backup/restore. V IBX su na to komponenty a v helpu priklady.

Kaka�ka Pavol
KasiX(zv)atlas(tec)cz

Zalohovani IB

[*] Radek KALA <Kala(zv)Atlas(tec)cz> - 5.12.2001 12:57:07

Ahoj,
Chtel jsem udelat do sve aplikace moznost, aby volbou menu mohl
uzivate zazalohovat databazi a rozvnou mi tu zalohu poslat.

Zalohu jsem udelal pomoci IBBackupService z IBX, problem je, ze
.gbk se soubor se vytvori na serveru a ne na pocitaci kterej to
spustil. da se s tim neco udelat ?
Jak to resite vy ?

S pozdravem Radek KALA
BetaControl, s.r.o.
Cerneho 58/60, 635 00
tlf. : + 420 5 4622 3491
fax : + 420 5 4622 3470
GSM : + 420 603 85 75 15


OT: Dual monitor na HP OmniBook XE3 pod Win2000 (i

[*] Jaroslav Popluhar <delphi1(zv)acc.sk> - 5.12.2001 12:59:32

Na %subj%
pod Win98 vse funguje jak ma,
pod W2k nevim, kde zacit.

Jaro



---
Odch�dzaj�ca spr�va neobsahuje v�rusy.
Skontrolovan� antiv�rusov�m syst�mom AVG (http://www.grisoft(tec)cz).
Verzia: 6.0.298 / V�rusov� datab�za: 161 - d�tum vydania: 13. 11. 2001


Ciarovy kod v nativnom mode

[*] Mirek Junek <mirek.junek(zv)worldonline(tec)cz> - 5.12.2001 13:06:52

Ahoj,
ja tom mam vyresene, ale 10.12. predavame zakazku, takze nestiham. Pokud
nesezenes nic jineho, ozvi se po 10.12. na soukr mail

Mirek
| cau
|
| kdysi davno jsem neco podobneho delal, jedinym rozumnym spusobem bylo
| tenkrat carovy kod nacpat do Timage jako obrazek a ten jsem pustil na
| tiskarnu, pokud jsem chtel tlacit primo, tak to nedelalo tenkrat dobrotu,
| carove ctecky ( ted uz nevim typ, ale byly klavesnicove ) to nechteli
nejak
| precist, slo tam hlavne o dodrzeni spravne sirky carek a na ty jsem vedel
| tiskarnu presvedcit jenom kdyz jsem to narval uz do spominane komponenty
|
|

Zprovozneni Konfview

[*] Jan Dvorak <dvorak(zv)szu(tec)cz> - 5.12.2001 13:10:03

Zdravim ucastniky konference.
Nepodarilo se mi zprovoznit KonfWiew, stale dostavam hlaseni "Nelze otevrit
tabulku ...." nebo "Nepodarilo se vytvorit tabulku! Mozna uz existuje." i
presto, ze jsem vlozil prazdnou tabulku emptytable.db jak radi autor na
strankach Konfwiew. Poradi mi nekdo jak na to?

Ing. Jan Dvorak

Konverze MSSQL->ORACLE

[*] borkovec(zv)email(tec)cz - 5.12.2001 13:15:32

Dobre poledne,
Nevite nekdo o programech, pripadne utilitkach ci komponentach, ktere mohou pomoci pri prenosu aplikace a db z MSSQL(7,2000) na ORACLE (8,9i)?
Za kazdou zkusenost dekuji
R&B

---
Alef NULA - Authorized Cisco Systems Distributor
Alef NULA - technick� podpora, #kolen� Cisco - http://www.alef0(tec)cz

Kylix - konsolove aplikace

[*] Radek Cervinka <radek.cervinka(zv)centrum(tec)cz> - 5.12.2001 13:25:16

Myslim, ze se na to bude muset jit pres ncurses (knihovna v linuxu pro psani
znaku). Mozna to pujde i jinak (ridici kody). (mimochodem ve windows ClrScr
a spol taky neni). Nejakou konverzi ncurses do pascalu jsem videl na
www.freepascal.org.
Co presne chces delat?
jinak man ncurses.
Radek

PS: Stisk klavesy jde udelat pres volani select (...).

>Preji pekny vecer,
>
>pisi v Kylixu konsolovou aplikaci a citelne mi chybeji prikazy ClrScr,
GotoXY
>a ReadKey.
>
>Muze mi nekdo poradit, jak na tyto funkce?
>
>Pouzivam Kylix 1 OE
>
>Diky za Vase odpovedi.
>Jiri Kratochvil

Store procedure

[*] kuchar(zv)unicodesys(tec)cz - 5.12.2001 13:49:27

nevim jestli to bude presne to co chces vedet, ale me to kdysy pomohlo,
musel jsem nazev procedury znovu priradit komponente, refresh nezabral a
myslim ze jsem musel udelat taky ADOStoreProcedure.Parameters.create


DELPHI 6

[*] Ota Maly <ota.maly(zv)volny(tec)cz> - 5.12.2001 14:10:09

Ahoj,
nerad to rikam, ale zcela urcite. Firme slouzi k praci, tudiz ke zvysovani
nebo udrzovani zisku (nebo jak zni ta hrozna definice :-). Navic pokud das
vystup z programu zakaznikovi, ziskavas tim v podstate konkurencni vyhodu.

S pozdravem
Ota Maly

PaPouch elektronika
http://www.papouch.com


>
> mam k tomuto dotaz (mozna budu za blba, ale co)
>
> je komercnim vyuzitim vytvoreni programu pro firmu kde jsem
> zamestnan ktery
> se nebude prodavat, ale je jen pro interni potrebu, eventuelne zakaznik
> dotatne jen tiskovy vystup z tohoto programu?
>
>

© Delphi.cz, program netcode.cz, 2008-9.