Archív konference Delphi
Zpět na výběr roku archívu nebo přejít na fulltextové vyhledávání v konferenci.
Priklad DB aplikace
[*] Zbysek Hlinka <hlinka(zv)hlinka(tec)cz> - 9.10.2000 20:10:17
On 9 Nov 2000, at 13:05, Petr Fejfar wrote:
> My se casto pripojujeme na ruzne SQL servery na ruznych platformach,
> takze jako hlavni komponentu pro praci s SQL pouzivame vlastni
> tSQLQuery, ktera nabizi nejakou minimalni mnozinu vlastnosti,
> spolecnou pro ruzne SQL servery a vytvari tak interface k ruznym typum
> pristupu k serveru jako je BDE, ODBCe etc...). To pouzivame k uplne
> spokojenosti v backoffice aplikacich tj. aplikacich bez ksichtu, kde
> to pracuje v multithreadovem prostredi.
>
> Nyni vsak stojime pred ukolem napsat klientskou aplikaci tj. s
> ksichtem a radi bych zustali u cisteho SQL, abychom meli plnou
> kontrolu nad transakcemi. Ale nemame s pasanim takovych aplikaci skoro
> zadne zkusenosti.
Na tom nic neni. Styl stavajici prace patrne zustane stejny, pouze
pribudou okna, kde budou edity a ruzne podobne volovinky, do
kterych se nasypou data z nejakeho datoveho zdroje, zedituji se,
pak se vyberou a dale se postupuje obvyklym zpusobem. Pouze je
vhodne nechat okno otevrene do doby, nez se ulozeni provede v
poradku. Takze nejvetsi problem vidim ve slusnem navrhu toho
okna.
S pozdravem
Zbysek Hlinka
Phones: 02/795 29 56; GSM: 0603 551 282
Krystofova 1016, 149 00 Praha 4
CZ
DBaware ? data-aware
[*] Zbysek Hlinka <hlinka(zv)hlinka(tec)cz> - 9.10.2000 20:10:17
On 9 Nov 2000, at 15:09, Ing. Zdenek Havranek, HAF wrote:
> > > Jsou to komponenty schovane v Developer's Guide pod nazvem
> > > data-aware na palete Data Controls?
> >
> > Tak, tak.
>
> A jak se tedy da napsat uzivatelsky pritulna aplikace nad SQL, bez
> pouzivani techto komponent (jak se tu v konferenci radi)?
:-) Asi je vhodne nejdrive rict, ze rychle napsana aplikace <>
uzivatelsky pritulna aplikace. DB aware komponenty (ted mam na
mysli prave ty z Data Controls) pomahaji rychle udelat program, ale
to je tak vetsinou vse. Tyto komponenty jsou vhodne budto pro
prohlizeni, nebo jeste tak pro editovani nad souborovou lokalni
databazi. Filosofie SQL databazi v sitovem provozu je vsak natolik
odlisna od souborove lokalni, ze je pro editovani vhodnejsi pouzit
nedatabazovych komponent.
Priklad: mam grid, v nem data. Chci editovat radek. Otevru nove
okno, prenesu tam vsechny potrebne udaje, zedituji, po potvrzeni
poslu databazi pres ulozenou proceduru, pricemz osetrim pripadne
chybove stavy. Pokud se vse povede, okno zavru a obnovim radek
(pripadne cely grid).
Priklad z praxe. Kdyz jsem nechal ve starsi verzi programu editovat
uzivatele primo v gridu, stezovali si na neprehlednost. Pak jsem
editovani oddelil tak jak popisuji vyse, a zakaznici jsou daleko
spokojenejsi. Pritom si mohou s editacnim oknem odjet stranou, a
mohou soubezne videt puvodni stav.
Jeste jeden drobny poznatek. Editovani v gridu muze byt pritulnejsi
pro cloveka, ktery vi velice dobre co dela, a umi si osetrit sve
chyby, tedy obvykle pro programatora. Pro bezneho uzivatele az
BFU plati dost odlisna meritka.
S pozdravem
Zbysek Hlinka
Phones: 02/795 29 56; GSM: 0603 551 282
Krystofova 1016, 149 00 Praha 4
CZ
Nativni pro MS SQL
[*] Erik Salaj <winsoft(zv)napri.sk> - 9.10.2000 21:22:29
> Ani DBLib, ani ODBC, ani OLE DB _NEJSOU_ v zadnem pripade
> nativni komponenty (ty uz vubec ne) pro pristup k databazim.
> Vsechno to jsou "univerzalni" knihovny pro pristup k databazim
> (pricem OLE DB je z nich nejvice univerzalni). OLE DB lze pri
> znacnem zjednoduseni a primhoureni obou oci oznacit jako nativni
> pristup k MS SQL 7 a vyse, ale se zduraznenim vyhrady.
>
>
> Nativnim pristupem se rozumi primy pristup k dll-kam dane
> databaze, bez dalsiho zprostredkovatele. Nativni komponentou v
> Delphi se mysli obaleni volani funkci z techto dll.
Ja nativnym pristupom rozumiem pristup oznacovany za nativny
vyrobcom databazy, pripadne vyrobcom preferovany pristup.
A je jedno, ci to je DLL alebo OLEDB alebo ODBC.
Erik Salaj, WINSOFT
info(zv)winsoft.sk
Nativni pro MS SQL
[*] Erik Salaj <winsoft(zv)napri.sk> - 9.10.2000 21:24:06
> Ne vse co se pise v dokumentaci od Microsoft, je pravda. Z
> vlastnich zkusenosti.
>
> Od nejhorsiho po nejlepsi.
> 1, BDE (no katastrofa)
> 2, ODBC (vcelku dost slusne) az na to zjistovani columnu
> 3, ADO (Dost rychle, rekl bych asi nejlepsi) nevyhoda (neni
> soucasti W95)
Nie je problem doinstalovat.
> 4, Nativni od 3 stran (velmi rychle, spolehlive, ale pustte si
> trace a budete zirat)
> 5, Nativni od zeos.dn.ua
> K tomuto bych se rozepsal vice.
> Na to, ze jsou zatim v beta verzi jsou dost promakane. Jsou ze
> vsech nejrychlejsi, zdrojaky jsem zatim nestudoval, nebyl cas.
> Jsou dost spolehlive, jediny problem, co zatim je, nastava v
> tabulce s vice jak cca 20000 zaznamy do gridu. Uz jsem tam psal,
> chyba by uz mela byt odstranena. Do budoucnosti bych rekl, ze asi
> budou "top" na zebricku komponent pro MS SQL.
Programator z ukrajiny asi vie o MS SQL serveri a jeho rozhraniach
viac ako Microsoft a je potom skoda, ze dokumentaciu k MS SQL serveru
nepisal on, isto by tam neboli nespravne udaje. Je ale celkom mozne aj to,
ze po anglicky vie asi tak ako ja po ukrajinsky a nevsimol si alebo
nerozumie tomu, co Microsoft v dokumentacii pise:
----
a.. DB-Library for C.
These libraries are still included and supported at their version 6.5 level.
They are not enhanced for SQL Server 7.0.
The DB-Library for C API has not been upgraded for SQL Server 7.0.
DB-Library applications still use TDS 4.2 to communicate with SQL Server
7.0, and are subject to the restrictions in this list. The Embedded SQL for
C API is layered over DB-Library; it also operates as a TDS 4.2 client and
is subject to the restrictions in this list.
The restrictions in this list apply to these clients:
a.. Any client using a 2.5 or 2.65 version of the SQL Server ODBC driver
b.. All DB-Library clients, regardless of version
c.. All Embedded SQL for C clients, regardless of version
----
Nazvat zastarale rozhranie, ktore je sucastou databazy iba koli zachovaniu
kompatibility nativnym rozhranim je naozaj velmi odvazne (alebo myslis, ze
Microsoft nema v tejto casti dokumentacie pravdu ;-) ja by som sa na to
nespoliehal ;-) ).
Erik Salaj, WINSOFT
info(zv)winsoft.sk
Presun dat z WinBase ...
[*] Pavel Lavicka <plavicka(zv)mbox.vol(tec)cz> - 9.10.2000 21:40:47
Ahoj,
pokud chces otevrit v Excelu DBF tabulku s korektni cestinou, musi byt DBF soubor vytvoren s kodovanim cestiny podle normy Latin 2 (CP852). Pokud je DBF tabulka v kodovani Windows (CP1250), pak je cestina chybne zobrazena.
WindBase umi exportovat do DBF v ruznych kodovych strankach, tak vyzkousej export v Latin 2.
ODBC driver je ve Winbase k dispozici tusim od verze 4.0. Co treba zkusit stahnout ze serveru Software602 Winbase verze 6.1, ktera je volne siritelna, prevest do ni data a pak s nimi pracovat pres ODBC? (Mozna trochu krkolomne, ale je to zadarmo).
Zdravi Pavel Lavicka
----- Original Message -----
From: Pavel Skalicky
To: Konference Delphi
Sent: Wednesday, November 08, 2000 10:31 AM
Subject: Presun dat z WinBase ... Dobry den,
narazil jsem na nasledujici problem -
mam starou databazi ve WinBase 3.1 (pred rokem kdyz se kolega ptal na cosi v Soft602, tak se mu vysmali, ze to uz tam davno nikdo neudrzuje a nedela). Je ale pozadavek data z teto db presypat nekam jinam.
Primo ve WinBasi je export do textu, dBase IV a FoxPro 2.0.
Kdyz si to ale vyexportuju do *.dbf, tak pri otevreni mi Query zahlasi, ze je porusena hlavicka nebo index. A smula. Excel 2000 to otevre (dokonce to vypada i rozumne), tam je ale zase v haji cestina.
Pokud nekdo mate zkusenosti nebo napad, jak by se to dalo vytvorit, byl bych Vam vdecny. ODBC driver se k WinBasi nenabizi, takze tudy cesta taky nevede. Programuju to v Delphi 5 Ent a cil ma byt MS Access 97.
Diky za kazdou radu
Pavel
-------------------------------------------------
Pavel Skalick�
e-mail - P.Skalicky(zv)seznam(tec)cz
www - http://pts.kvalitne(tec)cz
mobil - 0604 844 698
ICQ - 38169741
ListView owner draw ?
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 9.10.2000 22:55:29
From: <brant(zv)dcomm(tec)cz>
> v aplikaci pouzivam TListView ve stylu Report, tj. vypada to jako listbox s
> obrazky. Jenze u jednoho zakaznika s W95 se ty obrazky nezobrazuji, coz je
> patrne tim, ze ma IE ve verzi 3.0 a tim padem nejakou systemovou DLL, ktera
Ahoj,
lze to resit pomerne jednoduse updatem COMCTL32.DLL:
http://www.microsoft.com/msdownload/ieplatform/ie/comctrlx86.asp
Petr Vones, amatersky programator
BLOB
[*] Lud�k P�ral - 9.10.2000 23:26:35
Zalezi na tom co s nim chces delat. Mozne je napr:
(Query.FieldByName('NECO') as
ield).SaveToFile(cesta+jmenosouboru) - ulozi data do souboru-napr.DOC,
JPG, BMP, dale se k teto kopii chovas jak ke standartnimu souboru
HodnotaBlob:=(Query.FieldByName('NECO') as TBlobField).Value // ulozi data
do lokalni promenne
Ludek Paral
----- P�vodn� zpr�va -----
Od: "Ren� Otisk" <otisk(zv)misel(tec)cz>
Komu: <delphi-l(zv)fwd(tec)cz>
Odesl�no: 8. listopadu 2000 11:37
P�edm�t: Re: BLOB
Zkus TBlobField.LoadFromFile, LoadFromStream resp. SaveToFile, SaveToStream
Sroub
Hello
Nevite jak vycucat Blob z datab�ze.
Nebo proc mi funkce TBDEDataSet.GetBlobFieldData stale vraci 0
Jirka Dvorak
Prepsani pouzivane DLL
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 10.10.2000 00:21:54
From: <brant(zv)dcomm(tec)cz>
> Nahodou jsem narazil v MSDN na funkci MoveFileEx, ktera je schopna prepsat
> pouzivany soubor pri rebootu, to by se na tvuj problem mohlo hodit.
Ahoj,
tato funkce je ale implementovana jen v NT.
Petr Vones, amatersky programator
FTP server pro ucely konference Was: Spravne fung
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 10.10.2000 00:52:44
From: "Roland Tur�an (RoTurSoft)" <rotursoft(zv)nextra.sk>
> bol by som rad
> > M�m na to napsane vlastni UDF, ktere to resi.
> > Muzu poslat.
Ahoj,
jenom takova mala pripominka. Cas od casu se stava, ze zde nekdo nabizi soubor
o ktery by meli zajem i ostatni. Pro tyto ucely byl kdysi zrizen prostor na
FTP serveru: ftp://ftp.mlp(tec)cz/pub/misc/Delphi/konference/
Pro upload staci kliknout na tento odkaz:
ftp://delphi:konference(zv)ftp.mlp(tec)cz/pub/misc/Delphi/konference/
Soubor muzete ulozit bud do prislusne kategorie adresaru D1..5, bylo by dobre
jej nejak citelne pojmenovat (ne jako dat3.zip a podobne), aby i za mesic mel
nekdo tuseni o co vubec slo. Pro kratkodobe soubory byl zrizen adresar SMETI.
Petr Vones, amatersky programator
N�hrada standartn�ch dialog� openfile a savefile
[*] L. ZITA <konference(zv)sales(tec)cz> - 10.10.2000 04:07:01
>Behalf Of azeleny(zv)csas(tec)cz
>Tohle se resi nastaveni polices ve WinNT (zda to jde i ve Wir9x to nevim),
viz Run Only Allowed Apllications, nebo tak
>neco.
>a.
Ahoj.
U W9x lze pomoci policies take ledacos zakazat, ale to muze zabranit spise
nechtenemu spusteni programu.
Velmi snadno se to da obejit diky tomu, ze jakykoliv povoleny SW pouzivajici
std OpenDialogy umozni
uzivateli bez problemu kopirovat,mazat a prejmenovavat... a to kdekoliv. No
a pak uz je vse jednoduche.
(smazat *.pwl,user.dat, prejmenovat nejaky sys soubor a vynutit si tim
nouzovy rezim...)
a cela ochrana je v cudu. (Nebo staci bootnout z diskety).
Sam jsem byl pred podobny problem postaven a nezbylo mi nez vymontovat
disketove jednotky a
misto exploreru spustit vlastni shell (v SYSTEM.INI klic shell=....), Z neho
pak poustet jen povolene
aplikace, ktere nemaji opendialogy.
Nastesti to diky skladbe pouzivaneho SW slo...
Ludek
-----Original Message-----
From: delphi [mailto:korindelphi(zv)atlas(tec)cz]
Sent: Wednesday, November 08, 2000 9:58 PM
To: delphi-l(zv)fwd(tec)cz
Subject: N�hrada standartn�ch dialog� openfile a savefile
Dobr� den,
m�m jeden probl�m.. pot�eboval bych nahradit standartn� dialogy openfile a
savefile vlastn�mi dialogy. Potrebuji je prepsat, protoze se pomoci nich
daji spoustet programy ( pop-up/spustit ). Nevim jakse daji ve windows
nahradit tyto dialogy, potrebuji aby se nahradili nekde v pameti, aby to
platilo pro vsechny programy co je pouzivaji.
Diky za pomoc.
Ivan �varc
---
Odchoz� zpr�va neobsahuje viry.
Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.145 / Virov� b�ze: 69 - datum vyd�n�: 4.5.2000
DBaware ? data-aware
[*] Ren� Otisk - 10.10.2000 05:54:08
Hi,
Dovolim si oponovat tomu hodne blbe. V prvotni fazi je napsani aplikaci
trosku slozitejsi, ale vim presne co chci, co delam a jaky bude vysledek,
coz u DB-Aware komponent si vysledkem tak uplne jisty nejsem. Samozrejme
hodne zavisi na onech komponentach, ale u nonDB-aware je to taktez otazka
urcitych rutin. U prvni takhle psane aplikace je to hledani urciteho
optimalniho stavu, ale u ctvrte je to skoro jen Copy-Paste (nadnesene). V
soucasnosti by me k pouzivani DB-Aware komponent premluvili snad jen autori
ExpressGridu, kdy jsem ziral co vsechno to umi a taky kolik to stoji (600
USD). Jinak se vsim ostatnim souhlasim. S blbyma komponentama to bude blba
aplikace a zakaznici si budou myslet, ze i autor je blby.
Sroub
> ----- Original Message -----
> From: "Ing. Zdenek Havranek, HAF" <sea-cv(zv)volny(tec)cz>
>
> > A jak se tedy da napsat uzivatelsky pritulna aplikace nad SQL, bez
> > pouzivani techto komponent (jak se tu v konferenci radi)?
>
> Hodne blbe. Ale z nazorem, ze se nedaji DB aware komponenty pouzivat
> nesouhlasim. Jen je potreba dodrzovat urcita pravidla. Zbysek to resi tak,
> ze DB komponenty nepouziva. My je pouzivame, ale pracujeme vicemene na
> off-line datech, da-li se to tak rict ;-).
>
> Dobre DB komponenty a hlavne dobre komponenty pro pristup bez BDE jsou
> zaklad.
>
> Mac
SQL server - Vas nazor
[*] Ren� Otisk - 10.10.2000 05:55:03
A neni tam problem spis s cestou k iss?> > nepodarilo se mi nainstalovat MSSQL lokalne pod W2000prof
> > z Office 2000premium, setup zkolabuje
> > (Can't run 16-bit Windows program
> > - One of the library needed to run l:\..\sqlstp.exe is damaged.
> > Please reinstall this application.)
>
> Mam takovy pocit, ze tohle dela kdyz je to v nejakem blbem adresari. Jinak
> na Office 2000 je tusim pouze MSDE ne?
>
> Mac
SQL a DBTreeView - takovy SQL orisek
[*] Ren� Otisk - 10.10.2000 06:04:51
Pres join na sebe sama.
Pisu to ted z hlavy, delal jsem to pro hierarchickou strukturu zamestnancu.
Kdyz tak jsem schopen to doma nekde vystrachat
SELECT A.EID, A.JMENO, B.EID, B.JMENO FROM
EMPLOYEE A
LEFT JOIN EMPLOYEE B ON A.NADRIZENY = B.EID
Sroub
> Ahoj,
>
> ukladam data (resp. chystam se k tomu ;-) do 'stromove' struktury s
vyuzitim
> principu, ktery pouzivaji DBTreeView komponenty, tzn. id radku a parent_id
> obsahujici id vlastnika:
>
> id (Guid)
> parent_id (Guid)
> name (Varchar)
>
> lze udelat nejaky SQL dotaz, kterym bych dostal vsechny parenty pro daneho
> childa ? Jak to nejak mazane vyresit, abych nemusel pouzivat kurzory a
> podobne neresti ;-) ???
>
> Mate nekdo nejaky napad?
>
> Dik
>
> Mac
Prohlizecka ulozenych souboru QRP v QuickReportu
[*] Ji�� Fait���}���6���3 - 10.10.2000 06:08:03
Jestli chces poslu mam hotovou prohlizecku i zdrojaky.
Jiri Fait
[mailto:fait(zv)jakl(tec)cz]
[mailto:ftsoft(zv)iol(tec)cz]
> -----Original Message-----
> From: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz]On Behalf Of
> Ing. Petr �vejda
> Sent: Thursday, November 09, 2000 12:37 PM
> To: Konference Delphi
> Subject: Prohlizecka ulozenych souboru QRP v QuickReportu
>
>
> D5 prof + QR3
>
> metodou QRPrinter.Save... se mi podarilo programove ulozit vytvorenou
> sestavu. Potrebuji si vytvorit vlastni prohlizecku takto
> vytvorenych sestav
> *.QRP. Nevim ale, kam strcit metodu QRPrinter.Load... a jak ji pouzit.
> Poradite mi nekdo?
>
> Diky
>
> Petr
>
> ---
> P��choz� zpr�va neobsahuje viry.
> Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
> Verze: 6.0.198 / Virov� b�ze: 95 - datum vyd�n�: 4.10.2000
>
---
Odchoz� zpr�va neobsahuje viry.
Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.198 / Virov� b�ze: 95 - datum vyd�n�: 4.10.2000
I/O errors
[*] Tomas Vladik <tom.vladik(zv)swadvice(tec)cz> - 10.10.2000 07:14:34
Values for DOS extended error code:
00h (0) no error
01h (1) function number invalid
02h (2) file not found
03h (3) path not found
04h (4) too many open files (no handles available)
05h (5) access denied
06h (6) invalid handle
07h (7) memory control block destroyed
08h (8) insufficient memory
09h (9) memory block address invalid
0Ah (10) environment invalid (usually >32K in length)
0Bh (11) format invalid
0Ch (12) access code invalid
0Dh (13) data invalid
0Eh (14) reserved
0Fh (15) invalid drive
10h (16) attempted to remove current directory
11h (17) not same device
12h (18) no more files
---DOS 3.0+ ---
13h (19) disk write-protected
14h (20) unknown unit
15h (21) drive not ready
16h (22) unknown command
17h (23) data error (CRC)
18h (24) bad request structure length
19h (25) seek error
1Ah (26) unknown media type (non-DOS disk)
1Bh (27) sector not found
1Ch (28) printer out of paper
1Dh (29) write fault
1Eh (30) read fault
1Fh (31) general failure
20h (32) sharing violation
21h (33) lock violation
22h (34) disk change invalid (ES:DI -> media ID structure)(see #0981)
23h (35) FCB unavailable
24h (36) sharing buffer overflow
25h (37) (DOS 4.0+) code page mismatch
26h (38) (DOS 4.0+) cannot complete file operation (out of input)
27h (39) (DOS 4.0+) insufficient disk space
28h-31h reserved
32h (50) network request not supported
33h (51) remote computer not listening
34h (52) duplicate name on network
35h (53) network name not found
36h (54) network busy
37h (55) network device no longer exists
38h (56) network BIOS command limit exceeded
39h (57) network adapter hardware error
3Ah (58) incorrect response from network
3Bh (59) unexpected network error
3Ch (60) incompatible remote adapter
3Dh (61) print queue full
3Eh (62) queue not full
3Fh (63) not enough space to print file
40h (64) network name was deleted
41h (65) network: Access denied
42h (66) network device type incorrect
43h (67) network name not found
44h (68) network name limit exceeded
45h (69) network BIOS session limit exceeded
46h (70) temporarily paused
47h (71) network request not accepted
48h (72) network print/disk redirection paused
49h (73) network software not installed
(LANtastic) invalid network version
4Ah (74) unexpected adapter close
(LANtastic) account expired
4Bh (75) (LANtastic) password expired
4Ch (76) (LANtastic) login attempt invalid at this time
4Dh (77) (LANtastic v3+) disk limit exceeded on network node
4Eh (78) (LANtastic v3+) not logged in to network node
4Fh (79) reserved
50h (80) file exists
51h (81) reserved
52h (82) cannot make directory
53h (83) fail on INT 24h
54h (84) (DOS 3.3+) too many redirections
55h (85) (DOS 3.3+) duplicate redirection
56h (86) (DOS 3.3+) invalid password
57h (87) (DOS 3.3+) invalid parameter
58h (88) (DOS 3.3+) network write fault
59h (89) (DOS 4.0+) function not supported on network
5Ah (90) (DOS 4.0+) required system component not installed
64h (100) (MSCDEX) unknown error
65h (101) (MSCDEX) not ready
66h (102) (MSCDEX) EMS memory no longer valid
67h (103) (MSCDEX) not High Sierra or ISO-9660 format
68h (104) (MSCDEX) door open
B0h (176) (MS-DOS 7.0) volume is not locked
B1h (177) (MS-DOS 7.0) volume is locked in drive
B2h (178) (MS-DOS 7.0) volume is not removable
B4h (180) (MS-DOS 7.0) lock count has been exceeded
B5h (181) (MS-DOS 7.0) a valid eject request failed
Rotace bitmapy
[*] Sula Milos <milos.sula(zv)oku-su(tec)cz> - 10.10.2000 07:16:29
Ahoj
nevite jak by se dala pokud mozno co nejrychleji rotovat bitmapou (presunem
jednotlivych RGB pixelu bitmapy v pameti )?
Daji se samozrejme pouzit goniometricke fce sin a cos ale to je dosti pomale
(jedine si hodnoty predvypocitat s urcitou presnosti a potom jen volat pole
ktere vrati sin/cos jeho indexu )
predem diky
TlistView a Caption [2]
[*] Ji�� Vojtek - 10.10.2000 07:20:50
Prosim prosim potrebuju to hodne nutne!
Dobry den potrebuji jednu drobnou radu:-)
Jak donutit ListView, aby mi vypsal Caption sloupce tucne.
Experimentuji s OwnerDraw, ale zatim to nikam nevedlo.
Diky za kazdou radu.
Jde o to, ze po OnclolumnClick musim u toho jednoho konkretniho sloupce
vypsat hlavicku tucne. Neco jako ma dbgrid Title.canvas.font.style
J. Vojtek OT: Nabidka zamestnani
[*] Libor Filip <filip(zv)agrokonzulta(tec)cz> - 10.10.2000 07:27:34
Hledame programatora v Borland Delphi na plny uvazek.
Pozadujeme: znalost objektoveho programovani, SQL jazyk
Pracoviste Zamberk. Nastup mozny ihned.
V pripade zajmu nas kontaktujte
filip(zv)agrokonzulta(tec)cz
tel.c. : 0446/676712
DBaware ? data-aware
[*] David Lebeda <david.lebeda(zv)comarr(tec)cz> - 10.10.2000 07:36:23
> > A jak se tedy da napsat uzivatelsky pritulna aplikace nad SQL, bez
> > pouzivani techto komponent (jak se tu v konferenci radi)?
>
> Hodne blbe. Ale z nazorem, ze se nedaji DB aware komponenty pouzivat
> nesouhlasim. Jen je potreba dodrzovat urcita pravidla. Zbysek to resi
> tak, ze DB komponenty nepouziva. My je pouzivame, ale pracujeme
> vicemene na off-line datech, da-li se to tak rict ;-).
Myslim, ze to s psanim aplikace bez data-aware neni tak zle... :).
Ja sam tedy pouzivam pouze DBGrid (k prohlizeni) a
DBLookupComboBox (ktery ma o databazi opreny pouze seznam
hodnot).
Ten princip, jak to psat, neni myslim slozity. Mejme napr.
formular pro editaci nejakeho zaznamu v tabulce.
Sestavi se vhodne query se selectem, otevre se, data se nactou
napr. do normalnich editu apod. a query se muze zavrit ci pouzit na
neco jineho (v pripade db-aware komponent by bylo potreba nechat
query otevrene). Ten formular muze nyni klidne svitit treba puldne
na obrazovce (aniz by bylo potreba aktivni spojeni na SQL server),
uzivatel si to povyplnuje a az stiskne tlacitko OK, provedes pomoci
query ci ulozene procedury update dat.
Tohle byla sice jen jedna konkretni situace, ale jako priklad by to
mohlo stacit.
David
Prohlizecka ulozenych souboru QRP v QuickReportu
[*] CERMAK <CERMAK(zv)procom(tec)cz> - 10.10.2000 08:08:44
Ahoj
Priklad je na www.qusoft.no v sekci downloads pod nazvem custprev.zip pro
D3. Pro verzi 5 je tam taky, ale pod jinym nazvem.
Jaromir Cermak
-----Original Message-----
From: Ing. Petr �vejda [mailto:lingvista(zv)lingvista(tec)cz]
Sent: Thursday, November 09, 2000 7:53 PM
To: delphi-l(zv)fwd(tec)cz
Subject: RE: Prohlizecka ulozenych souboru QRP v QuickReportu
Importance: High
nasel jsem toto:
uses QRExtra;
begin
with TQRHandler do
try
Filename := 'c:\temp\aaa.qrp';
Preview;
finally
Free;
end;
end;
...ale jak strcit naloudovany report do vlastniho QRPreview1?????> metodou QRPrinter.Save... se mi podarilo programove ulozit vytvorenou
> sestavu. Potrebuji si vytvorit vlastni prohlizecku takto
> vytvorenych sestav
> *.QRP. Nevim ale, kam strcit metodu QRPrinter.Load... a jak ji pouzit.
> Poradite mi nekdo?
---
P��choz� zpr�va neobsahuje viry.
Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.205 / Virov� b�ze: 96 - datum vyd�n�: 23.10.2000
SQL a DBTreeView - takovy SQL orisek
[*] Milan Tome� <Milan.Tomes(zv)haida(tec)cz> - 10.10.2000 08:30:38
A co treba toto:
select distinct parent_id from ________________
where
(Name = '')
Milan Tomes
> Ahoj,
>
> ukladam data (resp. chystam se k tomu ;-) do 'stromove' struktury
> s vyuzitim
> principu, ktery pouzivaji DBTreeView komponenty, tzn. id radku a parent_id
> obsahujici id vlastnika:
>
> id (Guid)
> parent_id (Guid)
> name (Varchar)
>
> lze udelat nejaky SQL dotaz, kterym bych dostal vsechny parenty pro daneho
> childa ? Jak to nejak mazane vyresit, abych nemusel pouzivat kurzory a
> podobne neresti ;-) ???
>
> Mate nekdo nejaky napad?
>
> Dik
>
> Mac
TListview - rozsireni sloupce
[*] Zdenek Moravec <zmo(zv)volny(tec)cz> - 10.10.2000 08:58:40
Zdravim vsechny !
Pouzivam komponentu TListView a potrebuju zachytit udalost rozsireni
sloupce - chtel bych na ni navazat paralelne rozsireni policka souctoveho
gridu pod ni. Mate nekdo nejaky napad ?
S pozdravem (Regards)
Zdenek Moravec zmo(zv)volny(tec)cz
SQL a DBTreeView - takovy SQL orisek
[*] Igor Vodi�ka <vodicka(zv)sagit(tec)cz> - 10.10.2000 09:32:18
Zdravim!
Ja pokud potrebuji ukladat data do databaze organizovane do stromove
struktury, tak pouzivam nasledujici dat. strukturu:
Text_Node Pozice_v_tree Znak
Node1 0 Node001
Node11 1 Node001Child01
Node111 2 Node001Child01Child01
Node112 2 Node001Child01Child02
Node12 1 Node001Child02
Node2 0 Node002
Node21 1 Node002Child01
Node22 1 Node002Child02
Node3 0 Node003
Node4 0 Node004
Polozka Znak je dulezita jak pro spravne serazen� stromu (pri jeho nacitani
do TreeView) tak pro pripadne SQL dotazy. Struktura polozky Znak umoznuje
pro dane node najit vsechny childs a naopak vsechny parent. Tento zpusob
pouzivam k ukladan� textu knizek (knihy jsou podle obsahu stromove cleneny
do casti, kapitol, podkapitol a ...). Zobrazeni casti nebo kapitoly resim
SQL dotazem:
select text from Kniha
where znak="Node001" or Znak LIKE "Node001(%)"
V mnozine vybranych zaznamu pak postupne "sectu" text a mam cely text
zvolene kapitoly. Potrebu zjistit vsechny parenty jsem zatim nemel, ale
urcite to pujde podobnym zpusobem pomoci polozky Znak.
S pozdravem
Ing. Igor Vodi�ka
informa�n� syst�my
Nakladatelstv� Sagit, Horn� 1, 700 30 Ostrava-Hrab�vka
Tel.: 069 353 062, Fax: 069 357 758
Mailto:vodicka(zv)sagit(tec)cz
Http:\\www.sagit(tec)cz\
-----Original Message-----
From: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz]On Behalf Of
Martin Kubecka
Sent: Thursday, November 09, 2000 7:19 PM
To: DELPHI Distribution List
Subject: SQL a DBTreeView - takovy SQL orisek
Ahoj,
ukladam data (resp. chystam se k tomu ;-) do 'stromove' struktury s vyuzitim
principu, ktery pouzivaji DBTreeView komponenty, tzn. id radku a parent_id
obsahujici id vlastnika:
id (Guid)
parent_id (Guid)
name (Varchar)
lze udelat nejaky SQL dotaz, kterym bych dostal vsechny parenty pro daneho
childa ? Jak to nejak mazane vyresit, abych nemusel pouzivat kurzory a
podobne neresti ;-) ???
Mate nekdo nejaky napad?
Dik
Mac
---
P��choz� zpr�va neobsahuje viry.
Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.157 / Virov� b�ze: 73 - datum vyd�n�: 31.5.2000
---
Odchoz� zpr�va neobsahuje viry.
Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.157 / Virov� b�ze: 73 - datum vyd�n�: 31.5.2000
Applikace CGI a pristup k souboru, objektu apod.
[*] Raul Endymion <Raul.Endymion(zv)infima(tec)cz> - 10.10.2000 09:53:08
Mam problemek, pro jednoduchost naznacim na internetovem pocitadle
pristupu.
Dejme tomu ze existuje applikace CGI, ktera precte cislo ze souboru,
zvedne o jednicku, zapise a pote vygeneruje jpg s timto cislem a
odesle prohlizeci. Viz priklady ke knize Delphi 4. Nyni ovsem
problemek, co kdyz bude tento script spusten na IIS 4 nebo IIS 5
dvakrat ? Pokud otevrete soubor pro zapis dvakrat, obsah se smaze
(viz nejake me predchozi testy), tzn prijdu o pocet pristupu. Neco
podobneho se muze stat v pripade objektu a zapisu.
Dejme tomu corba objekt (se sdilenym pristupem nebo nesdilenym ?) a
funkci zapisnecoapaknecoproved;
Nevim jak toto osetrit.
Proto dotazy :
1) Spousti IIS scripty po sobe, nebo jich pusti vic ?
2) Pokud jich pousti vic, nebo treba ve vice threadech (v pripade
ISAPI), jak zabranit tomu aby zapisovali dva scripy najednou ?
3) Obecne, jak zaridit neco jako serialize, semafory, ci podobne
fronty. Vzdyt i zapsani klienta do fronty se muze stretnout.
Raul mailto:Raul.Endymion(zv)ns1.infima(tec)cz
TWebBrowser a popup menu
[*] Zdenek Moravec <zmo(zv)volny(tec)cz> - 10.10.2000 10:05:42
Dobry den,
nevite nahodou nekdo jak se da u komponenty TWebBrowser zabranit moznosti
vyvolani lokalniho popup menu (po kliknuti pravym tlacitkem).
S pozdravem (Regards)
Zdenek Moravec zmo(zv)volny(tec)cz
Ukonceni programu - stale se neukoncuje
[*] Dalibor Toman <dtoman(zv)fortech(tec)cz> - 10.10.2000 10:06:13
>function RegisterServiceProcess(dwProcessID, dwType: Integer): Integer;
>stdcall;
> external 'KERNEL32.DLL';
....
Predpokladam, ze RegisteServiceProcess() pouzivas i pro to, aby Tvuj program
nebyl ukoncen kdyz se uzivatel odhlasi. K tomu je treba zmenit borlandi
(pravdepodobne, protoze nepouzivam VCL nejsem si uplne jist) obsluhu pro
WM_ENDSESSION aby neukoncila program pokud se jedna o pouhe odhlaseni
usera - ale aby ukoncila program v pripade, ze system opravdu exituje.
Mozna, ze's tu obsluhu menil - ale nenapsal's to spravne nebo to maji
borlandi sami spatne...
Dalsi zpravou, kterou je treba spravne obslouzit je WM_QUERYENDSESSION...
viz: http://support.microsoft.com/support/kb/articles/Q125/7/14.asp
D. Toman
IB: RecordCount v IBDataSet
[*] Ota Maly <maly(zv)space(tec)cz> - 10.10.2000 10:14:35
Ahoj,
ptal jsem se nedavno, ale bez reakce, zkousim to tedy znovu.
Co vraci IBDataset.RecordCount?
IMHO to udava pocet jiz nactenych vet, nikoli vsech vet v tabulce.
Respektive jak tam dostat pocet vet jinak nez pomoci FetchAll?
FetchAll sice funguje dobre, ale asi to nebude uplne efektivni..:)
S pozdravem
Ota Maly
PaPouch elektronika
http://www.papouch.com
Jak programove zmenit ikonu
[*] brant(zv)dcomm(tec)cz - 10.10.2000 10:17:53
This message is in MIME format. Since your mail reader does not understand
this format, some or all of this message may not be legible.
Ahoj vsichni,
netusite nekdo nahodou, jakym zpusobem lze (programove samozrejme) zmenit
ikonu adresare, ktera se zobrazena v Pruzkumniku? Treba adresar Dokumenty
vypada jinak nez standardne, sdileny adresar vypada jinak, Recycled ma jinou
ikonu... Jak se to da udelat, nevite nekdo?
RNDr. Petr Brant [Brant(zv)dcomm(tec)cz]
D&COMM s.r.o
Korunova�n� 6
Praha 7
OT : Export sprav z Outlook Expes
[*] KINEKUS <kinekus(zv)nextra.sk> - 10.10.2000 10:56:49
Prepacte za OT.
Potrebujem exportovat spravy, ktore mi chodia z konferencie. Viete mi
poradit ako ?
Dakujem Fabik
DBaware ? data-aware
[*] Zbysek Hlinka <hlinka(zv)hlinka(tec)cz> - 10.10.2000 11:22:59
On 9 Nov 2000, at 18:36, Martin Kubecka wrote:
To je des, na tento subj. jsem odpovidal soucasne s jinou zpravou,
a rano kdyz jsem stahoval postu, mi prisla ta druha zprava kdezto
odpoved na tento subj. ne. Zvlastni...
> > A jak se tedy da napsat uzivatelsky pritulna aplikace nad SQL, bez
> > pouzivani techto komponent (jak se tu v konferenci radi)?
>
> Hodne blbe.
Proc blbe? Pokud vis, co delas, pak IMHO naopak lepe.
Zjednoduseny a schematicky priklad:
Edit.Text := RecSet.Field('jmeno').AsString;
Editace.ShowModal;
...
procedure TEditace.OkBtnClick...
begin
with StorProc do
begin
Param[1].AsString := Edit.Text;
...
if not ExecProc then // nebo try .. except
begin
ModalResult := 0;
raise Exception.Create(SNastalaChyba);
end;
end;
end;
> Ale z nazorem, ze se nedaji DB aware komponenty pouzivat
> nesouhlasim. Jen je potreba dodrzovat urcita pravidla. Zbysek to resi
> tak, ze DB komponenty nepouziva. My je pouzivame, ale pracujeme
> vicemene na off-line datech, da-li se to tak rict ;-).
Ano Zbysek to tak resi. :-) A to hlavne proto, ze pouziva pro pristup
k databazi svoje komponenty, ktere nemaji nic spolecneho s
TDataSet. Ale netvrdi, ze se nedaji pouzivat, ale ze jejich pouziti
spolu se SQL databazi (sic!) prinasi tolik starosti, ze je lepsi je
nepouzivat, anebo pouzivat spise jen na prohlizeni a pokud mozno
v nich needitovat, urcite ne na on-line datech.
S pozdravem
Zbysek Hlinka
Phones: 02/795 29 56; GSM: 0603 551 282
Krystofova 1016, 149 00 Praha 4
CZ
Doporu�en� zp�soby psan� program� Delphi
[*] Str�n�k Franti�ek - 10.10.2000 11:36:17
V�en� p��tel�,
neexistuje n�kde n�jak� doporu�en� ( a smyslupln�) zp�sob:
A. psan� zdrojov�ch program� pro Delphi
B. popis� datab�z�
(zvl�t� pro t�movou pr�ci)
D�kuji za radu
S pozdravem F. Str�n�k
ACCESS: pridani fieldu pomoci SQL
[*] Erik Salaj <winsoft(zv)napri.sk> - 10.10.2000 11:53:18
> Potrebuji pridat do tabulky v ACCESS pomoci SQL textovy field s parametry:
> - je nutno zadat: NE (parametr NULL/NOT NULL)
> - povolit nulovou delku: ANO (tady nevim jaky parametr)
>
> priklad:
> ALTER TABLE mytable ADD myfield CHAR(6) <tady nevim jaky parametr>
V helpe som taku moznost nenasiel. Je mozne, ze pomocou SQL to nepojde.
Skus pouzit ADOX pripadne DAO, kde je tych moznosti daleko viac.
Erik Salaj, WINSOFT
info(zv)winsoft.sk
DBaware ? data-aware
[*] Martin Kubecka <martin.kubecka(zv)amenit(tec)cz> - 10.10.2000 12:04:22
> Hi,
>
> Dovolim si oponovat tomu hodne blbe.
Urcite to bylo nadnesene (ode mne), ale pokud s tim clovek zacina, tak
poradne novi co a jak. S DB komponentami je to preci jen jednodussi ;-)
> V
> soucasnosti by me k pouzivani DB-Aware komponent premluvili snad jen
autori
> ExpressGridu, kdy jsem ziral co vsechno to umi a taky kolik to stoji (600
> USD).
Jojo, ten je fakt skvely doporucuju (a ne jen ten grid ;-). Mam takovy
nejasny dojem, ze u nas je prodava Petr Zahradnik clexpert(zv)clexpert(tec)cz.
Stoji to sice hromadu penez, ale momentalne nevim o lepsi investici pro DB
aplikace.
Mac
Pevna carka podruhe
[*] David Lebeda <david.lebeda(zv)comarr(tec)cz> - 10.10.2000 12:32:33
Ahoj,
zkousim to jeste jednou: nemate nekdo nejakou knihovnu nebo
cokoli jineho co se tyka vypoctu v pevne radove carce? Nebo
nejake namety, jak na to. Pozadavek je 7 nebo radeji i vice
desetinnych mist. Neresil jste to nekdo?
Dik,
David
Ukonceni programu - stale se neukoncuje
[*] Tomas Vladik <tom.vladik(zv)swadvice(tec)cz> - 10.10.2000 12:46:28
> > Mam ten pocit, ze v FormCreate nejde par veci udelat.
> > Napr tam nelze pouzit Close.
> >
Close sice nejde, ale jde postnout zpravu WM_CLOSE:
procedure TfrmPassword.FormCreate(Sender: TObject);
begin
CheckParadoxCzech;
{$IFNDEF DEBUGING}
if not LegalniKopie
then begin
PostMessage(Application.Handle, WM_CLOSE, 0, 0);
Exit;
end;
{$ENDIF}Prepsani pouzivane DLL
[*] Karel Kral <kralkonf(zv)purus(tec)cz> - 10.10.2000 13:08:25
Ale ta funguje bohuzel jenom na NT. Na W9X se musi pouzit ten zapis do
INI.
> brant(zv)dcomm(tec)cz wrote:
>
> Nahodou jsem narazil v MSDN na funkci MoveFileEx, ktera je schopna
> prepsat pouzivany soubor pri rebootu, to by se na tvuj problem mohlo
> hodit.
>
--
______________________________________________________
Karel Kral, informatik
Purus, s.r.o., Cezavy 627, 664 56 Blucina, CZ
Tel: 05/47235000, 0602/552432, Fax: 05/47231203
E-Mail: mailto:kral(zv)purus(tec)cz, WWW: http://www.purus(tec)cz
______________________________________________________
DBaware ? data-aware
[*] Jiri Kral <admin(zv)printo(tec)cz> - 10.10.2000 13:12:18
data-aware or not data-aware, that is a question..
Jak se da rozumne resit bez DA komponent aplikace, ktera ma data v
hierarchii master-detail. Napr. nejake pocitani cen vyrobku kde k
jednotlivym komponentam vyrobku mam prace a material. Pres 3 gridy je to raz
dva, ale muzou nastat nejake zadrhele. A psat to bez data gridu si neumim
vubec predstavit. Je nekde k nahlednuti nejaka ukazka podobneho
"neawaroveho" reseni master-detailu?
Ten Zbyskuv postup, tedy pres pom. okno na editaci by asi na toto
neuspel...strasne by to usery zdrzovalo.
Jirka
==========================================================
Bc. Jiri Kral
administrator IT
tiskarna Printo, spol. s r.o.
e-mail: admin(zv)printo(tec)cz
mobil e-mail: jirka.kral(zv)sms.paegas(tec)cz
ICQ# 15303940
PGP ID: 0x15AD9FB8 (najdete na www.pgp(tec)cz)
>>-----Original Message-----
>>From: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz]On Behalf Of
>>Ren� Otisk
>>Sent: Friday, November 10, 2000 5:54 AM
>>To: delphi-l(zv)fwd(tec)cz
>>Subject: Re: DBaware ? data-aware
>>
>>
>>Hi,
>>
>>Dovolim si oponovat tomu hodne blbe. V prvotni fazi je napsani aplikaci
>>trosku slozitejsi, ale vim presne co chci, co delam a jaky bude vysledek,
>>coz u DB-Aware komponent si vysledkem tak uplne jisty nejsem. Samozrejme
>>hodne zavisi na onech komponentach, ale u nonDB-aware je to taktez otazka
>>urcitych rutin. U prvni takhle psane aplikace je to hledani urciteho
>>optimalniho stavu, ale u ctvrte je to skoro jen Copy-Paste (nadnesene). V
>>soucasnosti by me k pouzivani DB-Aware komponent premluvili snad
>>jen autori
>>ExpressGridu, kdy jsem ziral co vsechno to umi a taky kolik to stoji (600
>>USD). Jinak se vsim ostatnim souhlasim. S blbyma komponentama to bude blba
>>aplikace a zakaznici si budou myslet, ze i autor je blby.
>>
>>Sroub
>>
>>
>>> ----- Original Message -----
>>> From: "Ing. Zdenek Havranek, HAF" <sea-cv(zv)volny(tec)cz>
>>>
>>>
>>> > A jak se tedy da napsat uzivatelsky pritulna aplikace nad SQL, bez
>>> > pouzivani techto komponent (jak se tu v konferenci radi)?
>>>
>>> Hodne blbe. Ale z nazorem, ze se nedaji DB aware komponenty pouzivat
>>> nesouhlasim. Jen je potreba dodrzovat urcita pravidla. Zbysek
>>to resi tak,
>>> ze DB komponenty nepouziva. My je pouzivame, ale pracujeme vicemene na
>>> off-line datech, da-li se to tak rict ;-).
>>>
>>> Dobre DB komponenty a hlavne dobre komponenty pro pristup bez BDE jsou
>>> zaklad.
>>>
>>> Mac
>>
>>
Potomek TWebRequest
[*] Raul Endymion <Raul.Endymion(zv)mail.infima(tec)cz> - 10.10.2000 13:21:58
Jak vytvorit potomka tridy TWebRequest, tento postup mi nefachal..
interface
type TMywebrequest = class(TWebRequest)
function GetKey (KeyName : String) : String;
end;
implementation
function TMyWebRequest.GetKey( KeyName : String) : String;
begin
for i := 0 to request.queryfields.count -1 do
result := copy (..... vykopirovani hodnoty promenne);
end;
Ovsem pokud ve standartni ISAPI dll prohodim twebrequest za
tmywebrequest vubec nic se nestane a dll nahlasi chybu.
Co s tim ? Je jeste par funkci, ktere bych rad dodelal do tohoto
stejne jako pote do twebresponse.
Raul mailto:Raul.Endymion(zv)mail.infima(tec)cz
Rotace bitmapy
[*] delphi konference <delphi(zv)energotek(tec)cz> - 10.10.2000 13:21:19
Napis si to v ASM
pro uplne zacatecniky jsem videl ucebnici na
http://www.ssesvdf(tec)cz/~papousek/
je to tam tusim i s prikladem na to co se ptas, takze je tam vlastne zaroven
reseni tveho problemu.
S pozdravem Petr Blau software developer
petrbl(zv)energotek(tec)cz
> Ahoj
> nevite jak by se dala pokud mozno co nejrychleji rotovat bitmapou
(presunem
> jednotlivych RGB pixelu bitmapy v pameti )?
> Daji se samozrejme pouzit goniometricke fce sin a cos ale to je dosti
pomale
> (jedine si hodnoty predvypocitat s urcitou presnosti a potom jen volat
pole
> ktere vrati sin/cos jeho indexu )
> predem diky
>
DBaware ? data-aware
[*] Petr Fejfar <development(zv)callnet(tec)cz> - 10.10.2000 13:23:17
Martin Kubecka <martin.kubecka(zv)amenit(tec)cz> wrote:
> Ale z nazorem, ze se nedaji DB aware komponenty
> pouzivat nesouhlasim. Jen je potreba dodrzovat > urcita pravidla. My je
pouzivame, ale pracujeme
> vicemene na off-line datech, da-li se to tak
> rict ;-).
a nemohl bys poslat nejakou ukazku, jak prechazite mezi on-line/off-line
rezimem?
Dik, pf
Rotace bitmapy
[*] Vaclav Krmela <krmela(zv)ustinadorlici(tec)cz> - 10.10.2000 13:24:12
From: "Sula Milos" <milos.sula(zv)oku-su(tec)cz>> Ahoj
> nevite jak by se dala pokud mozno co nejrychleji rotovat bitmapou
(presunem
> jednotlivych RGB pixelu bitmapy v pameti )?
> Daji se samozrejme pouzit goniometricke fce sin a cos ale to je dosti
pomale
> (jedine si hodnoty predvypocitat s urcitou presnosti a potom jen volat
pole
> ktere vrati sin/cos jeho indexu )
> predem diky
>
Na rotaci a i pripadnou deformaci bitmapy lze pouzit funkci PlgBlt.
viz Help. Bohuzel, tato funkce pracuje pouze v prostredi WinNT/2000.
Ve Win95/98 pouzit nelze, i kdyz prekladac ji vezme.
Vaclav Krmela
Prepsani pouzivane DLL
[*] Karel Cibulka <kcibulka(zv)seznam(tec)cz> - 10.10.2000 13:54:22
On ?t 9. listopad 2000 11:51, you wrote:
Ahoj,
problem s prepisovanim souboru, ktery se v systemu zrovna pouziva se musi
resit jinak pro system Win9x (to je pres ten WININIT.INI soubor) a pod
WinNT/2K se musi pouzit funkce MoveFileEx. Prikladam cast kodu z free
instalatoru InnoSetup (mimochodem je docela dobry a malinky a kompaktnejsi
nez InstallShield pro mensi projekty):
{** Vraci celou cestu k Windows
Vrati plnou cestu Windows adresare, ukoncenou znakem \ pouze tehdy, pokud se
jedna o root.
(zv)return cela cesta k Windows }
function getWinDir: String;
var
Buf: array[0..{Full_}MAX_PATH-1] of Char;
begin
GetWindowsDirectory(Buf, SizeOf(Buf));
Result:= StrPas(Buf);
end;
{** Zmeni velikost bufferu
Funkce zmeni velikost bufferu na novou hodnotu a vraci informaci o tom, zda
byla dostatecna.
(zv)param S buffer pro zmenu velikosti
(zv)param Res nova velikost bufferu
(zv)return True pokud puvodni velikost stacila jinak vraci Falce }
function adjustLength(var S: String; const Res: Integer): Boolean;
begin
Result:= Res < Length(S);
SetLength(S, Res);
end;
{** Vraci short-name prislusneho long-name souboru
Funkce vraci short-name souboru (pro DOS ve formatu 8.3), ktery byl puvodne
long-name.
(zv)param LongName dlouhe jmeno souboru
(zv)return kratke jmeno souboru }
function GetShortName(const LongName: String): String;
var
Res: DWORD;
begin
SetLength(Result, MAX_PATH);
repeat
Res:= GetShortPathName(PChar(LongName), PChar(Result), Length(Result));
if (Res = 0) then begin
Result:= LongName;
Break;
end;
until adjustLength(Result, Res);
end;
{** Provede zamenu souboru pri restartu
Tato procedura umoznuje prepisovat systemove soubory (pripadne soubory, ktere
nebylo mozne prepsat za behu) pri restartu systemu. Pracuje jak pod Win9x (s
pomoci wininit.ini souboru), tak pod WinNT/2K s pomoci funkce MoveFileEx.
(zv)param TempFile jmeno prechodneho souboru
(zv)param DestFile jmeno souboru, ktery bude prepsan prechodnym souborem }
procedure restartReplace(const TempFile, DestFile: String);
var
WinDir, WinInitFile, TempWinInitFile: String;
OldF, NewF: TextFile;
OldFOpened, NewFOpened: Boolean;
L, L2: String;
RenameSectionFound, WriteLastLine: Boolean;
NewDestFile: PChar;
begin
if (Win32Platform = VER_PLATFORM_WIN32_WINDOWS) then begin
{ Win9x: Because WININIT.INI allows multiple entries with the same name,
we must manually parse the file instead of using
WritePrivateProfileString }
WinDir:= GetWinDir;
WinInitFile:= WinDir + '\WININIT.INI';
OldFOpened:= False;
NewFOpened:= False;
try
try
if FileExists(WinInitFile) then begin
TempWinInitFile:= WinDir + '\wininit.tmp';
{ Flush Windows' cache for the file first }
WritePrivateProfileString(nil, nil, nil, PChar(WinInitFile));
AssignFile(OldF, WinInitFile);
FileMode:= fmOpenRead or fmShareDenyWrite; Reset(OldF);
OldFOpened:= True;
end
else
TempWinInitFile:= WinInitFile;
AssignFile(NewF, TempWinInitFile);
FileMode:= fmOpenWrite or fmShareExclusive; Rewrite(NewF);
NewFOpened:= True;
RenameSectionFound:= False;
WriteLastLine:= False;
if OldFOpened then
while not Eof(OldF) do begin
Readln(OldF, L);
WriteLastLine:= True;
L2:= Trim(L);
if (L2 <> '') and (L2[1] = '[') then begin
if CompareText(L, '[rename]') = 0 then
RenameSectionFound := True
else
if RenameSectionFound then
Break;
end;
Writeln(NewF, L);
WriteLastLine:= False;
end;
if not RenameSectionFound then
Writeln(NewF, '[rename]');
if DestFile <> '' then
L2:= GetShortName(DestFile)
else
L2:= 'NUL';
Writeln(NewF, L2 + '=' + GetShortName(TempFile));
if OldFOpened then begin
if WriteLastLine then
Writeln(NewF, L);
while not Eof(OldF) do begin
Readln(OldF, L);
Writeln(NewF, L);
end;
end;
finally
if NewFOpened then CloseFile(NewF);
if OldFOpened then CloseFile(OldF);
end;
except
if OldFOpened then DeleteFile(TempWinInitFile);
raise;
end;
if OldFOpened then begin
AssignFile(OldF, WinInitFile);
Erase(OldF);
AssignFile(OldF, TempWinInitFile);
Rename(OldF, WinInitFile);
end;
end
else begin
{ WinNT/2K: }
if DestFile <> '' then
NewDestFile:= PChar(DestFile)
else
NewDestFile:= nil;
MoveFileEx(PChar(TempFile), NewDestFile,
MOVEFILE_DELAY_UNTIL_REBOOT or MOVEFILE_REPLACE_EXISTING);
end;
end;
--
<br>
Cibulka Karel, mailto:kcibulka(zv)seznam(tec)cz, ICQ: 4111110
<br>Doporu�en� zp�soby psan� program� Delphi
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 10.10.2000 14:06:45
From: "Str�n�k Franti�ek" <FStranik(zv)cpoj(tec)cz>
> neexistuje n�kde n�jak� doporu�en� ( a smyslupln�) zp�sob:
> A. psan� zdrojov�ch program� pro Delphi
Ahoj,
existuje, v dokumentu Object Pascal Style Guide:
http://community.borland.com/soapbox/techvoyage/article/1,1795,10280,00.html
Petr Vones, amatersky programator
Minimalizace v D4 a v D5
[*] David Lebeda <david.lebeda(zv)comarr(tec)cz> - 10.10.2000 14:10:08
Ahoj,
ve sve aplikaci psane pod D4 mam form a na nem odchytavam
tlacitko minimalizace touto metodou:
procedure TRezGridForm.WMSysCommand(var Msg:
TWMSysCommand);
begin
if Msg.CmdType = SC_Minimize then
Application.Minimize
else
inherited;
end;
Na D4 to bez problemu funguje. Pokud ale tentyz zdrojak prelozim
v D5, tak se po kliknuti na tlacitko minimalizace nic nestane.
Uvedena procedura se provede, da se prokrokovat, pres radek
Application.Minimize to projde, ale nic se neprovede. Cim by to
mohlo byt?
Dik.
David
OT: Triger generuje NOT NULL polozku, ale nejde in
[*] Michal Tiller <Michal.Tiller(zv)oskarmobil(tec)cz> - 10.10.2000 14:18:28
This message is in MIME format. Since your mail reader does not understand
this format, some or all of this message may not be legible.
Mam tabulku, kde na zaklade jedne polozky po insertu nastavim v trigru dalsi
dve polozky, ktere zkopiruji z jine tabulky. Vsechny tri polozky jsou
primarnim klicem, tedy not null. Nemohu ale udelat insert, kde nevyplnim
vsechny tri polozky. Jak to udelat?
Dekuji,
<mailto:Michal.Tiller(zv)oskarmobil.Cz%20%20%20%20%20:o)>
Michal.Tiller(zv)oskarmobil.Cz :o)
RF Support Coordinator, OSKAR, RF - Engineering
+420 (02) 7117 1388, +420 (0608) 011 327<?xml:namespace prefix = o ns =
"urn:schemas-microsoft-com:office:office" />
Vyber podmnoziny riadkov
[*] Jan Grman <janog(zv)pluto.elf.stuba.sk> - 10.10.2000 14:31:26
Ahoj,
- mam select ktory vrati povedzme 2300 zaznamov (su nejak utriedene)
- chcem vybrat zaznamy od 2000 do 2020 (vseobecne X az X + 20, ano ide o
prezentaciu vysledku hladania na interente - ala altavista)
Otazka: ako to riesite prostriedkami SQL servera ?
potrebujem to vyriesit tak, aby uz SQL server vratil len 20 zaznamov !
nateraz to potrebujem pre MS SQL, ale budem to potrebovat aj pre INTERBASE a
ORACLE
vdaka za kazdu radu
Jan Grman
janog(zv)pluto.elf.stuba.sk
PS: Zatial ma napada len ulozna procedura a v nej kurzor !Applikace CGI a pristup k souboru, objektu apod.
[*] azeleny(zv)csas(tec)cz - 10.10.2000 14:31:15
DDV:
Nevim jak IIS(nepouzivam to...), ale predpokladam, ze to bude stejne jako u
standardnich web serveru. Standardne se spousti dalsi a dalsi procesy az do
nakonfigurovatelneho maxima -- tedy konkurenci pristup rozhodne pripada do
uvahy.
Coz takhle pouzit mutex pro pristup k tomu souboru:
1) Vytvorim mutex (pokud se to podari, tak hura, pokud se to nepodari uz jej
nekdo pouziva).
2) cekam do timeoutu a snazim se zamknout si mutex.
3) Mam zamceny mutex, pracuji se souborem.
4) Zavru soubor a uvolnim mutex.
Viz CreateMutex() nebo jak se to jmenuje.
Nebo se daji vyuzit semafory a WaitForSingleObject().
Snad to trochu pomuze jako nastrel.
a.
> -----Original Message-----
> From: Raul Endymion [mailto:Raul.Endymion(zv)infima(tec)cz]
> Sent: Friday, November 10, 2000 9:53 AM
> To: delphi-l(zv)fwd(tec)cz
> Subject: Applikace CGI a pristup k souboru, objektu apod.
>
>
> Mam problemek, pro jednoduchost naznacim na internetovem pocitadle
> pristupu.
>
> Dejme tomu ze existuje applikace CGI, ktera precte cislo ze souboru,
> zvedne o jednicku, zapise a pote vygeneruje jpg s timto cislem a
> odesle prohlizeci. Viz priklady ke knize Delphi 4. Nyni ovsem
> problemek, co kdyz bude tento script spusten na IIS 4 nebo IIS 5
> dvakrat ? Pokud otevrete soubor pro zapis dvakrat, obsah se smaze
> (viz nejake me predchozi testy), tzn prijdu o pocet pristupu. Neco
> podobneho se muze stat v pripade objektu a zapisu.
> Dejme tomu corba objekt (se sdilenym pristupem nebo nesdilenym ?) a
> funkci zapisnecoapaknecoproved;
> Nevim jak toto osetrit.
> Proto dotazy :
>
> 1) Spousti IIS scripty po sobe, nebo jich pusti vic ?
> 2) Pokud jich pousti vic, nebo treba ve vice threadech (v pripade
> ISAPI), jak zabranit tomu aby zapisovali dva scripy najednou ?
> 3) Obecne, jak zaridit neco jako serialize, semafory, ci podobne
> fronty. Vzdyt i zapsani klienta do fronty se muze stretnout.
>
> Raul mailto:Raul.Endymion(zv)ns1.infima(tec)cz
>
> Export sprav z Outlook Expes
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 10.10.2000 14:42:51
From: "KINEKUS" <kinekus(zv)nextra.sk>
> Potrebujem exportovat spravy, ktore mi chodia z konferencie. Viete mi
> poradit ako ?
Ahoj,
kdyz si ty zpravy oznacis, tak je pak muzes pretahnout do nejake slozky.
Petr Vones, amatersky programator
SQL server - Vas nazor
[*] Martin Kubecka <martin.kubecka(zv)amenit(tec)cz> - 10.10.2000 15:23:41
> A neni tam problem spis s cestou k iss?
Jo, to bude presnejsi. Vim ze mi to tusim zlobilo, kdyz jsem to nekam
presoupnul. Kazdopadne odkaz na .ISS fajlik s konfiguraci musi obsahovat
PLNOU cestu. Ja nemam MSDE z Office ale z VS 6.0 a tam to chodi korektne
(ackoliv si stejne upravuju to ISS, protoze jinak tam neni ceske trideni ;-)
Mac
> > > nepodarilo se mi nainstalovat MSSQL lokalne pod W2000prof
> > > z Office 2000premium, setup zkolabuje
> > > (Can't run 16-bit Windows program
> > > - One of the library needed to run l:\..\sqlstp.exe is damaged.
> > > Please reinstall this application.)
> >
> > Mam takovy pocit, ze tohle dela kdyz je to v nejakem blbem adresari.
Jinak
> > na Office 2000 je tusim pouze MSDE ne?
SQL server - Vas nazor
[*] Martin Kubecka <martin.kubecka(zv)amenit(tec)cz> - 10.10.2000 15:25:24
Jen bych doplnil, ze pro odstraneni tohoto problemku je mozne doinstalova MS
Loopback Adapter (neco jako virtualni sitovku) a pak to jde nainstalovat i
na masinu bez sitovky.
Mac
----- Original Message -----
From: "Kalivoda Jozef" <KaliJ(zv)spas.sk>> ja osobne pracujem na MSSQL verzie 6.5 a vissie a zatial som nikdy nemal
> problem s instalaciov .. dokonca ani na notebooku s win2k prof a
office...
> resp. mal som problem pri instalacii MSSQL 6.5 ale zistil som ze to ze mi
> padala istalacia suviselo zo sietovymi vecami.... totiz ked W2k nenajde
> pripojenie na siet tak nestaruje TCP/IP a to instalacii MSSQL 6.5 prekaza
> (nemoze si nakonfigurovat sietove veci a preto padne).. inak aj
vykonnostne
Ukladani nastaveni formularu
[*] CERMAK <CERMAK(zv)procom(tec)cz> - 10.10.2000 15:43:45
Ahoj vsichni
Mel bych nasledujici dotaz. V programu pouzivam formulare, na kterych je
kombinace panelu, splittru, gridu a dalsich podobnych komponent. Vznikla
potreba ukladat nektere vlastnosti, zvlaste rozmisteni panelu gridu a pod a
pri otevreni je znovu nacist. Problem je v tom ze se mi formular nekdy
zprehaze.
Pr.: mam formular na nem z prava panel zarovnany doprava, vedle nej DBGrid
zarovnany doprava a vedle nej splitter zarovnany doprava Uplne vlevo je
panel nastaveny alClient. Po nacteni ulozeneho nastaveni se mi vymeni pravy
panel a DBgrid.
Postup nacitani je takovy ze nejdrive obnovim vlastnosti formu a pak
rekurzivne prochazim seznam Controls. tj projdu komponenty na formu a kdyz
najdu panel ..., podivam se zda neni alClient a kdyz ne, nactu jeho rozmery
ze souboru, v kazdem pripade projdu jeho pole controls a stejnym zpusobem
hledam, zda v nem neni nejaka komponenta, ktera me zajima.
Nevite co mam delat, aby se formular objevil se stejnou "tvari", s jakou
jsem ho ulozil?
Zalezi to na poradi? Mam prenastavit urcitym zpusobem zarovnavani
"zajimavych" komponent? Muzu formular opravit? Obecne me zajima, podle ceho
postupovat.
Budu vdecny za kazdy napad nebo radu
Jaromir
Cermak
Start a konec MS SQL Serveru
[*] Petr Reichl <p.reichl(zv)gmc(tec)net> - 10.10.2000 16:23:46
Zdravim,
mam instalacni program a potrebuji z neho nejakym zpusobem ukoncit SQL
server (MSDE) a zase nastartovat. Je nutne, aby to fungovalo jak na Windows
NT tak na Windows 95.
Momentalne pouzivam nasledujici:
C:\MSSQL7\Binn\scm.exe -action 6
... toto ukonci SQL server, ale po dokonceni akce chce potvrzeni uzivatele.
Microsofti to maji ale bez toho potvrzeni. Nevite jak?
Petr Reichl autorun DLL
[*] Mirek <dmiroslav(zv)seznam(tec)cz> - 10.10.2000 16:34:46
Ahoj, chtel bych se zeptat, jestli jde - a jak - zavest DLL pri spusteni
Woken (jako driver).
S DLL nemam temer zadne zkusenosti.
diky Mirek Drancak
CGI skripty
[*] Mirek <dmiroslav(zv)seznam(tec)cz> - 10.10.2000 16:36:44
Ahoj,
chtel bych nekoho z vas poprosit, jestli by mi nemohl polopaticky vysvetlit,
jak napsat v D5 CGI-skript. Pripadne jeste odkazal ne nejakou dobrou
literaturu.
diky Mirek Drancak
IB: RecordCount v IBDataSet
[*] Radek KALA <Kala(zv)atlas(tec)cz> - 10.10.2000 16:57:20
Ale na SQL databazi on prece nikdo nevi kolik bude recordu, kdyz
si je nenacte vsechny. Z toho plyne ze nacist fsechny je jedina
moznost.
> Ahoj,
> ptal jsem se nedavno, ale bez reakce, zkousim to tedy znovu.
>
> Co vraci IBDataset.RecordCount?
> IMHO to udava pocet jiz nactenych vet, nikoli vsech vet v tabulce.
> Respektive jak tam dostat pocet vet jinak nez pomoci FetchAll?
> FetchAll sice funguje dobre, ale asi to nebude uplne efektivni..:)
>
> S pozdravem
> Ota Maly
>
> PaPouch elektronika
> http://www.papouch.com
>
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
SQL a DBTreeView - takovy SQL orisek
[*] Jiri Dvorak <Jiri_Dvorak(zv)gordic(tec)cz> - 10.10.2000 17:25:18
Neuvedl si jaky pouzivas SQL server.
Napriklad Oracle umi hierarchicky select.
Jirka Dvorak
xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx
> Ahoj,
>
> ukladam data (resp. chystam se k tomu ;-) do 'stromove' struktury s
vyuzitim
> principu, ktery pouzivaji DBTreeView komponenty, tzn. id radku a parent_id
> obsahujici id vlastnika:
>
> id (Guid)
> parent_id (Guid)
> name (Varchar)
>
> lze udelat nejaky SQL dotaz, kterym bych dostal vsechny parenty pro daneho
> childa ? Jak to nejak mazane vyresit, abych nemusel pouzivat kurzory a
> podobne neresti ;-) ???
>
> Mate nekdo nejaky napad?
>
> Dik
>
> Mac
DBaware ? data-aware
[*] Zbysek Hlinka <hlinka(zv)hlinka(tec)cz> - 10.10.2000 17:59:07
On 10 Nov 2000, at 13:12, Jiri Kral wrote:
> Jak se da rozumne resit bez DA komponent aplikace, ktera ma data v
> hierarchii master-detail. Napr. nejake pocitani cen vyrobku kde k
> jednotlivym komponentam vyrobku mam prace a material. Pres 3 gridy je
> to raz dva, ale muzou nastat nejake zadrhele. A psat to bez data gridu
> si neumim vubec predstavit. Je nekde k nahlednuti nejaka ukazka
> podobneho "neawaroveho" reseni master-detailu?
>
> Ten Zbyskuv postup, tedy pres pom. okno na editaci by asi na toto
> neuspel...strasne by to usery zdrzovalo.
Stale opakuji, ze db aware komponenty lze pouzit jeste tak pro
prohlizeni. Coz plne vyhovuje pro uvedeny pripad. Editaci bych v
tom vsak nedelal. Pro editaci nemusi byt ani pomocne okno,
editovani muze byt v temze okne (vejde-li se). I kdyz, zalezi na
tom, co je to za uzivatele a aplikaci, zda jsou uzivatele dostatecne
zdatni a zda aplikace bezi nad jednemi daty solove, pak se to
prekousnout da. :-)
S pozdravem
Zbysek Hlinka
Phones: 02/795 29 56; GSM: 0603 551 282
Krystofova 1016, 149 00 Praha 4
CZ
mwEdit a znak @
[*] Kalivoda Jozef <KaliJ(zv)spas.sk> - 10.10.2000 18:34:41
no tak tu je ten slubeny kod toho HighLihgteru pre sql6.5...
je tam aj zdrojak a compilovany kod (.pas,.dcu)
http://jokacomp.home.sk/mwsql65.zip
je tam este jeden drobny bug slova medzi "" alebo '' ak su vo viacerych
riadkoch HighLihgter sa aplikuje iba na prvy riadok v ktorom su...
este by som rad upozornil na niektore chyby ktore su v tom editore ...
editor nespravne zobrazuje tabelatory : ak je v kode #9 ta to povazuje len
za jeden znak z pohladu pozicie kurzoru (ked je #9 v riadku na 2 pozicii tak
kurzor je zobrazeny trabars na 3 pozicii zapisuje o o tab pozicie dalej...
vyzera to dost zabavne...)
dalej pri vyhladavani ak je niektore vyhladavane slovo priliz v lavo a
dalsie v pravo neposunie sa scrollbar tak aby to slovo bolo vydiet....
tiez vyhladavanie blbne v "select column" mode...
urcite je tam toho este viac...
preluskal som zatial poriadne len ten HighLihgter ale chystam sa poopravit
aj samotny editor... ked to bude dam vediet...
-----Original Message-----
From: Bardon [mailto:bardon(zv)akord-soft(tec)cz]
Sent: Thursday, November 09, 2000 4:04 PM
To: delphi-l(zv)fwd(tec)cz
Subject: mwEdit a znak (zv)
Kdyz dam do mwEditu znak (zv), tak se mi nekdy na konci radku zacnou
zobrazovat ruzne ctverecky a jine nesmysly. Nevite prosim nekdo jak to
odstranit?
D3
TmwCustomEdit
HighLihgter=wmSybSQLSyn
Priklad
do Editoru napisu
DECLARE (zv)Prom
SELECT (zv)Prom = 'cosi'
na konci prvniho radku se mi zobrazi jakesi ctverecky, pri psani druheho
radku se po napsani znaku (zv) objevi take, ale po napsani znaku = zmizi a uz
tam nejsou
7
OT: MSVBVM60.DLL
[*] Hurricane <hurricane(zv)quick(tec)cz> - 10.10.2000 18:47:40
Zdravim
Omlouvam se za OT, ale mam jeden prgram a ten po me chce uvedenou knihovnu.
Rekl bych, ze tu bude mit co do cineni s Vizuzlal Basicem od M$, ale mozna i
ne. Nevite nekdo, co to je a nemate ji nahodou?
Diky
Hurricane
N�hrada standartn�ch dialog� openfile a
[*] delphi <korindelphi(zv)atlas(tec)cz> - 10.10.2000 19:40:11
Toto chci pou��t v jedn� internetov� kav�rn�... maj� tam sv�j shell, kter�
po��t�, jak dlouho je �lov�k na netu.... probl�m je, �e ten sheel mus�
spou�t�t Internet Explorer.... jdou tam zak�zat opensave dialogy, ale kdy�
si �lov�k nech� t�eba zobrazit zdrojov� k�d, tak tm m� dal�� opensave
dialogy... kdy� kv�li tomu �lov�k vyma�e notepad.exe, tak nast�v� dal��
probl�m - d� se tam spustit winamp.... a tm je dal�� opendialog... vy�e�ili
jsme to tak, �e jsme pomoc� tweakui vypli ostatn� jednotky krom� temp�...
heh.... ale pokud je �lov�k chytr�, tak zkus� do opendialogu napsat t�eba c:
a je tam i kdy� je to zak�zan�. Je to pot�eba jeliko� jsou i takov�, co se
tam r�di hrabou.... tak�e je pot�eba bu� p�epsat ty dialogy, nebo zak�zat
spou�t�n� ur�it�ch program�. N�kdo mi tu napsal jak na to, za to mu hodn�
d�kuji, ale lidi nejsou blb� a p�ejmenuj� si program na stejn� jm�no jak� m�
n�jak� povolen� progr�mek. A zase obejdou programy... Nejlep�� by podle mne
bylo p�epsat opensave dialogy, proto�e se jim takhle d� zak�zat v�echno.
D�ky za pomoc... Ivan �varc
----- Original Message -----
From: L. ZITA <konference(zv)sales(tec)cz>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Friday, November 10, 2000 4:07 AM
Subject: RE: N�hrada standartn�ch dialog� openfile a savefile
>
> >Behalf Of azeleny(zv)csas(tec)cz
> >Tohle se resi nastaveni polices ve WinNT (zda to jde i ve Wir9x to
nevim),
> viz Run Only Allowed Apllications, nebo tak
> >neco.
>
> >a.
>
> Ahoj.
>
> U W9x lze pomoci policies take ledacos zakazat, ale to muze zabranit spise
> nechtenemu spusteni programu.
> Velmi snadno se to da obejit diky tomu, ze jakykoliv povoleny SW
pouzivajici
> std OpenDialogy umozni
> uzivateli bez problemu kopirovat,mazat a prejmenovavat... a to kdekoliv.
No
> a pak uz je vse jednoduche.
> (smazat *.pwl,user.dat, prejmenovat nejaky sys soubor a vynutit si tim
> nouzovy rezim...)
> a cela ochrana je v cudu. (Nebo staci bootnout z diskety).
> Sam jsem byl pred podobny problem postaven a nezbylo mi nez vymontovat
> disketove jednotky a
> misto exploreru spustit vlastni shell (v SYSTEM.INI klic shell=....), Z
neho
> pak poustet jen povolene
> aplikace, ktere nemaji opendialogy.
> Nastesti to diky skladbe pouzivaneho SW slo...
>
> Ludek
>
>
>
> -----Original Message-----
> From: delphi [mailto:korindelphi(zv)atlas(tec)cz]
> Sent: Wednesday, November 08, 2000 9:58 PM
> To: delphi-l(zv)fwd(tec)cz
> Subject: N�hrada standartn�ch dialog� openfile a savefile
>
>
> Dobr� den,
> m�m jeden probl�m.. pot�eboval bych nahradit standartn� dialogy openfile a
> savefile vlastn�mi dialogy. Potrebuji je prepsat, protoze se pomoci nich
> daji spoustet programy ( pop-up/spustit ). Nevim jakse daji ve windows
> nahradit tyto dialogy, potrebuji aby se nahradili nekde v pameti, aby to
> platilo pro vsechny programy co je pouzivaji.
> Diky za pomoc.
> Ivan �varc
> ---
> Odchoz� zpr�va neobsahuje viry.
> Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
> Verze: 6.0.145 / Virov� b�ze: 69 - datum vyd�n�: 4.5.2000
>Doporu�en� zp�soby psan� program� Delp
[*] Petr Fejfar <development(zv)callnet(tec)cz> - 10.10.2000 19:49:34
Str�n�k Franti�ek <FStranik(zv)cpoj(tec)cz> wrote:
> neexistuje n�kde n�jak� doporu�en�
> ( a smyslupln�) zp�sob:
> A. psan� zdrojov�ch program� pro Delphi
Jeden je napr. tady:
http://www.ocdelphi.org/standard.htm
jeste nekde existuje nejmene jeden, ale uz si nevzpominam kde.
Bye, pf
DBaware ? data-aware
[*] Martin Kubecka <martin.kubecka(zv)amenit(tec)cz> - 10.10.2000 20:13:33
> > Ale z nazorem, ze se nedaji DB aware komponenty
> > pouzivat nesouhlasim. Jen je potreba dodrzovat > urcita pravidla. My je
> pouzivame, ale pracujeme
> > vicemene na off-line datech, da-li se to tak
> > rict ;-).
>
> a nemohl bys poslat nejakou ukazku, jak prechazite mezi on-line/off-line
> rezimem?
Mohl bych, ale to bys musel mit vsechny sady komponent co k tomu pouzivame
;-). Princip je spise ten, ze data se pres SQL natahnou do lokalniho
datasetu (coz delaji v podstate vsechny komponenty). Dejme tomu ze pro
editaci pouzivam Zbyskem nenavideny DBGrid ;-) Pokud tam nasekam nejake
zmeny a pokusim se prejit na dalsi radek tak se mi to bude snazit samo
ulozit (u jednoducheho ciselniku je mi to jedno, at se to ulozi samo, stejne
to vola nejaky UPDATE s parametry - lze dosledovat napr. v Profileru z MS
SQL, takze presne vim, co mi to do databaze posila). Pokud je ten zdroj pro
data slozitejsi a ja na OnUpdate potrebuju delat neco jineho
(nestadnardniho) tak si v potrebne udalosti napisu vlastni ulozeni (a treba
s pouzitim transakci). No a kdyz je 'nejhur', tak pouziju primo prikazy ADO
a DB komponenty pouzivam v podstate pouze na prohlizeni dat.
On vubec pojem on-line a off-line data je asi dosti sporny, protoze u SQL
databazi jsou vlastne vsechna data off-line (tzn. jakmile si je stahnu ze
serveru SQL prikazem, tak jsou uz vicemene stara). Proto jeste v nekterych
pripadech pred editem dotahujeme aktualni (editovany) radek tak, aby byla
editace provadena opravdu na nejnovejsich moznych datech.
Zkratka pokud si dokazu ridit udalosti OnPost, BeforePost atd. sam v
Datasetu (rozumej Adonis), tak nevidim jediny duvod, proc nepouzivat DB
aware komponenty.
V podstate je to jako pouzivani BDE v rezimu cached updates ;-)
Mac
DBaware ? data-aware
[*] Martin Kubecka <martin.kubecka(zv)amenit(tec)cz> - 10.10.2000 20:33:40
----- Original Message -----
From: "Zbysek Hlinka" <hlinka(zv)hlinka(tec)cz>> Stale opakuji, ze db aware komponenty lze pouzit jeste tak pro
> prohlizeni. Coz plne vyhovuje pro uvedeny pripad. Editaci bych v
> tom vsak nedelal.
A ja zase rikam, ze to jde i pro editaci, pokud mam moznost kontroly toho
jak se to do te db posle ;-)
Mac
N�hrada standartn�ch dialog� openfile a
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 10.10.2000 21:38:15
From: "delphi" <korindelphi(zv)atlas(tec)cz>
> spou�t�n� ur�it�ch program�. N�kdo mi tu napsal jak na to, za to mu hodn�
> d�kuji, ale lidi nejsou blb� a p�ejmenuj� si program na stejn� jm�no jak� m�
> n�jak� povolen� progr�mek. A zase obejdou programy... Nejlep�� by podle mne
Ahoj,
prejmenovani by melo jit zachytit pomoci implementace ICopyHook, priklad
najdes v Demos\Activex\Shellext\CopyHook.dpr
Dale muzes pred spustenim zkontrolovat version info aplikace (Notepadu apod.)
zdali opravdu souhlasi. Samozrejme ze i toto lze obejit, ale je to uz prece
jen slozitejsi.
Petr Vones, amatersky programator
IB: RecordCount v IBDataSet
[*] Delphi <delphi(zv)aitix(tec)cz> - 10.10.2000 21:45:29
> Ale na SQL databazi on prece nikdo nevi kolik bude recordu, kdyz
> si je nenacte vsechny. Z toho plyne ze nacist fsechny je jedina
> moznost.
Jeste je moznost select count(*) pro stejnou where klauzuli jako je u toho
DataSetu.
U uzivatelem definovanych dotazu je skok na posledni zaznam (tj. nacteni
vsech) zaznamu
cestou do pekel.
Leos
TlistView a Caption [2]
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 10.10.2000 22:15:28
From: "Ji�� Vojtek" <j_vojtek(zv)del(tec)cz>
> Jak donutit ListView, aby mi vypsal Caption sloupce tucne.
Ahoj,
procedure TForm1.ListView1CustomDrawItem(Sender: TCustomListView;
Item: TListItem; State: TCustomDrawState; var DefaultDraw: Boolean);
begin
Sender.Canvas.Font.Style := [fsbold];
end;
procedure TForm1.ListView1CustomDrawSubItem(Sender: TCustomListView;
Item: TListItem; SubItem: Integer; State: TCustomDrawState;
var DefaultDraw: Boolean);
begin
Sender.Canvas.Font.Style := [];
end;
Petr Vones, amatersky programator
Chyba v Delphi?
[*] Petr Fischer <fifa(zv)praguesoft(tec)cz> - 10.10.2000 22:16:28
Zdravim,
mam predka formulare, na kterem je PageControl a jeden TabSheet, na
kterem je polozeno ListView. Ve formulari zdedenem od tohoto pridam
druhy TabSheet a na nej polozim take ListView. Kdyz ale do ListView
na duhem TabSheetu pridam sloupce (Columns), po znovuotereni projektu
se ty sloupce z druheho ListView ZTRATI!!! (staci dat Alt+F12 -> v
textove podobe dfm souboru tam Column JE -> a znovu Alt+F12 -> Column
zmizi). Tohle je trosku na masli a vubec nevim cim to je? Stalo se
jiz nekomu neco podobneho?
Diky, Petr Fischer
Win2000, Delphi 5 SP1
Rotace bitmapy
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 10.10.2000 22:19:37
From: "Sula Milos" <milos.sula(zv)oku-su(tec)cz>
> nevite jak by se dala pokud mozno co nejrychleji rotovat bitmapou (presunem
> jednotlivych RGB pixelu bitmapy v pameti )?
Ahoj,
http://www.efg2.com/Lab/Library/Delphi/Graphics/ImageProcessing.htm#BitmapRota
tion
Petr Vones, amatersky programator
DBaware ? data-aware
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 10.10.2000 22:28:32
From: "Martin Kubecka" <martin.kubecka(zv)amenit(tec)cz>
> A ja zase rikam, ze to jde i pro editaci, pokud mam moznost kontroly toho
> jak se to do te db posle ;-)
Napriklad pouzitim cached updates s TClientDataSet:
http://community.borland.com/article/0,1410,20567,00.html
Petr Vones, amatersky programator
Start a konec MS SQL Serveru
[*] Erik Salaj <winsoft(zv)napri.sk> - 10.10.2000 23:54:32
> mam instalacni program a potrebuji z neho nejakym zpusobem ukoncit SQL
> server (MSDE) a zase nastartovat. Je nutne, aby to fungovalo jak na
Windows
> NT tak na Windows 95.
>
> Momentalne pouzivam nasledujici:
>
> C:\MSSQL7\Binn\scm.exe -action 6
>
> ... toto ukonci SQL server, ale po dokonceni akce chce potvrzeni
uzivatele.
> Microsofti to maji ale bez toho potvrzeni. Nevite jak?
Napriklad pomocou SQLDMO:
----
with CoSQLServer.Create do
begin
Connect('', '', '');
Shutdown(True);
while Status <> SQLDMOSvc_Stopped do
Sleep(100);
ShowMessage('Stopped');
Start(False, '', '', '');
while Status <> SQLDMOSvc_Running do
Sleep(100);
ShowMessage('Started');
end;
----
Typovu kniznicu SQLDMO si bud v Delphi importuj,
alebo pouzi napr. z Adonisu.
Erik Salaj, WINSOFT
info(zv)winsoft.sk
shozeni modemu
[*] David Papou�ek <papouscidelphi(zv)volny(tec)cz> - 11.10.2000 00:24:16
Ahoj vsichni,
muze mi prosim nekdo poradit zda-li je mozne v Delphi 4 vyrobit udelatko pro
shozeni modemu? Melo by to fungovat pod NT 4.0 a jedna se o to, ze pokud
uzivatel site se pres proxy server konektuje na internet je vse v poradku az
do doby nez se odpoji. Potom se modem nezavesi (i kdyz uzivatel nic nepozna)
a ja uz nevim co s tim. Vsechno je nastaveno jak ma byt a modem na serveru
zustane viset na lince. V Delphi nejsem moc zbehly takze pokud by to slo
nejak jednoduse vyresit byl bych rad, jinak budu muset hledat jine reseni.
Vsem predem dekuji za kazdou radu.
David Papousek
CGI skripty
[*] tomsir1.edu(zv)mail.cez(tec)cz - 11.10.2000 07:21:08
mrkni se na http://www.rtfm.be/fpiette tam neco malo
o cgi je, jinak jsem na
netu nasel spoustu textu, muzu t
i neco poslat
Radegast
"Mirek" <dmiroslav(zv)s
eznam(tec)cz> on 10.11.2000 16:36:44
Odpov�zte pros�m -
delphi-l(zv)fwd(tec)cz
Komu: delphi-l(zv)fwd(tec)cz
Kopie:
(Na v�dom�: Tomsik Radek/4130P/EDU/CEZ)
P�edm�t:
CGI skripty
Ahoj,
chtel bych nekoho z vas poprosit, jestli by mi nemohl polopaticky vysvetlit,
jak napsat v D5 CGI-skript. Pripadne jeste odkazal ne nejakou dobrou
literaturu.
diky Mirek Drancak
shozeni modemu
[*] Delphi <delphi(zv)aitix(tec)cz> - 11.10.2000 07:52:40
Ahoj,
> do doby nez se odpoji. Potom se modem nezavesi (i kdyz uzivatel nic
nepozna)
> a ja uz nevim co s tim. Vsechno je nastaveno jak ma byt a modem na serveru
> zustane viset na lince. V Delphi nejsem moc zbehly takze pokud by to slo
Vetsina proxy serveru ma nastaveni na shozeni modemu po urcite dobe
necinnosti.
Problem je, ze si uzivatel treba necha spustenou postu, ta se vzdy po peti
minutach
dotaze na stav schranky a mas z telefonu "pevnou linku".
Je treba tedy nejprve odhadnout, proc modem zustane viset. Pak naucit
uzivatele nenechavat
spustene utility s opakovanym pristupem na Inet a nastavit spravne proxy.
Myslim, ze by u tech lepsi proxy slo i nastavit, ktere sluzby (Tcp,Udp)
budou pri vyhodnocovani "zachovani" linky ignorovany.
Jinak co se tyce primarniho dotazu - on nebude problem v NT4 nahodit a
shodit modem, jenze v okamziku, kdy jej nejaka aplikace pouziva, tak je
modem (port) uzamcen a nejde na nej pristupovat.
Leos
shozeni modemu
[*] Petr Fejfar <development(zv)callnet(tec)cz> - 11.10.2000 07:57:42
David Papou�ek <papouscidelphi(zv)volny(tec)cz> wrote:
> konektuje na internet je vse v poradku
> az do doby nez se odpoji. Potom se modem
> nezavesi (i kdyz uzivatel nic nepozna)
> a ja uz nevim co s tim.
> Vsechno je nastaveno jak ma byt
> a modem na serveru zustane viset na lince.
Pokud tomu spravne rozumim, tak zustane viset samotny modem, prestoze SW,
ktery s nim komunikoval, seriovy port zavre.
Nevim, co mas za modem, ale vetsina modemu ma vlastnost "Drop DTR to
hangup", ktera se u vetsiny modemu nastavuje prikazem &D2: "Normal DTR
operations. The terminal or computer muste send a DTR signal for the modem
to accept commands. Dropping DTR terminates a call".
Aby to fungovalo, musi byt nastaven u serioveho portu HW handshake a
standardni kabel mezi pocitacem a modemem s odpovidajicimi signaly podle
V.24.
Snadno to muzes vyzkouset napr. z HyperTerminalu, kdyz pomoci ATD<cislo>
navazes spojeni a pak exitnes. Modem musi zavesit.
Bye, pf
P.S. Tuto vlastnost nemivaji GSM telefony, protoze vetsina z nich HW
handshake vubec nepodporuje a casto jsou z uspornych duvodu vynechany
odpovidajici vodice v kabelu mezi pocitacem a telefonem.DBaware ? data-aware
[*] Zbysek Hlinka <hlinka(zv)hlinka(tec)cz> - 11.10.2000 10:08:12
On 10 Nov 2000, at 20:13, Martin Kubecka wrote:
> Mohl bych, ale to bys musel mit vsechny sady komponent co k tomu
> pouzivame ;-). Princip je spise ten, ze data se pres SQL natahnou do
> lokalniho datasetu (coz delaji v podstate vsechny komponenty). Dejme
> tomu ze pro editaci pouzivam Zbyskem nenavideny DBGrid ;-)
Ale, ale! :-) Ja netvrdim, ze nenavidim DBGrid, ale pouze to, ze ma
radu much a ze bych si netroufal pouzit ho pro editovani v
programu, se kterym budou pracovat BFU a jeste ke vsemu na siti.
> On vubec pojem on-line a off-line data je asi dosti sporny, protoze u
> SQL databazi jsou vlastne vsechna data off-line (tzn. jakmile si je
> stahnu ze serveru SQL prikazem, tak jsou uz vicemene stara).
Za on-line povazujme takovy stav, kdy je vyzadovano spojeni s
databazi, a kdy kursory k datum jsou vyzadovany od databaze. Ze
se jedna vlastne o historicka data, je vedlejsi, to plyne z povahy
prace SQL databaze, ktera z bezpecnostnich dovodu nepovoluje
primy pristup k ulozenym datum.
Za off-line povazujme takovy stav, kdy si dataset umi udrzet data (a
pracovat s nimi) i v pripade, ze spojeni s databazi (ci prislusnymi
kursory) skonci.
S pozdravem
Zbysek Hlinka
Phones: 02/795 29 56; GSM: 0603 551 282
Krystofova 1016, 149 00 Praha 4
CZ
Systray icon
[*] Jakub M�lek <malek(zv)ssakhk(tec)cz> - 11.10.2000 10:09:17
Zdravim,
jak mam vytvorit takove to male tlacitko vedle minimalizace, maximilizace a tlacitka zavrit na formu, ktere schodi aplikaci do systraye?
Za vsechny rady moc diky.
Phrex
Vyber podmnoziny riadkov
[*] Erik Salaj <winsoft(zv)napri.sk> - 11.10.2000 11:52:36
> - mam select ktory vrati povedzme 2300 zaznamov (su nejak utriedene)
> - chcem vybrat zaznamy od 2000 do 2020 (vseobecne X az X + 20, ano ide o
> prezentaciu vysledku hladania na interente - ala altavista)
>
> Otazka: ako to riesite prostriedkami SQL servera ?
> potrebujem to vyriesit tak, aby uz SQL server vratil len 20 zaznamov !
> nateraz to potrebujem pre MS SQL, ale budem to potrebovat aj pre INTERBASE
a
> ORACLE
ADO Recordset obsahuje properties PageSize, PageCount a AbsolutePage,
ktore podla dokumentaciu se uzitocne presne v pripade, ktory popisujes
(ak ide o web-server aplikaciu).
Erik Salaj, WINSOFT
info(zv)winsoft.sk
Pevna carka podruhe
[*] delphi <korindelphi(zv)atlas(tec)cz> - 11.10.2000 11:57:00
Slo by to udelat v assembleru... mozn� na to je nejak� knihovnicka, ale j� o
ni nev�m... kdyby jsi to delal v asm tak bude dost obt�zn� - mus�s k tomu
vyrobit z�kladn� aritmetick� operace.... obt�zn� na tom bude, aby byly
rychl�.....
Ivan Svarc
----- Original Message -----
From: David Lebeda <david.lebeda(zv)comarr(tec)cz>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Friday, November 10, 2000 12:32 PM
Subject: Pevna carka podruhe
> Ahoj,
>
> zkousim to jeste jednou: nemate nekdo nejakou knihovnu nebo
> cokoli jineho co se tyka vypoctu v pevne radove carce? Nebo
> nejake namety, jak na to. Pozadavek je 7 nebo radeji i vice
> desetinnych mist. Neresil jste to nekdo?
>
> Dik,
>
> David
Start a konec MS SQL Serveru
[*] posledni, Lec <martin.kubecka(zv)amenit(tec)cz> - 11.10.2000 14:06:30
No SQL-DMO je fajn, ale znamena v podstate nutnost ji nainstalovat, coz zase
taky neni uplne nejlepsi.
Nemas Eriku prosim te nekde nejaky postup instalace SQL-DMO ?
Mac
----- Original Message -----
From: "Erik Salaj" <winsoft(zv)napri.sk>
> > mam instalacni program a potrebuji z neho nejakym zpusobem ukoncit SQL
> > server (MSDE) a zase nastartovat. Je nutne, aby to fungovalo jak na
> Windows
> > NT tak na Windows 95.
>
> Napriklad pomocou SQLDMO:
SQL a DBTreeView - takovy SQL orisek
[*] Martin Kubecka <martin.kubecka(zv)amenit(tec)cz> - 11.10.2000 14:14:22
Jo jasne, sorry. MS SQL 2000. Jeste jsem se nedostal projet vsechny rady ;-)
Dam vedet jak dopadnu ;-)
Mac
----- Original Message -----
From: "Jiri Dvorak" <Jiri_Dvorak(zv)gordic(tec)cz>> Neuvedl si jaky pouzivas SQL server.
> Napriklad Oracle umi hierarchicky select.
> Jirka Dvorak
OT: Outlook Ex a Win ME
[*] Vasek Navrat <engine(zv)ropacek(tec)cz> - 11.10.2000 15:55:01
Zdravim!
Mam nove nainstalovane Windows ME a v jejich instalaci je uz obsazen program
Outlook Express. Objevuje se mi takovy problem, ze kdyz spustim Outlook, tak
na chvilku "zahrabe" harddisk, pak se dlouho nic nedeje (jako by byl pocitac
v klidu), po nejake dobe se zobrazi Splash screen od Outlooku, pak zase
dlouho nic a az po nejake dobe se konecne zobrazi program. Nevite nekdo, co
s tim je? Tohle se mi nikdy na Win 98 nestavalo...
BUDU VDECNY ZA KAZDOU RADU, JAK TOTO RESIT...
Diky...
______________________________________________
Vasek Navrat - lead programmer of NewReality engine
DarkLogic
NewReality web: www.newreality(tec)cz
NewReality e-mail: newreality(zv)newreality(tec)cz
private web: www.darklogic(tec)cz
private e-mail: darklogic(zv)darklogic(tec)cz
mobil: 0603 944 964
ICQ: 74161244
______________________________________________
Start a konec MS SQL Serveru
[*] Erik Salaj <winsoft(zv)napri.sk> - 11.10.2000 17:35:20
> No SQL-DMO je fajn, ale znamena v podstate nutnost ji nainstalovat, coz
zase
> taky neni uplne nejlepsi.
>
> Nemas Eriku prosim te nekde nejaky postup instalace SQL-DMO ?
SQL-DMO ma by malo byt vsade tam, kde je SQL 7 alebo MSDE uz nainstalovane.
Erik
Systemove datum ?
[*] Ber�nek Pavel <Pavel.0(zv)worldonline(tec)cz> - 11.10.2000 18:48:25
Jak jsem hledal, tak jsem hledal, ale \Demos\Cpl\Date jsem vubec nenasel. Co
tam je ?
-----P�vodn� zpr�va-----
Od: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz]za u�ivatele
Petr Vones
Odesl�no: 8. listopadu 2000 21:32
Komu: delphi-l(zv)fwd(tec)cz
P�edm�t: Re: Systemove datum ?
From: "Ber�nek Pavel" <Pavel.0(zv)worldonline(tec)cz>
> Jsem programator zacatecnik a mam problem: potrebuji nastavit systemove
> datum. To se mi pres funkci Setsystemtime podari, ale prehodi se mi pritom
i
> cas a ten touto funkci nemuzu upravit, jelikoz mi porad nastavuje (UTC)
cas.
Ahoj,
Podivej se do \Demos\Cpl\Date
Petr Vones, amatersky programator
Vyber podmnoziny riadkov
[*] Delphi <delphi(zv)aitix(tec)cz> - 11.10.2000 19:22:18
> > potrebujem to vyriesit tak, aby uz SQL server vratil len 20 zaznamov !
> > nateraz to potrebujem pre MS SQL, ale budem to potrebovat aj pre
INTERBASE
U Interbase bych to resil stored procedurou.
Coz sice stejne vytahne spoustu vet, ale aspon odesle klientovi jen tech
dvacet.
Viz. http://www.mers.com/IB_0104.HTML
Nejsem si jist, zda nejaky SQL server primo podporuje to, co pises.
Nektere servery umi vratit prvnich X vet.
Leos
Systemove datum ?
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 11.10.2000 20:49:11
From: "Ber�nek Pavel" <Pavel.0(zv)worldonline(tec)cz>
> Jak jsem hledal, tak jsem hledal, ale \Demos\Cpl\Date jsem vubec nenasel. Co
> tam je ?
Ahoj,
procedure TDTConfig.DTConfigActivate(Sender: TObject; Data: Integer);
var
SysTime: TSystemTime;
DateTime: TDateTime;
begin
with TfrmDateTime.Create(Application) do
begin
if ShowModal = mrOK then
begin
DateTime := Now;
ReplaceDate(DateTime, Calendar.CalendarDate);
DateTimeToSystemTime(DateTime, SysTime);
SetLocalTime(SysTime);
end;
Free;
end;
end;
Petr Vones, amatersky programator
IB: RecordCount v IBDataSet
[*] Ota Maly <maly(zv)space(tec)cz> - 11.10.2000 21:14:39
Ahoj,
to je sice pravda, ale muj puvodni problem (ktery jsem mozna zapomnel zminit
:-), byl problem s DBComboBoxem (nebo DBLookupComboBoxem, ted si nejsem
jist). Pokud totiz explicitne nezavolam FetchAll, tak se nekorektne
rozbaluje roleta, zobrazi se jeden radek, i kdyz mam definovano 7 a v DB je
take vic polozek. Nahlednutim do zdroju DBComboBoxu jsem zjistil, ze to
zjistuje pres RecordCount.
Proto ten dotaz.
V tuto chvili to v podstate povazuju za chybu DBComboBoxu.
Respektive ty komponenty na Data Controls opravdu asi prezivaji z dob
souborovych databazi..:-)
S pozdravem
Ota Maly
PaPouch elektronika
http://www.papouch.com
> -----Original Message-----
> From: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz]On
> Behalf Of Delphi
> Sent: Friday, November 10, 2000 9:45 PM
> To: delphi-l(zv)fwd(tec)cz
> Subject: Re: IB: RecordCount v IBDataSet
>
>
> > Ale na SQL databazi on prece nikdo nevi kolik bude recordu, kdyz
> > si je nenacte vsechny. Z toho plyne ze nacist fsechny je jedina
> > moznost.
>
> Jeste je moznost select count(*) pro stejnou where klauzuli jako je u toho
> DataSetu.
> U uzivatelem definovanych dotazu je skok na posledni zaznam (tj. nacteni
> vsech) zaznamu
> cestou do pekel.
>
> Leos
>AsyncFree
[*] Josef Koke� <kokes(zv)fsid.cvut(tec)cz> - 12.10.2000 08:59:37
Ahoj Delfini,
prosim, poradte. V Delphi5 pod Win98 pouzivam komponentu vaComm z AsyncFree.
Otviram s ni COM2. Problem je v tom, ze nahodne a bez zjevne priciny se
obcas, tak zhruba po 3-4 spustenich, ten COM zakousne a hlasi "Project
raised exception class EVaCommError with message 'Cannot open device COM2'.
Process stopped.". Pak uz s nim nic nehne.
Jednou se to po opetovnem spusteni samo spravilo, ale ve zbyvajicich 999
pripadech jsem musel resetovat. Coz je jasna cesta do Bohnic....
Za kazdy napad dekuje
Kokes
AsyncFree
[*] Josef Koke� <kokes(zv)fsid.cvut(tec)cz> - 12.10.2000 09:18:54
Omlouvam se autorum AsyncFree i obecenstvu. Trochu se mi to popletlo.
Komponenta vaComm samozrejme NENI z AsyncFree, nybrz z Async32 od Varian. Z
toho je videt, ze na ty Bohnice uz jsem ted...
Kokes
AsyncFree
[*] Josef Koke� <kokes(zv)fsid.cvut(tec)cz> - 12.10.2000 12:31:32
Ahoj vsichni,
tak jsem odinstaloval a zahodil vsechno Async32 od Varian,
peclive jsem nainstaloval AsyncFree ....
... a dela to uplne to same. To znamena, ze po nekolika spustenich
si to (nahodne) postavi hlavu, da hlasku "Project raised exception
class EAfComPortCoreError with message 'Cannot open device COM2' "
a vic s tim nehnu. Nekdy to namisto toho "jen" zakousne mys,
kterou mam na COM1.
Prosim, moudre hlavy, poradte.... Dik.
Kokes
Fce FileOpen
[*] Petr Ma��k <rtepema(zv)mbox.vol(tec)cz> - 12.10.2000 13:05:29
Zdravim vsechny Delfiny!
Mozna je to vseobecne znamo, ale dnes jsem n�hodou narazil na uskali funkce
FileOpen(const FileName: string; Mode: Integer): Integer. Ve jmenu souboru
nemohou byt ceske znaky (D3std, W98SE, at zije lokalizace Windows!). Pokud
tam jsou, funkce vraci -1 i pro existujici soubor, ktery lze pomoci
AssignFile a Reset normalne otevrit.
Petr Ma��k
rtepema(zv)mbox.vol(tec)cz
BDE a Inno Setup
[*] Heinisch Jiri <deis(zv)deis(tec)cz> - 12.10.2000 13:25:27
>Jak pomoci Inno Setupu docilim toho, aby pri instalaci
>BDE nebyl uzivatel "obtezovan" dialogem pro vyber adresare.
Ahoj
myslim ze na to nic v soucane dobe nic neni pokud neudelas vlastni instalaci
BDE vcetne registrace knihoven
Jiri Heinisch
AsyncFree
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 12.10.2000 14:54:25
From: "Josef Koke�" <kokes(zv)fsid.cvut(tec)cz>
> tak jsem odinstaloval a zahodil vsechno Async32 od Varian,
> peclive jsem nainstaloval AsyncFree ....
> ... a dela to uplne to same. To znamena, ze po nekolika spustenich
> si to (nahodne) postavi hlavu, da hlasku "Project raised exception
> class EAfComPortCoreError with message 'Cannot open device COM2' "
> a vic s tim nehnu. Nekdy to namisto toho "jen" zakousne mys,
> kterou mam na COM1.
Ahoj,
to vypada spis na problem v HW pocitace. Nepouzivas nejake dalsi karty na
rozsireni poctu COMu ?
Petr Vones, amatersky programator
AsyncFree
[*] Josef Koke� <kokes(zv)fsid.cvut(tec)cz> - 12.10.2000 17:51:47
Diky za nazor, zitra to zkusim na jinem pocitaci
a budeme uvidet. (Zadne rozsirujici karty ani nic
podobneho nepouzivam.)
J. Kokes
----- Original Message -----
From: Petr Vones <pvones(zv)mbox.vol(tec)cz>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Sunday, November 12, 2000 2:54 PM
Subject: Re: AsyncFree
> Ahoj,
>
> to vypada spis na problem v HW pocitace. Nepouzivas nejake dalsi karty na
> rozsireni poctu COMu ?
>
> Petr Vones, amatersky programator
>
SQL a DBTreeView - takovy SQL orisek
[*] Martin Kubecka <martin.kubecka(zv)amenit(tec)cz> - 12.10.2000 19:31:44
To by mi zobrazilo pouze toho korenoveho rodice, potrebuju vsechny nadrizene
prvky :-(
Mac
----- Original Message -----
From: "Milan Tome�" <Milan.Tomes(zv)haida(tec)cz>> A co treba toto:
>
> select distinct parent_id from ________________
> where
> (Name = '')
SQL a DBTreeView - takovy SQL orisek
[*] Martin Kubecka <martin.kubecka(zv)amenit(tec)cz> - 12.10.2000 19:34:01
Toz to by aj slo, akorat bych to potreboval zobrazit pouze pro jednoho
podrizeneho. Aby mi to vypsalo vsechny nadrizene (parenty) ale jen pro jednu
konretni vetev.
Mac
----- Original Message -----
From: "Ren� Otisk" <otisk(zv)misel(tec)cz>> Pres join na sebe sama.
>
> Pisu to ted z hlavy, delal jsem to pro hierarchickou strukturu
zamestnancu.
> Kdyz tak jsem schopen to doma nekde vystrachat
>
> SELECT A.EID, A.JMENO, B.EID, B.JMENO FROM
> EMPLOYEE A
> LEFT JOIN EMPLOYEE B ON A.NADRIZENY = B.EID
>
> Sroub
>
> > ukladam data (resp. chystam se k tomu ;-) do 'stromove' struktury s
> vyuzitim
> > principu, ktery pouzivaji DBTreeView komponenty, tzn. id radku a
parent_id
> > obsahujici id vlastnika:
> >
> > id (Guid)
> > parent_id (Guid)
> > name (Varchar)
> >
> > lze udelat nejaky SQL dotaz, kterym bych dostal vsechny parenty pro
daneho
> > childa ? Jak to nejak mazane vyresit, abych nemusel pouzivat kurzory a
> > podobne neresti ;-) ???
SQL a DBTreeView - takovy SQL orisek
[*] Martin Kubecka <martin.kubecka(zv)amenit(tec)cz> - 12.10.2000 19:42:48
Jo o necem takovem jsem taky uvazoval, pripisovat pri vytvareni childu do
nejakeho textoveho pole informace z parenta - napr. vkladat tam ID parenta +
oddelovat to carkou. Potom by se ten text u kazdeho childu dal jednoduse
pouzit jako mnozina pro Where. Ale protoze typ ID polozek je GUID a
struktura bude docela rozvrstvena, tak by to zabiralo mozna zbytecne moc
mista, takze se mi do toho moc nechce.
Ted zjistuju, ze vlastne budu taky potrebovat zobrazit i vsechny childy
(podrizene) nejlepe jeste do urcite urovne, hmmm...
Mac
----- Original Message -----
From: "Igor Vodi�ka" <vodicka(zv)sagit(tec)cz>> Zdravim!
> Ja pokud potrebuji ukladat data do databaze organizovane do stromove
> struktury, tak pouzivam nasledujici dat. strukturu:
>
> Text_Node Pozice_v_tree Znak
>
> Node1 0 Node001
> Node11 1 Node001Child01
> Node111 2 Node001Child01Child01
> Node112 2 Node001Child01Child02
> Node12 1 Node001Child02
> Node2 0 Node002
> Node21 1 Node002Child01
> Node22 1 Node002Child02
> Node3 0 Node003
> Node4 0 Node004
>
> Polozka Znak je dulezita jak pro spravne serazen� stromu (pri jeho
nacitani
> do TreeView) tak pro pripadne SQL dotazy. Struktura polozky Znak umoznuje
> pro dane node najit vsechny childs a naopak vsechny parent. Tento zpusob
> pouzivam k ukladan� textu knizek (knihy jsou podle obsahu stromove cleneny
> do casti, kapitol, podkapitol a ...). Zobrazeni casti nebo kapitoly resim
> SQL dotazem:
>
> select text from Kniha
> where znak="Node001" or Znak LIKE "Node001(%)"
>
> V mnozine vybranych zaznamu pak postupne "sectu" text a mam cely text
> zvolene kapitoly. Potrebu zjistit vsechny parenty jsem zatim nemel, ale
> urcite to pujde podobnym zpusobem pomoci polozky Znak.
>Start a konec MS SQL Serveru
[*] Martin Kubecka <martin.kubecka(zv)amenit(tec)cz> - 12.10.2000 19:51:39
No jo, ale ja potrebuju napr. delat Backup a spoustet ho z klientu, kde to
standardne nainstalovane neni...
Mac
----- Original Message -----
From: "Erik Salaj" <winsoft(zv)napri.sk>> > No SQL-DMO je fajn, ale znamena v podstate nutnost ji nainstalovat, coz
> zase
> > taky neni uplne nejlepsi.
> >
> > Nemas Eriku prosim te nekde nejaky postup instalace SQL-DMO ?
>
> SQL-DMO ma by malo byt vsade tam, kde je SQL 7 alebo MSDE uz
nainstalovane.
>
> Erik
DBaware ? data-aware
[*] Martin Kubecka <martin.kubecka(zv)amenit(tec)cz> - 12.10.2000 19:57:28
----- Original Message -----
From: "Zbysek Hlinka" <hlinka(zv)hlinka(tec)cz>
> :-) Pokud mas na mysli napriklad takovou funkcnost, ze
> komponenta si pripoji dataset, sosne data, a pak dokaze pracovat i
> pri odpojenem datasetu a vysledek umi vratit do parametru ulozene
> procedury (v tebou zvolenem datovem typu), kterou ji urcis (ale jejiz
> exec volas sam pod svou kontrolou), pak souhlasim. Coz vsak o
> komponentach v zalozce Data Controls nelze rict ani omylem.
Jojo, presne takovou funkcnost mam na mysli, tady nelze nez souhlasit. Ale
podle me hlavni je dobry a fungujici Dataset, komponenty typu DBEdit a
DBGrid na toto vliv nemaji ne?
Mac
DBaware ? data-aware
[*] Martin Kubecka <martin.kubecka(zv)amenit(tec)cz> - 12.10.2000 20:02:03
----- Original Message -----
From: "Zbysek Hlinka" <hlinka(zv)hlinka(tec)cz>> > tomu ze pro editaci pouzivam Zbyskem nenavideny DBGrid ;-)
>
> Ale, ale! :-) Ja netvrdim, ze nenavidim DBGrid, ale pouze to, ze ma
> radu much a ze bych si netroufal pouzit ho pro editovani v
> programu, se kterym budou pracovat BFU a jeste ke vsemu na siti.
;-))) Trosku te skadlim, vzdyt me znas ;-)))
> > On vubec pojem on-line a off-line data je asi dosti sporny, protoze u
> Za on-line povazujme takovy stav, kdy je vyzadovano spojeni s
> databazi, a kdy kursory k datum jsou vyzadovany od databaze. Ze
> se jedna vlastne o historicka data, je vedlejsi, to plyne z povahy
> prace SQL databaze, ktera z bezpecnostnich dovodu nepovoluje
> primy pristup k ulozenym datum.
Souhlas, tohle je asi nejlepsi definice.
> Za off-line povazujme takovy stav, kdy si dataset umi udrzet data (a
> pracovat s nimi) i v pripade, ze spojeni s databazi (ci prislusnymi
> kursory) skonci.
Otazka je, aby to spojeni umel zase navazat, vyresit pripadne konflikty a
data ulozit na server. Tohle by mel snad dobre resit TClientDataSet, jak
vzpominal nas amatersky programator ;-). Budu na nej muset mrknout. Popr.
jine vicevrstve technologie. Dalo by se rict, ze ty se Zbysku vice blizis k
trivrstve architekture a my spise (zatim) setrvavame na dvouvrstve.
Odmyslime li si recordset v ADO a dataset v Delphi ;-)))))
Mac
MSVBVM60.DLL
[*] Miroslav Novosad <mirnov(zv)atlas(tec)cz> - 12.10.2000 21:21:17
Ahoj,
predstavuje se to jako "Visual Basic Virtual Machine"
(u me: verze 6.00.8495 -> 1.384 MB)
Nevim ale s cim se nainstalovalo. Tipuju IE.
Miroslav Novosad
mirnov(zv)atlas(tec)cz
----- Original Message -----
From: "Hurricane" <hurricane(zv)quick(tec)cz>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Friday, November 10, 2000 6:47 PM
Subject: OT: MSVBVM60.DLL
> Zdravim
>
> Omlouvam se za OT, ale mam jeden prgram a ten po me chce uvedenou
knihovnu.
> Rekl bych, ze tu bude mit co do cineni s Vizuzlal Basicem od M$, ale
mozna i
> ne. Nevite nekdo, co to je a nemate ji nahodou?
>
> Diky
> Hurricane
OpenDialogX.FileName property
[*] Petr Ha�lar <rincewind(zv)volny(tec)cz> - 12.10.2000 22:32:12
Ahoj,
mam takovy problem : pomoci OpenDialogu vyberu soubor a jeho jmeno
pridam do ListBoxu ( pro kontrolu ) a soucasne ulozim take do konfig.
souboru aplikace. Chci, aby se pri pristim spusteni programu a/nebo vyvolani
dane udalosti otevrel soubor nebo spustil program jehoz jmeno bylo predtim
zapsano do konfiguracniho souboru. Ale - jsou tu 2 problemy ...
1) procedure OpenDialog1OnClose.....
var s: string;
......
s:=OpenDialog1.FileName ... => do <s> se mi nactou paznaky
( rozumej -
nechci to spustit hned -> musim si to tedy nekam ulozit v prehledne forme
pro pozdejsi pouziti ) a konecne...
2) ... nevim jak to vlastne mam spustit :-). Pres ShellExecute to
nefunguje.
Dik za kazdou radu.
S pozdravem
Petr Ha�lar
rincewind(zv)volny(tec)cz
------------------------------------------------------------------
Staticke premenne v C++
[*] Lubo Fule <fule(zv)sct.sk> - 12.10.2000 23:02:40
Je to mierne OT, ale zatial sa mi nepodarilo najst presnu odpoved...
Ako je to v DLL s premennymi, ktore su vo vnutri funkcie definovane ako
"static"?
Konkretne ma zaujima, ci taketo premenne zdielaju pamat aj v pripade, ze je
dana funcia volana z dvoch threadov v jednej aplikacii (viem, ze pri volani
z roznych aplikacii pamat zdielana nie je).
L.
ODBCe - oprava
[*] Lubo Fule <fule(zv)sct.sk> - 12.10.2000 23:10:40
Tym co pouzivaju ODBCe odporucam stiahnut si novu verziu
http://www.sct.sk/~fule/ODBCe/ODBCe.exe.
Nasiel som chybu v mapovani parametrov na stlpce v pripade pouzitia
Master-Detail (property MasterQuery) a pouzitia samostanych TODBCQuery na
editovanie datasetu (property QueryUpdate, QueryDelete, QueryInsert). V
novej verzii by to malo byt OK.
L.
AsyncFree
[*] Zdenek Janish <medusa(zv)brajan(tec)cz> - 12.10.2000 23:54:59
Je pravda, ze u teto komponenty jsem narazil na jediny problemek, a to
kdyz jsem propojil na tom samem portu pin 2 a 3... tedy PC vysilalo a
zaroven prijmalo, tak to nekdy ( po ruzne dobe, a prenesenem mnozstvi
dat) nahlasilo vyjmku, uz se nepamatuji co to bylo, ale jinak jsem s
komponentou NAPROSTO SPOKOJEN... Pri komunikaci s libovolnym zarizemim
a to i pri fulduplexnim provozu se chova korektne a bezproblemu...
Dekuji neprimo touto cestou autorum...
S pozdravem
Zdenek
----- Original Message -----
From: "Josef Koke�" <kokes(zv)fsid.cvut(tec)cz>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Sunday, November 12, 2000 5:51 PM
Subject: Re: AsyncFree
> Diky za nazor, zitra to zkusim na jinem pocitaci
> a budeme uvidet. (Zadne rozsirujici karty ani nic
> podobneho nepouzivam.)
>
> J. Kokes
>
> ----- Original Message -----
> From: Petr Vones <pvones(zv)mbox.vol(tec)cz>
> To: <delphi-l(zv)fwd(tec)cz>
> Sent: Sunday, November 12, 2000 2:54 PM
> Subject: Re: AsyncFree
>
>
> > Ahoj,
> >
> > to vypada spis na problem v HW pocitace. Nepouzivas nejake dalsi
karty na
> > rozsireni poctu COMu ?
> >
> > Petr Vones, amatersky programator
> >
>
>
Triger generuje NOT NULL polozku, ale nejde insert
[*] Pavol Stolc <pstolc(zv)sc.sknet.sk> - 13.10.2000 00:07:54
Ahoj,
neviem pre aku db a s akymi komponentami to pouzivas, takze asi to nebude ono:
- nepouzi pri inserte not null polia doplnovane triggerom
Pavol Stolc
pstolc(zv)sc.sknet.sk
----- Original Message -----
From: Michal Tiller
To: Delphi Forum (E-mail)
Sent: Friday, November 10, 2000 2:18 PM
Subject: OT: Triger generuje NOT NULL polozku, ale nejde insert bez teto polozky
Mam tabulku, kde na zaklade jedne polozky po insertu nastavim v trigru dalsi dve polozky, ktere zkopiruji z jine tabulky. Vsechny tri polozky jsou primarnim klicem, tedy not null. Nemohu ale udelat insert, kde nevyplnim vsechny tri polozky. Jak to udelat20
Dekuji,
Michal.Tiller(zv)oskarmobil.Cz :o)
RF Support Coordinator, OSKAR, RF - Engineering
+420 (02) 7117 1388, +420 (0608) 011 327
autorun DLL
[*] Pavol Stolc <pstolc(zv)sc.sknet.sk> - 13.10.2000 00:15:05
Ahoj,
skus to pomocou rundll[32] mydll.dll,procname [param[ param]]
Pavol Stolc
pstolc(zv)sc.sknet.sk
----- Original Message -----
From: Mirek <dmiroslav(zv)seznam(tec)cz>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Friday, November 10, 2000 4:34 PM
Subject: autorun DLL
> Ahoj, chtel bych se zeptat, jestli jde - a jak - zavest DLL pri spusteni
> Woken (jako driver).
> S DLL nemam temer zadne zkusenosti.
>
> diky Mirek Drancak
Jak programove zmenit ikonu
[*] Hurricane <hurricane(zv)quick(tec)cz> - 13.10.2000 00:53:42
Zdravim
To se uklada do registru (neikamnujte me) a k identifikaci slouzi
neviditelne soubory. Vem slozku Dokumenty a pod DOSem ji nekam zkopiruj.
Objevis tam soubor, ve kterem je nazev klice v registru a par dalsich veci.
U kose je to ale IMHO udelany uplne jinak. Pokud se ti podari prokousat
strukturou registru (je to dost rozsahly), tak yby to melo jit. Drzim palce.
Jo a jinak, ma to jistou analogii s "vlastnim nastavenim teto slozky", taky
se vytvari podobny soubor.
Hurricane
----- Original Message -----
From: <brant(zv)dcomm(tec)cz>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Friday, November 10, 2000 10:17 AM
Subject: Jak programove zmenit ikonu
Ahoj vsichni,
netusite nekdo nahodou, jakym zpusobem lze (programove samozrejme) zmenit
ikonu adresare, ktera se zobrazena v Pruzkumniku? Treba adresar Dokumenty
vypada jinak nez standardne, sdileny adresar vypada jinak, Recycled ma jinou
ikonu... Jak se to da udelat, nevite nekdo?
RNDr. Petr Brant [Brant(zv)dcomm(tec)cz]
D&COMM s.r.o
Korunova�n� 6
Praha 7
DBaware ? data-aware
[*] Jiri Fait <fait(zv)jakl(tec)cz> - 13.10.2000 06:49:45
No ale ADO prece umi pracovat s klientskym kurzorem, coz jsou vlastne
off-line data. Nebo se mylim?
Jiri Fait
[mailto:fait(zv)jakl(tec)cz]
[mailto:ftsoft(zv)iol(tec)cz]
Jo, a ta kukacka pri pokusu o vykukani mych let ZDECHLA starim (37).
Jiri Fait
[mailto:fait(zv)jakl(tec)cz]
[mailto:ftsoft(zv)iol(tec)cz]
> -----Original Message-----
> From: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz]On
> Behalf Of Zbysek Hlinka
> Sent: Saturday, November 11, 2000 10:08 AM
> To: delphi-l(zv)fwd(tec)cz
> Subject: Re: DBaware ? data-aware
>
>
> On 10 Nov 2000, at 20:33, Martin Kubecka wrote:
>
> > > Stale opakuji, ze db aware komponenty lze pouzit jeste tak pro
> > > prohlizeni. Coz plne vyhovuje pro uvedeny pripad. Editaci
> bych v tom
> > > vsak nedelal.
> >
> > A ja zase rikam, ze to jde i pro editaci, pokud mam moznost kontroly
> > toho jak se to do te db posle ;-)
>
> :-) Pokud mas na mysli napriklad takovou funkcnost, ze
> komponenta si pripoji dataset, sosne data, a pak dokaze pracovat i
> pri odpojenem datasetu a vysledek umi vratit do parametru ulozene
> procedury (v tebou zvolenem datovem typu), kterou ji urcis (ale jejiz
> exec volas sam pod svou kontrolou), pak souhlasim. Coz vsak o
> komponentach v zalozce Data Controls nelze rict ani omylem.
>
>
> S pozdravem
>
> Zbysek Hlinka
>
> Phones: 02/795 29 56; GSM: 0603 551 282
> Krystofova 1016, 149 00 Praha 4
> CZ
> ---
> Poichozi zprava neobsahuje viry.
> Zkontrolovano antivirovym systemem AVG (http://www.grisoft(tec)cz).
> Verze: 6.0.198 / Virova baze: 95 - datum vydani: 4.10.2000
>
---
Odchozi zprava neobsahuje viry.
Zkontrolovano antivirovym systemem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.198 / Virova baze: 95 - datum vydani: 4.10.2000
DBaware ? data-aware
[*] Ren� Otisk - 13.10.2000 07:01:33
Hi,
Spatne jsem se vyjadril. Pro prohlizeni dat samozrejme pouzivam Grid nebo
data nacitam do TreeView, ale edituji vyhradne pres non_db_aware komponenty
a stopro varuji pred editaci dat primo v gridu...
Sroub
data-aware or not data-aware, that is a question..
Jak se da rozumne resit bez DA komponent aplikace, ktera ma data v
hierarchii master-detail. Napr. nejake pocitani cen vyrobku kde k
jednotlivym komponentam vyrobku mam prace a material. Pres 3 gridy je to raz
dva, ale muzou nastat nejake zadrhele. A psat to bez data gridu si neumim
vubec predstavit. Je nekde k nahlednuti nejaka ukazka podobneho
"neawaroveho" reseni master-detailu?
Ten Zbyskuv postup, tedy pres pom. okno na editaci by asi na toto
neuspel...strasne by to usery zdrzovalo.
Jirka
==========================================================
Bc. Jiri Kral
administrator IT
tiskarna Printo, spol. s r.o.
e-mail: admin(zv)printo(tec)cz
mobil e-mail: jirka.kral(zv)sms.paegas(tec)cz
ICQ# 15303940
PGP ID: 0x15AD9FB8 (najdete na www.pgp(tec)cz)
>>-----Original Message-----
>>From: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz]On Behalf Of
>>Ren� Otisk
>>Sent: Friday, November 10, 2000 5:54 AM
>>To: delphi-l(zv)fwd(tec)cz
>>Subject: Re: DBaware ? data-aware
>>
>>
>>Hi,
>>
>>Dovolim si oponovat tomu hodne blbe. V prvotni fazi je napsani aplikaci
>>trosku slozitejsi, ale vim presne co chci, co delam a jaky bude vysledek,
>>coz u DB-Aware komponent si vysledkem tak uplne jisty nejsem. Samozrejme
>>hodne zavisi na onech komponentach, ale u nonDB-aware je to taktez otazka
>>urcitych rutin. U prvni takhle psane aplikace je to hledani urciteho
>>optimalniho stavu, ale u ctvrte je to skoro jen Copy-Paste (nadnesene). V
>>soucasnosti by me k pouzivani DB-Aware komponent premluvili snad
>>jen autori
>>ExpressGridu, kdy jsem ziral co vsechno to umi a taky kolik to stoji (600
>>USD). Jinak se vsim ostatnim souhlasim. S blbyma komponentama to bude blba
>>aplikace a zakaznici si budou myslet, ze i autor je blby.
>>
>>Sroub
>>
>>
>>> ----- Original Message -----
>>> From: "Ing. Zdenek Havranek, HAF" <sea-cv(zv)volny(tec)cz>
>>>
>>>
>>> > A jak se tedy da napsat uzivatelsky pritulna aplikace nad SQL, bez
>>> > pouzivani techto komponent (jak se tu v konferenci radi)?
>>>
>>> Hodne blbe. Ale z nazorem, ze se nedaji DB aware komponenty pouzivat
>>> nesouhlasim. Jen je potreba dodrzovat urcita pravidla. Zbysek
>>to resi tak,
>>> ze DB komponenty nepouziva. My je pouzivame, ale pracujeme vicemene na
>>> off-line datech, da-li se to tak rict ;-).
>>>
>>> Dobre DB komponenty a hlavne dobre komponenty pro pristup bez BDE jsou
>>> zaklad.
>>>
>>> Mac
>>
>>
Vyber podmnoziny riadkov
[*] Ren� Otisk - 13.10.2000 07:04:34
Hi
U MS SQL 7 je to:
TOP n [PERCENT]
Specifies that only the first n rows are to be output from the query result
set. If PERCENT is also specified, only the first n percent of the rows are
output from the result set. When specified with PERCENT, n must be an
integer between 0 and 100.
If the query includes an ORDER BY clause, the first n rows (or n percent of
rows) ordered by the ORDER BY clause are output. If the query has no ORDER
BY clause, the order of the rows is arbitrary.
Droub
> Ahoj,
>
> - mam select ktory vrati povedzme 2300 zaznamov (su nejak utriedene)
> - chcem vybrat zaznamy od 2000 do 2020 (vseobecne X az X + 20, ano ide o
> prezentaciu vysledku hladania na interente - ala altavista)
>
> Otazka: ako to riesite prostriedkami SQL servera ?
> potrebujem to vyriesit tak, aby uz SQL server vratil len 20 zaznamov !
> nateraz to potrebujem pre MS SQL, ale budem to potrebovat aj pre INTERBASE
a
> ORACLE
>
> vdaka za kazdu radu
>
> Jan Grman
> janog(zv)pluto.elf.stuba.sk
>
> PS: Zatial ma napada len ulozna procedura a v nej kurzor !N�hrada standartn�ch dialog� openfile a
[*] Ren� Otisk - 13.10.2000 07:10:58
Nebylo by lepsi zacit od hlavy, aby tu mys nevideli? Pripadne bez hlavy se
mys spatne hleda...
Sroub
Ja bych jim usekal ruky, at nemuzou na mys ;-)
Mac
> Nejlep�� by podle mne
> bylo p�epsat opensave dialogy, proto�e se jim takhle d� zak�zat v�echno.
shozeni modemu
[*] Ren� Otisk - 13.10.2000 07:14:14
Nekdy dokonce se shodi, i kdyz nechces. Treba upgrade na RAS verze 2 od
Mycrosoftu. Tam si jej musis upravit v registrech sam...
Sroub
> Ahoj,
>
> > do doby nez se odpoji. Potom se modem nezavesi (i kdyz uzivatel nic
> nepozna)
> > a ja uz nevim co s tim. Vsechno je nastaveno jak ma byt a modem na
serveru
> > zustane viset na lince. V Delphi nejsem moc zbehly takze pokud by to slo
>
> Vetsina proxy serveru ma nastaveni na shozeni modemu po urcite dobe
> necinnosti.
> Problem je, ze si uzivatel treba necha spustenou postu, ta se vzdy po peti
> minutach
> dotaze na stav schranky a mas z telefonu "pevnou linku".
> Je treba tedy nejprve odhadnout, proc modem zustane viset. Pak naucit
> uzivatele nenechavat
> spustene utility s opakovanym pristupem na Inet a nastavit spravne proxy.
> Myslim, ze by u tech lepsi proxy slo i nastavit, ktere sluzby (Tcp,Udp)
> budou pri vyhodnocovani "zachovani" linky ignorovany.
>
> Jinak co se tyce primarniho dotazu - on nebude problem v NT4 nahodit a
> shodit modem, jenze v okamziku, kdy jej nejaka aplikace pouziva, tak je
> modem (port) uzamcen a nejde na nej pristupovat.
>
> Leos
TlistView a Caption [2]
[*] Ji�� Vojtek - 13.10.2000 07:26:19
Diky za pokus, ale trosku jsme si nerozumneli. Ja nepotrebuju vypisovat
tucne Item, ale Caption celeho sloupce (u DBgrid je to Title) a v tom je ten
problem.
Mam neprijemny pocit ze to asi nepujde. Nejhorsi je, ze nemuzu vypisovat
tucne vsechny,
ale jenom jeden z nekolika. Presto mockrat diky.:-)
Paklize mate nekdo zkusenost poslete treba i negativni pobidku, at se v tom
dal
nehrabu.
Diky Jiri Vojtek
> -----Original Message-----
> From: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz]On Behalf Of
> Petr Vones
> Sent: Friday, November 10, 2000 10:15 PM
> To: delphi-l(zv)fwd(tec)cz
> Subject: Re: TlistView a Caption [2]
>
> From: "Ji�� Vojtek" <j_vojtek(zv)del(tec)cz>
> > Jak donutit ListView, aby mi vypsal Caption sloupce tucne.
>
> Ahoj,
>
> procedure TForm1.ListView1CustomDrawItem(Sender: TCustomListView;
> Item: TListItem; State: TCustomDrawState; var DefaultDraw: Boolean);
> begin
> Sender.Canvas.Font.Style := [fsbold];
> end;
>
> procedure TForm1.ListView1CustomDrawSubItem(Sender: TCustomListView;
> Item: TListItem; SubItem: Integer; State: TCustomDrawState;
> var DefaultDraw: Boolean);
> begin
> Sender.Canvas.Font.Style := [];
> end;
>
> Petr Vones, amatersky programator
>OT: Triger generuje NOT NULL polozku, ale nejde in
[*] David Lebeda <david.lebeda(zv)comarr(tec)cz> - 13.10.2000 07:31:32
> Mam tabulku, kde na zaklade jedne polozky po insertu nastavim v trigru
> dalsi dve polozky, ktere zkopiruji z jine tabulky. Vsechny tri polozky
> jsou primarnim klicem, tedy not null. Nemohu ale udelat insert, kde
> nevyplnim vsechny tri polozky. Jak to udelat? Dekuji,
Na tohle se asi bez znalosti par podrobnosti neda rozumne
odpovedet. Na jake to je databazi?
V IB6 by asi bylo potreba, aby ten trigger byl before insert.
Mimochodem - "kdo" a jak ti vynada za insert, kde neco nevyplnis?
A jak ho delas?
David
vystupni parametry u StoredProc
[*] mbartone(zv)Synthesia(tec)cz - 13.10.2000 07:45:37
Ahoj,
D3 C/S, Oracle 8.04 , BDE 5.1 zkouseno i s D5 C/S
Procedura v Oracle ma 2 vstupni parametry number(9) a 9 vystupnich
varchar2(254)
Pri definici parametru v DataModulu mi nahlasi Delhi - chyba cteni na
adrese ....
Pokud vystupni parametry v Oracle snizim na 5 tak se to chova normalne.
Nevite v cem je problem, nebo jak to resit ?
Budu potrebovat i procedury s 18 vystupnimi parametry.
Milan
TWebBrowser a Findtext
[*] Ing. Csaba Kissi <ckissi(zv)email(tec)cz> - 13.10.2000 07:54:50
Ahoj,
Vie mi niekto poradit ako implementovat funkciu findtext pre komponentu Twebbrowser.
Skusal som to podla helpu ale nejak mi to nefunguje. Zaujimali by ma aj ine
ine funkcie.
EMAIL.CZ - Va�e po�ta je v�dy s V�mi
http://www.email(tec)cz
Desktop aplikacia
[*] Ing. Csaba Kissi <ckissi(zv)email(tec)cz> - 13.10.2000 08:00:48
Ahoj,
Mam nasledujuci problem. Chcem vytvorit aplikaciu ktora by sa spravala ako
windows desktop. Problem je v tom ze ak uzivatel klikne na okno tohto programu
to sa automaticky dostane do popredia a zakryje vsetky okna ktore boli nad
nim. Potrebujem teda zabezpecit aby to fungovalo ako normalny desktop. Teda
nech kliknutie na toto okno nesposobi minimalizaciu alebo zakrytie ostatnych
aplikacii.
EMAIL.CZ - Va�e po�ta je v�dy s V�mi
http://www.email(tec)cz
MSSQL a MemoFIeld
[*] Tomas Vladik <tom.vladik(zv)swadvice(tec)cz> - 13.10.2000 08:15:20
Ahoj lidi,
MSSQL 7 Sp2, ODBCe 2.6
mam na MS SQL v tabulce memo pole a zjistil jsem, ze kdyz edituju pole,
ktere uz neco obsahovalo a vysledny retezec je kratsi nez puvodni, tak na
konec musim pridat znak #0, aby mi na konci nezustal "ocasek" z puvodniho
retezce. To uz je takova "feature", se kterou se neda nic delat, nebo se s
tim neco delat da?
T.
________________________________
Tom� Vlad�k
e-mail: tom.vladik(zv)swadvice(tec)cz
CGI skripty
[*] Raul Endymion <Raul.Endymion(zv)mail.infima(tec)cz> - 13.10.2000 08:36:53
M> Ahoj,
M> chtel bych nekoho z vas poprosit, jestli by mi nemohl polopaticky vysvetlit,
M> jak napsat v D5 CGI-skript. Pripadne jeste odkazal ne nejakou dobrou
M> literaturu.
M> diky Mirek Drancak
Mame podobne tema, pokud chces nejake info napis mi na meil, je mozne
i se sejit, pokud jsi z Prahy.
Raul mailto:Raul.Endymion(zv)mail.infima(tec)cz
Dobrovolnik
[*] Raul Endymion <Raul.Endymion(zv)mail.infima(tec)cz> - 13.10.2000 08:43:01
Je tady nekdo kdo by byl ochoten zasvetit do taju psani applikacnich
serveru pro (nejen) webove aplikace ? Jde mi o to pochoppit ruzne
triky. V dokumentacich vzdy jen najdu komunikaci pri napojeni na
databazi, ale ja potrebuju aby app server fungoval jako app (tzn. aby
neco provadel) a ne aby mi zpristupnil databazi. Moc prosim, pokud
nekdo toto zvladate, podelte se. Idealni by bylo v Praze ci okoli,
staci par hodinek. Nejaka ta korunka je mozna.
Raul mailto:Raul.Endymion(zv)mail.infima(tec)cz
vystupni parametry u StoredProc
[*] Ren� Otisk - 13.10.2000 08:49:44
Hi,
Neni to hlaska BDE? Pokud ano, potom budes asi muset najit nonBDE cestu, coz
by Oraclu jedine prospelo...
Sroub
> Ahoj,
>
> D3 C/S, Oracle 8.04 , BDE 5.1 zkouseno i s D5 C/S
>
> Procedura v Oracle ma 2 vstupni parametry number(9) a 9 vystupnich
> varchar2(254)
> Pri definici parametru v DataModulu mi nahlasi Delhi - chyba cteni na
> adrese ....
> Pokud vystupni parametry v Oracle snizim na 5 tak se to chova normalne.
>
> Nevite v cem je problem, nebo jak to resit ?
> Budu potrebovat i procedury s 18 vystupnimi parametry.
>
> Milan
>Ukladani nastaveni formularu
[*] Ren� Otisk - 13.10.2000 08:51:56
Bud si to nacti do ini - sekce pro jednotlive uzivatele, nebo do registru a
nebo v RxLib je komponenta TFormPlacement a na nej si natahnes ty
vlastnosti, ktere chces ulozit a urcis si jestli je chces do registru ci do
ini filu.
Sroub
> Ahoj vsichni
>
> Mel bych nasledujici dotaz. V programu pouzivam formulare, na kterych je
> kombinace panelu, splittru, gridu a dalsich podobnych komponent. Vznikla
> potreba ukladat nektere vlastnosti, zvlaste rozmisteni panelu gridu a pod
a
> pri otevreni je znovu nacist. Problem je v tom ze se mi formular nekdy
> zprehaze.
>
> Pr.: mam formular na nem z prava panel zarovnany doprava, vedle nej DBGrid
> zarovnany doprava a vedle nej splitter zarovnany doprava Uplne vlevo je
> panel nastaveny alClient. Po nacteni ulozeneho nastaveni se mi vymeni
pravy
> panel a DBgrid.
>
> Postup nacitani je takovy ze nejdrive obnovim vlastnosti formu a pak
> rekurzivne prochazim seznam Controls. tj projdu komponenty na formu a kdyz
> najdu panel ..., podivam se zda neni alClient a kdyz ne, nactu jeho
rozmery
> ze souboru, v kazdem pripade projdu jeho pole controls a stejnym zpusobem
> hledam, zda v nem neni nejaka komponenta, ktera me zajima.
>
> Nevite co mam delat, aby se formular objevil se stejnou "tvari", s jakou
> jsem ho ulozil?
> Zalezi to na poradi? Mam prenastavit urcitym zpusobem zarovnavani
> "zajimavych" komponent? Muzu formular opravit? Obecne me zajima, podle
ceho
> postupovat.
>
> Budu vdecny za kazdy napad nebo radu
>
> Jaromir
> Cermak
Jak programove zmenit ikonu
[*] Ing. Lud�k Florian <Ludek.Florian(zv)bluerose(tec)cz> - 13.10.2000 08:56:24
Jak programove zmenit ikonu
Ahoj vsichni,
Nazdar,
netusite nekdo nahodou, jakym zpusobem lze (programove samozrejme) zmenit ikonu adresare, ktera se zobrazena v Pruzkumniku? Treba adresar Dokumenty vypada jinak nez standardne, sdileny adresar vypada jinak, Recycled ma jinou ikonu... Jak se to da udelat, nevite nekdo?
Programov� nev�m, ale je n�kolik program�. Jedn�m je E-Icon, ten toho vym�n� dost a pak jeste jeden, n�zev si nevzpomenu, ten m�n� ikony adres���, tak�e ikona adres��e m��e b�t stejn� jako EXE aplikace.
RNDr. Petr Brant [Brant(zv)dcomm(tec)cz]
Chce�-li, napi�, po�lu.
Bye Ludan
Ing. Lud�k Florian
Blue Rose v.o.s.
Mikulovick� 2584
CZ-53002 Pardubice
Tel.:+420-40-6330840
Fax: +420-40-6301311
Mobil: +420-603-471087
E-mail: Ludek.Florian(zv)bluerose(tec)cz
http://www.bluerose(tec)cz
Ukladani nastaveni formularu
[*] Ing. Lud�k Florian <Ludek.Florian(zv)bluerose(tec)cz> - 13.10.2000 09:05:55
Cauec,
pokud si ukladas a nacitas informace o rozmisteni sam, muzes v tom mit dost
curbes. Zkus pouzit z Rx komponentu FormStorage1. Pouzivam na ukladani
informaci z formulare.
> Nevite co mam delat, aby se formular objevil se stejnou "tvari", s jakou
> jsem ho ulozil?
> Zalezi to na poradi? Mam prenastavit urcitym zpusobem zarovnavani
> "zajimavych" komponent? Muzu formular opravit? Obecne me zajima, podle
ceho
> postupovat.
>
Bye Ludan
Rotace bitmapy
[*] Karel Rys <delphi(zv)zas-me(tec)cz> - 13.10.2000 09:09:34
Doporucil bych pouzit knihovnu od Intelu IPL (Intel Image Processing
Library), je to rychle a optimalizovane pro ruzne procesory.
Nevyhodou muze byt vetsi velikost tech knihoven, mely by ale jit
nejak prekompilovat (v Cecku), aby zustaly jen ty procedury, ktere
volas.
Karel Rys
Sula Milos dne 10 Nov 2000, v 7:16:
> Ahoj
> nevite jak by se dala pokud mozno co nejrychleji rotovat bitmapou
> (presunem jednotlivych RGB pixelu bitmapy v pameti )? Daji se
> samozrejme pouzit goniometricke fce sin a cos ale to je dosti pomale
> (jedine si hodnoty predvypocitat s urcitou presnosti a potom jen volat
> pole ktere vrati sin/cos jeho indexu ) predem diky
Pevna carka podruhe
[*] Karel Rys <delphi(zv)zas-me(tec)cz> - 13.10.2000 09:12:34
A nestacilo by pouzit typ currency a pred tim, nez tam hodnotu
ulozis, ji vynasobit vhodnym koeficientem, napr. 1000? Currency
pouziva pevnou desetinnou carku (4 des. mista) a funguje rychle.
Podobne by se dal pouzit typ Int64 (celociselny, nasobit 10 000 000),
funguje zrejme jeste rychleji.
Karel Rys
> Slo by to udelat v assembleru... mozn� na to je nejak� knihovnicka,
> ale j� o ni nev�m... kdyby jsi to delal v asm tak bude dost obt�zn� -
> mus�s k tomu vyrobit z�kladn� aritmetick� operace.... obt�zn� na tom
> bude, aby byly rychl�.....
>
>
> Ivan Svarc
> ----- Original Message -----
> From: David Lebeda <david.lebeda(zv)comarr(tec)cz>
> To: <delphi-l(zv)fwd(tec)cz>
> Sent: Friday, November 10, 2000 12:32 PM
> Subject: Pevna carka podruhe
>
> > zkousim to jeste jednou: nemate nekdo nejakou knihovnu nebo
> > cokoli jineho co se tyka vypoctu v pevne radove carce? Nebo
> > nejake namety, jak na to. Pozadavek je 7 nebo radeji i vice
> > desetinnych mist. Neresil jste to nekdo?
> > David
>
Jak poslat soubor
[*] brant(zv)dcomm(tec)cz - 13.10.2000 09:12:21
This message is in MIME format. Since your mail reader does not understand
this format, some or all of this message may not be legible.
Ahoj vsem,
je tato situace: aplikace vytvori soubor a ten se ma odeslat na urcitou
(pevne danou) mailovou adresu. Pomoci ShellExecute s prislusnymi parametry
se da spustit postak, vyplni se prijemce atd. ale bohuzel nevim, jakym
zpusobem pridat jako prilohu ten soubor. Chtel bych totiz, aby uzivatel jen
klepl na tlacitko "odeslat" a nemusel se starat o nic dalsiho. Diky predem
za vsechny rady resp. ukazky kodu.
RNDr. Petr Brant [Brant(zv)dcomm(tec)cz]
D&COMM s.r.o
Korunova�n� 6
Praha 7
SQL a DBTreeView - takovy SQL orisek
[*] Ren� Otisk - 13.10.2000 09:39:48
Hi,
Pokud to ma byt pro jednu konkretni vetev, tak bych to delal pres stored
proc (princip viz nize). Pokud bys to potreboval pro vsechna viditelna
kolinka, tak uz bych to delal pres kurzorove tabulki
CREATE PROCEDURE INSEQUIPMENTS
(zv)OBJ_ID INTEGER OUTPUT, (zv)OBJEKTLABEL NVARCHAR(50) OUTPUT
AS
DECLARE (zv)MY_OBJ_ID INTEGER
SELECT (zv)MY_OBJ_ID = (zv)OBJ_ID
WHILE (zv)MY_OBJ_ID IS NOT NULL
BEGIN
IF (zv)OBJ_ID = (zv)MY_OBJ_ID
SELECT (zv)MY_OBJ_ID = UP_OBJ_ID, (zv)OBJEKTLABEL = OBJEKT
FROM EQUIPMENTS WHERE OBJ_ID = (zv)MY_OBJ_ID
ELSE
SELECT (zv)MY_OBJ_ID = UP_OBJ_ID, (zv)OBJEKTLABEL = OBJEKT + ' ---> ' +
(zv)OBJEKTLABEL
FROM EQUIPMENTS WHERE OBJ_ID = (zv)MY_OBJ_ID
END
PRINT((zv)OBJEKTLABEL)
Mej se
Sroub
Toz to by aj slo, akorat bych to potreboval zobrazit pouze pro jednoho
podrizeneho. Aby mi to vypsalo vsechny nadrizene (parenty) ale jen pro jednu
konretni vetev.
Mac
----- Original Message -----
From: "Ren� Otisk" <otisk(zv)misel(tec)cz>> Pres join na sebe sama.
>
> Pisu to ted z hlavy, delal jsem to pro hierarchickou strukturu
zamestnancu.
> Kdyz tak jsem schopen to doma nekde vystrachat
>
> SELECT A.EID, A.JMENO, B.EID, B.JMENO FROM
> EMPLOYEE A
> LEFT JOIN EMPLOYEE B ON A.NADRIZENY = B.EID
>
> Sroub
>
> > ukladam data (resp. chystam se k tomu ;-) do 'stromove' struktury s
> vyuzitim
> > principu, ktery pouzivaji DBTreeView komponenty, tzn. id radku a
parent_id
> > obsahujici id vlastnika:
> >
> > id (Guid)
> > parent_id (Guid)
> > name (Varchar)
> >
> > lze udelat nejaky SQL dotaz, kterym bych dostal vsechny parenty pro
daneho
> > childa ? Jak to nejak mazane vyresit, abych nemusel pouzivat kurzory a
> > podobne neresti ;-) ???
Prohlizecka ulozenych souboru QRP v QuickReportu
[*] Pavel ZIDEK <kopr(zv)kopr(tec)cz> - 13.10.2000 09:42:34
mam taky zajem.
mozna by bylo dobre nabizene veci nekam hodit, at si to kazdy muze stahnout
pavel
kopr(zv)kopr(tec)cz
----- Original Message -----
From: Ji�� Fait <fait(zv)jakl(tec)cz>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Friday, November 10, 2000 6:08 AM
Subject: RE: Prohlizecka ulozenych souboru QRP v QuickReportu
> Jestli chces poslu mam hotovou prohlizecku i zdrojaky.
>
> Jiri Fait
> [mailto:fait(zv)jakl(tec)cz]
> [mailto:ftsoft(zv)iol(tec)cz]
>
> > -----Original Message-----
> > From: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz]On Behalf Of
> > Ing. Petr �vejda
> > Sent: Thursday, November 09, 2000 12:37 PM
> > To: Konference Delphi
> > Subject: Prohlizecka ulozenych souboru QRP v QuickReportu
> >
> >
> > D5 prof + QR3
> >
> > metodou QRPrinter.Save... se mi podarilo programove ulozit vytvorenou
> > sestavu. Potrebuji si vytvorit vlastni prohlizecku takto
> > vytvorenych sestav
> > *.QRP. Nevim ale, kam strcit metodu QRPrinter.Load... a jak ji pouzit.
> > Poradite mi nekdo?
> >
> > Diky
> >
> > Petr
> >
> > ---
> > P��choz� zpr�va neobsahuje viry.
> > Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
> > Verze: 6.0.198 / Virov� b�ze: 95 - datum vyd�n�: 4.10.2000
> >
> ---
> Odchoz� zpr�va neobsahuje viry.
> Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
> Verze: 6.0.198 / Virov� b�ze: 95 - datum vyd�n�: 4.10.2000
>
>Jak programove zmenit ikonu
[*] Bene� Jaroslav <JBenes(zv)cpoj(tec)cz> - 13.10.2000 09:51:05
Ahoj,
zkus se podivat jak je to napsane v souborech .theme (pro zmenu ikony
folderu staci zrejme zmenit jen neco v registru a v themech je to tak
zhusta delane
napr. pro zmenu ikony kose
[CLSID\{645FF040-5081-101B-9F08-00AA002F954E}\DefaultIcon]
empty=%Windir%septh0.ico,0
full=%Windir%septh1.ico,0
). Nerika to sice jak, ale kam... Snad to staci.
Jaro B.
> -----P�vodn� zpr�va-----
> Od: Ing. Lud�k Florian [SMTP:Ludek.Florian(zv)bluerose(tec)cz]
> Odesl�no: 13. XI 2000 8:56
> Komu: delphi-l(zv)fwd(tec)cz
> P�edm�t: Re: Jak programove zmenit ikonu
>
>
> Ahoj vsichni,
>
> Nazdar,
>
> netusite nekdo nahodou, jakym zpusobem lze (programove
> samozrejme) zmenit ikonu adresare, ktera se zobrazena v Pruzkumniku?
> Treba adresar Dokumenty vypada jinak nez standardne, sdileny adresar
> vypada jinak, Recycled ma jinou ikonu... Jak se to da udelat, nevite
> nekdo?
>
> Programov� nev�m, ale je n�kolik program�. Jedn�m je E-Icon, ten toho
> vym�n� dost a pak jeste jeden, n�zev si nevzpomenu, ten m�n� ikony
> adres���, tak�e ikona adres��e m��e b�t stejn� jako EXE aplikace.
>
> RNDr. Petr Brant [Brant(zv)dcomm(tec)cz]
>
> Chce�-li, napi�, po�lu.
>
>
>
> Bye Ludan
>
>
>
> Ing. Lud�k Florian
> Blue Rose v.o.s.
> Mikulovick� 2584
> CZ-53002 Pardubice
> Tel.:+420-40-6330840
> Fax: +420-40-6301311
> Mobil: +420-603-471087
> E-mail: Ludek.Florian(zv)bluerose(tec)cz <mailto:Ludek.Florian(zv)bluerose(tec)cz>
> <http://www.bluerose(tec)cz>
>
> Pevna carka podruhe
[*] Kalhous Zdenek <zdenek.kalhous(zv)comarr(tec)cz> - 13.10.2000 10:13:46
Pozor. Nemam to vlastnorucne vyzkouseno, ale podle informace od
kolegy je i typ Currency vnitrne reprezentovan float cislem, form�t
tedy asi rik� pr�ve jen to ze zvenku se to bude tvarit jako pevna
carka se dvema des.misty a vnitrne snad je zajistena presnost
vypoctu na ctyri mista.
On 13 Nov 2000, at 9:12, Karel Rys wrote:
> A nestacilo by pouzit typ currency a pred tim, nez tam hodnotu
> ulozis, ji vynasobit vhodnym koeficientem, napr. 1000? Currency
> pouziva pevnou desetinnou carku (4 des. mista) a funguje rychle.
> Podobne by se dal pouzit typ Int64 (celociselny, nasobit 10 000 000),
> funguje zrejme jeste rychleji.
>
> Karel Rys
>
> > Slo by to udelat v assembleru... mozn� na to je nejak� knihovnicka,
> > ale j� o ni nev�m... kdyby jsi to delal v asm tak bude dost obt�zn�
> > - mus�s k tomu vyrobit z�kladn� aritmetick� operace.... obt�zn� na
> > tom bude, aby byly rychl�.....
> >
> >
> > Ivan Svarc
> > ----- Original Message -----
> > From: David Lebeda <david.lebeda(zv)comarr(tec)cz>
> > To: <delphi-l(zv)fwd(tec)cz>
> > Sent: Friday, November 10, 2000 12:32 PM
> > Subject: Pevna carka podruhe
> >
> > > zkousim to jeste jednou: nemate nekdo nejakou knihovnu nebo
> > > cokoli jineho co se tyka vypoctu v pevne radove carce? Nebo
> > > nejake namety, jak na to. Pozadavek je 7 nebo radeji i vice
> > > desetinnych mist. Neresil jste to nekdo?
> > > David
> >
>
>
Z.Kalhous
DBaware ? data-aware
[*] Zbysek Hlinka <hlinka(zv)hlinka(tec)cz> - 13.10.2000 10:18:28
On 12 Nov 2000, at 20:02, Martin Kubecka wrote:
> > > tomu ze pro editaci pouzivam Zbyskem nenavideny DBGrid ;-)
> >
> > Ale, ale! :-) Ja netvrdim, ze nenavidim DBGrid, ale pouze to, ze ma
> > radu much a ze bych si netroufal pouzit ho pro editovani v programu,
> > se kterym budou pracovat BFU a jeste ke vsemu na siti.
>
> ;-))) Trosku te skadlim, vzdyt me znas ;-)))
No, pockej az te potkam, dostanes za usi... Mno, ... mozna asi
spis ne, vypadas silnejsi nez ja. :-)
> > > On vubec pojem on-line a off-line data je asi dosti sporny,
> > > protoze u
>
> > Za off-line povazujme takovy stav, kdy si dataset umi udrzet data (a
> > pracovat s nimi) i v pripade, ze spojeni s databazi (ci prislusnymi
> > kursory) skonci.
>
> Otazka je, aby to spojeni umel zase navazat, vyresit pripadne
> konflikty a data ulozit na server. Tohle by mel snad dobre resit
> TClientDataSet, jak vzpominal nas amatersky programator ;-). Budu na
> nej muset mrknout. Popr. jine vicevrstve technologie. Dalo by se rict,
> ze ty se Zbysku vice blizis k trivrstve architekture a my spise
> (zatim) setrvavame na dvouvrstve. Odmyslime li si recordset v ADO a
> dataset v Delphi ;-)))))
Je lhostejne, kolikavrstva je to architektura. Uplne nejprimitivnejsi
reseni je, ze vysosas data z datasetu do nejakeho sveho bufferu
nebo obycejneho gridu (tedy prohlasis novym datasetem napr. ten
grid), pak se odpojis od toho datasetu, neco si smudlas, a pak
upravy posles pres ulozene procedury. Je to sice trochu pracnejsi,
ale zase mas takto daleko vetsi volnost, pokud se rozhodnes
rozdelit program na vice casti. Kazdopadne lze takove zmeny delat
za pochodu, aniz bys musel psat program cely znovu.
S pozdravem
Zbysek Hlinka
Phones: 02/795 29 56; GSM: 0603 551 282
Krystofova 1016, 149 00 Praha 4
CZ
Jak poslat soubor
[*] ing. Jan Fiala <jan.fiala(zv)iol(tec)cz> - 13.10.2000 10:28:30
13.11.2000 brant(zv)dcomm(tec)cz napsal(a):
> Ahoj vsem,
> je tato situace: aplikace vytvori soubor a ten se ma odeslat na urcitou
> (pevne danou) mailovou adresu. Pomoci ShellExecute s prislusnymi parametry
> se da spustit postak, vyplni se prijemce atd. ale bohuzel nevim, jakym
> zpusobem pridat jako prilohu ten soubor. Chtel bych totiz, aby uzivatel jen
> klepl na tlacitko "odeslat" a nemusel se starat o nic dalsiho. Diky predem
> za vsechny rady resp. ukazky kodu.
> RNDr. Petr Brant [Brant(zv)dcomm(tec)cz]
> D&COMM s.r.o
> Korunova�n� 6
> Praha 7
Pomoci ShellExecute to nepujde, ale nasledujici procedura by ti mohla
stacit. Prijemce, subjekt, prilohu apod. si nahrad svymi retezci.
function TForm1.Majluj : Boolean;
var
Zprava : MapiMessage;
Prijemce : array [0..1] of MapiRecipDesc;
Soubor : MapiFileDesc;
Vysledek : Cardinal;
Reg : TRegistry;
begin
{ nastavime simple MAPI }
Reg := TRegistry.Create;
try
with Reg do begin
RootKey := HKEY_LOCAL_MACHINE;
if OpenKey('\Software\Microsoft\Windows Messaging Subsystem', False)
then WriteString('MAPI', '1');
end;
finally
Reg.CloseKey;
Reg.Free;
end;
{ struktura prijemce }
with Prijemce[0] Do Begin
ulReserved := 0;
ulRecipClass := Mapi_To;
lpszName := PChar(edMail.Text);
lpszAddress := nil;
ulEIDSize := 0;
lpEntryID := nil;
end;
with Prijemce[1] Do Begin
ulReserved := 0;
ulRecipClass := Mapi_CC;
lpszName := PChar(edMailKopie.Text);
lpszAddress := nil;
ulEIDSize := 0;
lpEntryID := nil;
end;
{ struktura prilohy }
with Soubor do begin
ulReserved := 0;
flFlags := 0;
nPosition := 0;
lpszPathName := PChar(edPatchPath.Text + '\' + edZip.Text);
lpszFileName := nil;
lpFileType := PChar('.ZIP');
end;
{ struktura vlastni zpravy }
with Zprava do begin
ulReserved := 0;
lpszSubject := PChar(edSubject.Text);
lpszNoteText := PChar(Memo.Lines.Text);
lpszMessageType := nil;
lpszDateReceived := nil;
lpszConversationID := nil;
flFlags := 0;
lpOriginator := nil;
if edMailKopie.Text <> ''
then nRecipCount := 2
else nRecipCount := 1;
lpRecips := (zv)Prijemce;
nFileCount := 1;
lpFiles := (zv)Soubor;
end;
{ pokusime se to odeslat }
Result := False;
Vysledek := MapiSendMail(0, Application.Handle, Zprava,
Mapi_Dialog or Mapi_LogOn_UI or Mapi_New_Session, 0);
case Vysledek of
Success_Success : Result := True;
Mapi_E_User_Abort : Result := False;
else
Application.MessageBox('Nepoda�ilo se poslat zpr�vu elektronickou po�tou.'
+ #13#13'Pokud pou��v�te Outlook expres, zkontrolujte, zda je nastaven'
+ ' jako v�choz� klient MAPI.' , 'Chyba', mb_OK + mb_IconError);
end;
end;
Pokud to budes chtit bez dialogu postovniho klienta, vypust
Mapi_Dialog v Mapi_Send_Mail
------
ing. Jan Fiala
mailto:jan.fiala(zv)iol(tec)cz
Triger generuje NOT NULL polozku, ale nejde insert
[*] Vladislav.Skalicka(zv)koncept(tec)cz - 13.10.2000 10:38:58
Ted uz je muj nazor out of date, ale napriste je dobre dodrzovat zasadu, ze
primarni klic by
mel byt vzdy (snad mimo specialni pripady) absolutne bezvyznamovy, tj. ciste
ID generovane
pro kazdou tabulku zvlast, at uz autoincrement nebo cokoliv podobneho. NOT
NULL
a unikatnost danych polozek se da zajistit jinymi zpusoby. Timto se predejde
temto a mnohym dalsim problemum.
Jestli tomu rozumim dobre, dalsi dve polozky z PK jsou zavisle na hodnote te
prve a trigger
se spousti az po insertu. Pokud to jde (zalezi na DB), pak jako
nejjednodussi reseni by mohlo
byt pouziti triggeru, ktery se spousti PRED insertem, pokud ne, potom si
pred insertem zjistim hodnoty tech dvou polozek a insertnu vsechny tri.
Zalezi samozrejme na aplikaci i DB (napr. pouzit stored proc).
Asi jsem moc nepomohl....
VVS
--------------------------------------------------------
ing. Vladislav V. Skali�ka
Koncept CZ, a.s.
S�dlo: Tursko 142, 252 65 Praha-z�pad
Po�tovn� adresa: Nad V��inkou 2, 150 00 Praha 5
Phone: +420-2-57310970,57310971, Fax:+420-2-57313772
MailTo:vladislav.skalicka(zv)koncept(tec)cz
--------------------------------------------------------
-----Original Message-----
From: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz]On Behalf Of
Michal Tiller
Sent: Friday, November 10, 2000 2:18 PM
To: Delphi Forum (E-mail)
Subject: OT: Triger generuje NOT NULL polozku, ale nejde insert bez teto
polozky
Mam tabulku, kde na zaklade jedne polozky po insertu nastavim v trigru dalsi
dve polozky, ktere zkopiruji z jine tabulky. Vsechny tri polozky jsou
primarnim klicem, tedy not null. Nemohu ale udelat insert, kde nevyplnim
vsechny tri polozky. Jak to udelat?
Dekuji,
Michal.Tiller(zv)oskarmobil.Cz :o)
RF Support Coordinator, OSKAR, RF - Engineering
+420 (02) 7117 1388, +420 (0608) 011 327
OT: Outlook Ex a Win ME
[*] Karel Cibulka <kcibulka(zv)seznam(tec)cz> - 13.10.2000 10:40:43
On so 11. listopad 2000 15:55, you wrote:
> Mam nove nainstalovane Windows ME a v jejich instalaci je uz obsazen
> program Outlook Express. Objevuje se mi takovy problem, ze kdyz spustim
> Outlook, tak na chvilku "zahrabe" harddisk, pak se dlouho nic nedeje (jako
> by byl pocitac v klidu), po nejake dobe se zobrazi Splash screen od
> Outlooku, pak zase dlouho nic a az po nejake dobe se konecne zobrazi
> program. Nevite nekdo, co s tim je? Tohle se mi nikdy na Win 98
> nestavalo...
Zrovna jsem si procital nejake novinky na Internetu a narazil jsem tam odkaz
do Mikrosofti KB, kde se popisuje neco podobneho, treba to pomuze....
Delayed Response When Editing Internet Explorer Forms
�http://support.microsoft.com/support/kb/articles/q251/7/87.asp
"When you attempt to type information into a form in Internet
Explorer, the text field may hesitate to insert the cursor and
display the text that you type in a text field. You may also
experience a long hesitation when you move the cursor from one
field to another (5-20 seconds). In addition, Microsoft Outlook
Express may take a long time to start. This behavior can occur
because of any of the following reasons: the AutoComplete history
is corrupted; the Pstores.exe and associated .DLL files may be
corrupted or their versions may be incorrect; or the
ProtectedStorage registry key has incorrect parameters."
--
<br>
Cibulka Karel, mailto:kcibulka(zv)seznam(tec)cz, ICQ: 4111110
<br>Vyber podmnoziny riadkov
[*] Jan Grman <janog(zv)pluto.elf.stuba.sk> - 13.10.2000 10:41:06
Ahoj,
samozrejme poznam konstrukciu TOP n (prvyvh n riadkov),
mal som na mysli nieco podobne ako je uvedene v tejto odpovedi s tym, ze:
a) bude to napriklad STORED PROCEDURA ktora vykona ten SELECT
b) z toho VYSLEDKU vrati len urcenu skupinu (napr. 20 riadkov, teda aj zo
stredu)
Otazka pre mna bola (i ked polozena bola vseobecne, co ked nahodou existuje
nieco ine):
a) ci to ide pouzitim konstrukcie CURSOR
b) ci to treba hodit do TEMP tabulky, v nej urobit poradove cislo a potom to
nejak jednoducho vybrat
Asi sa do toho pustim sam, len som chcel vediet ci to uz niekto nerobil nech
sa s tym nezrdzujem.
Inak vdaka za vsetky odpovede.
JaNo.
janog(zv)pluto.elf.stuba.sk
----- Original Message -----
From: "Delphi" <delphi(zv)aitix(tec)cz>
Subject: Re: Vyber podmnoziny riadkov
> > > potrebujem to vyriesit tak, aby uz SQL server vratil len 20 zaznamov !
> > > nateraz to potrebujem pre MS SQL, ale budem to potrebovat aj pre
> INTERBASE
>
> U Interbase bych to resil stored procedurou.
> Coz sice stejne vytahne spoustu vet, ale aspon odesle klientovi jen tech
> dvacet.
> Viz. http://www.mers.com/IB_0104.HTML
> Nejsem si jist, zda nejaky SQL server primo podporuje to, co pises.
> Nektere servery umi vratit prvnich X vet.Jak poslat soubor
[*] Gebauer Lukas <gebylist(zv)mlp(tec)cz> - 13.10.2000 10:48:32
Nemyslim si, ze shellexecute je ten spravny zpusob. Kazdy
ostovni klient se chova jinak, kde mas jistotu, ze tam vubec nejaky
postovni klient bude, atd.
Naopak si myslim, ze spravne reseni je odeslat ten e-mail primo z
programu, treba pomoci moji Synapse. :-)
potrebujes znat adresu SMTP serveru, a adresu odesilatele a
prijemce.. pak na odeslani e-mailu, ktery ma v sobe kus textu a
pak prilozeny soubor ti staci takovyto jednoduchy kod:
{you must create object for MIME message}
MIME:=TMIMEMess.Create;
try
{set headers for message}
MIME.header.from:=fromaddress;
MIME.header.Tolist.add(toaddress);
MIME.header.subject:=subject;
{add text part}
MIME.AddPartText(StringListWithText);
{add binary part}
MIME.AddPartBinary(FilenameWithBinary);
{compose message}
MIME.EncodeMessage;
MIME.FinalizeHeaders;
{Mime message done.}
{now we may send it to SMTP server... by SMTPSend unit...}
SenToRaw (fromaddress, toaddress, SMTPHost, MIME.Lines);
{destroy MIME object}
MIME.Free;
end; > Ahoj vsem,
> je tato situace: aplikace vytvori soubor a ten se ma odeslat na
> urcitou (pevne danou) mailovou adresu. Pomoci ShellExecute s
> prislusnymi parametry se da spustit postak, vyplni se prijemce atd.
> ale bohuzel nevim, jakym zpusobem pridat jako prilohu ten soubor.
> Chtel bych totiz, aby uzivatel jen klepl na tlacitko "odeslat" a
> nemusel se starat o nic dalsiho. Diky predem za vsechny rady resp.
> ukazky kodu.
>
> RNDr. Petr Brant [Brant(zv)dcomm(tec)cz]
>
> D&COMM s.r.o
> Korunova�n� 6
> Praha 7
>
>
Louci se Lukas Gebauer.
E-mail: gebauerl(zv)mlp(tec)cz
WEB: http://www.ararat(tec)cz/synapse - Synapse Delphi TCP/IP Library
MSSQL a MemoFIeld
[*] Lubo Fule <fule(zv)sct.sk> - 13.10.2000 10:55:02
> mam na MS SQL v tabulce memo pole a zjistil jsem, ze kdyz
> edituju pole,
> ktere uz neco obsahovalo a vysledny retezec je kratsi nez
> puvodni, tak na
> konec musim pridat znak #0, aby mi na konci nezustal "ocasek"
> z puvodniho
> retezce. To uz je takova "feature", se kterou se neda nic
> delat, nebo se s
> tim neco delat da?
>
> T.
"Chybicka se vloudila...", uz by to malo byt OK...
http://www.sct.sk/~fule/ODBCe/ODBCe.exe
L.
Jak poslat soubor
[*] Martin Koran <komar(zv)komar(tec)cz> - 13.10.2000 11:01:57
Ahoj,>Ahoj vsem,
>je tato situace: aplikace vytvori soubor a ten se ma odeslat na urcitou
(pevne danou)
>mailovou adresu. Pomoci ShellExecute s prislusnymi parametry se da spustit
postak,
>vyplni se prijemce atd. ale bohuzel nevim, jakym zpusobem pridat jako
prilohu ten
>soubor. Chtel bych totiz, aby uzivatel jen klepl na tlacitko "odeslat" a
nemusel se
>starat o nic dalsiho. Diky predem za vsechny rady resp. ukazky kodu.
nekde jsem vylovil tohle:
function Mapi_Send(const Subject: String; const AProfile: String; Recips,
Msg, Att: TStrings; ADialog: Boolean): Cardinal;
var
MapiMessage: TMapiMessage;
Recip: array [0..100] of TMapiRecipDesc;
Files: array [0..10] of TMapiFileDesc;
Flgs: FLAGS;
I: Cardinal;
MSess: Cardinal;
begin
if ADialog then
Flgs := MAPI_DIALOG
else
Flgs := 0;
MAPILogon(0, PChar(AProfile), '', MAPI_NEW_SESSION, 0, (zv)MSess);
if Att <> nil then
for I := 0 to Att.Count-1 do
with Files[I] do begin
ulReserved := 0;
flFlags := 0;
nPosition := Cardinal(-1);
lpszPathName := PChar(Att.Strings[I]);
lpszFileName := '';
lpFileType := nil;
end;
if Recips <> nil then
for I := 0 to Recips.Count-1 do
with Recip[I] do begin
ulReserved := 0;
ulRecipClass := MAPI_TO;
lpszName := PChar(Recips.Strings[I]);
lpszAddress := PChar('SMTP:' + Recips.Strings[I]);
ulEIDSize := 0;
lpEntryID := nil;
end;
with MapiMessage do begin
ulReserved := 0;
lpszSubject := PChar(Subject);
if Msg = nil then
lpszNoteText := ''
else
lpszNoteText := PChar(Msg.Text);
lpszMessageType := nil;
lpszDateReceived := nil;
lpszConversationID := nil;
flFlags := 0;
lpOriginator := nil;
if Recips <> nil then begin
nRecipCount := Recips.Count;
lpRecips := (zv)Recip;
end
else begin
nRecipCount := 0;
lpRecips := nil;
end;
if Att <> nil then begin
nFileCount := Att.Count;
lpFiles := (zv)Files;
end
else begin
nFileCount := 0;
lpFiles := nil;
end;
end;
Result := MapiSendMail(MSess, 0, MapiMessage, Flgs, 0);
end;
P.S.: prosim te, pouzivej ve zpravach plain text
S pozdravem
Martin Koran
--------------------------------------------
Martin Koran - KOMAR
Podebradova 877
440 01 LOUNY
Czech Republic
tel.: +420 (395) 65 40 19
fax: +420 (395) 65 53 85
hotline: +420 (395) 42 33 72
mailto:komar(zv)komar(tec)cz
http://www.komar(tec)cz
Pevna carka podruhe
[*] David Lebeda <david.lebeda(zv)comarr(tec)cz> - 13.10.2000 11:10:05
> A nestacilo by pouzit typ currency a pred tim, nez tam hodnotu
> ulozis, ji vynasobit vhodnym koeficientem, napr. 1000? Currency
> pouziva pevnou desetinnou carku (4 des. mista) a funguje rychle.
> Podobne by se dal pouzit typ Int64 (celociselny, nasobit 10 000 000),
> funguje zrejme jeste rychleji.
>
> Karel Rys
Ahoj,
to je cesta, kterou se asi skutecne budu ubirat, ale protoze v
nekterych pripadech by mohl byt i typ Int64 kratky, doufal jsem
tajne, ze treba nekdo uz vytvoril nejakou vlastni reprezentaci cisel v
pevne carce, umoznujici pojmout i vice nez 18 az 20 platnych
cislic, samozrejme vcetne aparatu pro nasobeni a deleni takovych
cisel.
David
>
> > Slo by to udelat v assembleru... mozn� na to je nejak� knihovnicka,
> > ale j� o ni nev�m... kdyby jsi to delal v asm tak bude dost obt�zn�
> > - mus�s k tomu vyrobit z�kladn� aritmetick� operace.... obt�zn� na
> > tom bude, aby byly rychl�.....
> >
> >
> > Ivan Svarc
> > ----- Original Message -----
> > From: David Lebeda <david.lebeda(zv)comarr(tec)cz>
> > To: <delphi-l(zv)fwd(tec)cz>
> > Sent: Friday, November 10, 2000 12:32 PM
> > Subject: Pevna carka podruhe
> >
> > > zkousim to jeste jednou: nemate nekdo nejakou knihovnu nebo
> > > cokoli jineho co se tyka vypoctu v pevne radove carce? Nebo
> > > nejake namety, jak na to. Pozadavek je 7 nebo radeji i vice
> > > desetinnych mist. Neresil jste to nekdo?
> > > David
> >
>
>
Vyber podmnoziny riadkov
[*] �ejka Jan <Jan.Cejka(zv)merlin(tec)cz> - 13.10.2000 11:12:45
A co treba takhle? (Oracle)
Select * from (Select SIn.*, RowNum as RowNum_X from (Select * from lidi)
SIn) SOut where SOut.RowNum_X >= 10 and SOut.RowNum_X <= 23
> -----P�vodn� zpr�va-----
> Od: Jan Grman [mailto:janog(zv)pluto.elf.stuba.sk]
> Odesl�no: 13. listopadu 2000 10:41
> Komu: delphi-l(zv)fwd(tec)cz
> P�edm�t: Re: Vyber podmnoziny riadkov
>
>
> Ahoj,
> samozrejme poznam konstrukciu TOP n (prvyvh n riadkov),
> mal som na mysli nieco podobne ako je uvedene v tejto
> odpovedi s tym, ze:
> a) bude to napriklad STORED PROCEDURA ktora vykona ten SELECT
> b) z toho VYSLEDKU vrati len urcenu skupinu (napr. 20
> riadkov, teda aj zo
> stredu)
>
> Otazka pre mna bola (i ked polozena bola vseobecne, co ked
> nahodou existuje
> nieco ine):
> a) ci to ide pouzitim konstrukcie CURSOR
> b) ci to treba hodit do TEMP tabulky, v nej urobit poradove
> cislo a potom to
> nejak jednoducho vybrat
>
> Asi sa do toho pustim sam, len som chcel vediet ci to uz
> niekto nerobil nech
> sa s tym nezrdzujem.
> Inak vdaka za vsetky odpovede.
>
> JaNo.
> janog(zv)pluto.elf.stuba.sk
Network monitor
[*] Ji�� Mat�jka <jiri.matejka(zv)stemmark(tec)cz> - 13.10.2000 11:20:01
Nevite o nejakem prima zpusobu jako monitorovat sitovy provoz (z/do Internetu) na urovni TCP/IP, prip. HTTP? Nejaka komponenta, demo... Diky.
Jirka Matejka
jiri.matejka(zv)worldonline(tec)cz
---
Odchoz� zpr�va neobsahuje viry.
Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.193 / Virov� b�ze: 93 - datum vyd�n�: 19.9.2000
Network monitor
[*] Ren� Otisk - 13.10.2000 12:12:40
Hi,
Zkus se podivat na freeware TCPMon. Sleduje vlasne veskere pohyby na
portech: www.winroute(tec)cz
Sroub
Nevite o nejakem prima zpusobu jako monitorovat sitovy provoz (z/do
Internetu) na urovni TCP/IP, prip. HTTP? Nejaka komponenta, demo... Diky.
Jirka Matejka
jiri.matejka(zv)worldonline(tec)cz
---
Odchoz� zpr�va neobsahuje viry.
Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.193 / Virov� b�ze: 93 - datum vyd�n�: 19.9.2000
Sprite
[*] Sula Milos <milos.sula(zv)oku-su(tec)cz> - 13.10.2000 12:14:06
Ahoj
nevite nekdo o spritech do her ktere jsou volne ke stazeni na internetu ?ulozeni formu do dfm za behu.
[*] Benes Jaroslav <JBenes(zv)cpoj(tec)cz> - 13.10.2000 12:16:03
Ahoj,
potreboval bych ulozit za behu programu vygenerovany formular do dfm
(nebo nejakeho externiho souboru podobnemu dfm). Nejvice by mi pomohl
nejaky kus kodu.
S diky, privitam kazdou radu
Jaro B.DBaware ? data-aware
[*] Als <Als.FofrsIT(zv)worldonline(tec)cz> - 13.10.2000 12:19:50
Ahoj,
Friday, November 10, 2000, 10:28:32 PM, you wrote:
>> A ja zase rikam, ze to jde i pro editaci, pokud mam moznost kontroly toho
>> jak se to do te db posle ;-)
PV> Napriklad pouzitim cached updates s TClientDataSet:
PV> http://community.borland.com/article/0,1410,20567,00.html
PV> Petr Vones, amatersky programator
my mame taky napsanou celou aplikaci (pomerne rozsahlou,SQL) pres Cached
updates a transakce s viuzitim -subj-. Osobne si myslim ze pokud
potrebujes pracovat opravdu s on-line daty tak je to nejefektivnejsi.
Vetsinovy nazor nasich uziv. je, ze pokud potrebuji porizovat velke
mnozstvi dat pak je rychlejsi vklad pres grid ve kterem nemusi vubec pouzit mouse.
D5 + Sybase Adaptive Server
PS: je to samozrejme moje osobni zkusenost. Kazdy musi zvazit co mu v
dane situaci vyhovuje.
--
S pozdravem
Ji�� Kubelka Als.FofrsIT(zv)worldonline(tec)cz
Pevna carka podruhe
[*] Tomas Vladik <tom.vladik(zv)swadvice(tec)cz> - 13.10.2000 12:50:47
> -----Puvodn� zpr�va-----
> u�ivatele Kalhous Zdenek
> Odesl�no: 13. listopadu 2000 10:14
>
>
> Pozor. Nemam to vlastnorucne vyzkouseno, ale podle informace od
> kolegy je i typ Currency vnitrne reprezentovan float cislem, form�t
> tedy asi rik� pr�ve jen to ze zvenku se to bude tvarit jako pevna
> carka se dvema des.misty a vnitrne snad je zajistena presnost
BTW: TDateTime je taky ulozen jako nejaky float.
Tady asi nejde o to, jak je to ulozeno, ale hlavni je, jak se provadeji
aritmeticke operace a zda nedojde vlivem zaokrouhlovani
k chybe typu 10e9 + 3.125 =10e9 ... tj. ze by se nam stratili drobne korunky
pri pocitani s miliardovymi castkami ...
T.
________________________________
Tom� Vlad�k
e-mail: tom.vladik(zv)swadvice(tec)cz
Jak poslat soubor
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 13.10.2000 12:50:42
From: <brant(zv)dcomm(tec)cz>
> se da spustit postak, vyplni se prijemce atd. ale bohuzel nevim, jakym
> zpusobem pridat jako prilohu ten soubor. Chtel bych totiz, aby uzivatel
Ahoj,
toto lze resit pres MAPI. Podivej se na komponentu TJvMail:
http://www.geocities.com/beckmi/jvcl.htm
http://delphi-jedi.org/Jedi:VCLCOMPONENTS
http://www.volweb(tec)cz/pvones/download/JediVCLpv.zip
Petr Vones, amatersky programator
Pevna carka podruhe
[*] Lubo Fule <fule(zv)sct.sk> - 13.10.2000 14:11:02
> Pozor. Nemam to vlastnorucne vyzkouseno, ale podle informace od
> kolegy je i typ Currency vnitrne reprezentovan float cislem, form�t
> tedy asi rik� pr�ve jen to ze zvenku se to bude tvarit jako pevna
> carka se dvema des.misty a vnitrne snad je zajistena presnost
> vypoctu na ctyri mista.
Nepravda. Typ Currency je vnutorne implementovany ako 64-bitovy integer,
pricom posledne 4 cislice su chapane ako desatinne. V pripade potreby (napr.
pri arit. operaciach v kombinacii s premennymi s pohyblivou des. ciarkov)
kompilator automaticky zabezpecuje delenie resp. nasobenie 10000. Vynatok z
helpu:
Currency is a fixed-point data type that minimizes rounding errors in
monetary calculations. It is stored as a scaled 64-bit integer with the four
least-significant digits implicitly representing decimal places. When mixed
with other real types in assignments and expressions, Currency values are
automatically divided or multiplied by 10000.
L.
DBaware ? data-aware
[*] Jiri Fait <fait(zv)jakl(tec)cz> - 13.10.2000 14:12:23
V tom pripade kdyz pouziji ADO a klasicke "DB-Aware! komponenty tak je to
vlastne v pohode? Jiri Fait
[mailto:fait(zv)jakl(tec)cz]
[mailto:ftsoft(zv)iol(tec)cz]
> -----Original Message-----
> From: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz]On
> Behalf Of Zbysek Hlinka
> Sent: Monday, November 13, 2000 10:18 AM
> To: delphi-l(zv)fwd(tec)cz
> Subject: RE: DBaware ? data-aware
>
>
> On 13 Nov 2000, at 6:49, Jiri Fait wrote:
>
> > No ale ADO prece umi pracovat s klientskym kurzorem, coz
> jsou vlastne
> > off-line data. Nebo se mylim?
>
> Nemylis. Ale rec byla (aspon jak jsem to pochopil :) o Delphi
> komponentach.
>
> > Jo, a ta kukacka pri pokusu o vykukani mych let ZDECHLA
> starim (37).
>
> Hahaha. To ja jsem slysel kukat kukacku v jendom tahu asi 12x za
> sebou (nejen tu v hodinach). Kdybych mel vse secist, byl bych
> stary jako Metuzalem. :-)
>
> > > -----Original Message-----
> > > :-) Pokud mas na mysli napriklad takovou funkcnost, ze
> > > komponenta si pripoji dataset, sosne data, a pak dokaze pracovat i
> > > pri odpojenem datasetu a vysledek umi vratit do parametru ulozene
> > > procedury (v tebou zvolenem datovem typu), kterou ji urcis (ale
> > > jejiz exec volas sam pod svou kontrolou), pak souhlasim.
> Coz vsak o
> > > komponentach v zalozce Data Controls nelze rict ani omylem.
>
> S pozdravem
>
> Zbysek Hlinka
>
> Phones: 02/795 29 56; GSM: 0603 551 282
> Krystofova 1016, 149 00 Praha 4
> CZ
>
> ---
> Poichozi zprava neobsahuje viry.
> Zkontrolovano antivirovym systemem AVG (http://www.grisoft(tec)cz).
> Verze: 6.0.198 / Virova baze: 95 - datum vydani: 4.10.2000
>
---
Odchozi zprava neobsahuje viry.
Zkontrolovano antivirovym systemem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.198 / Virova baze: 95 - datum vydani: 4.10.2000