Archív konference Delphi
Zpět na výběr roku archívu nebo přejít na fulltextové vyhledávání v konferenci.
print sluzba
[*] Jan Novak <delfin4(zv)volny(tec)cz> - 18.7.2005 10:17:34
> objekt kteremu predam soubor a on mi ho vytiskne ..
V tom souboru je co? Primo retezec povelu pro nejakou konkretni
(Epson?) tiskarnu? Nebo JPG obrazek? Nebo formatovany dokument, treba
.RTF? Od toho se pak odviji dalsi dotazy: Tiskarna se ma vybirat z
lokalnich (LPT COM, USB) nebo sitovych? Jak se maji urcit dalsi
parametry tisku: orientace stojato/lezato, pocet kopii atd.
Jinak soubor staci proste nakopirovat. Treba tak, ze nechas vykonat
ShellExecute prikaz 'copy SOUBOR LPT1:'. Ale obavam se, ze tvuj
problem to nevyresi.print sluzba
[*] david.kopecek(zv)hacktrack(tec)com - 18.7.2005 08:05:20
zDRAVIM Konferenci,
poradil by mi nekdo jak v delphi realizovat tisk na tiskarnu. V
podstate potrebuji nejaky objekt kteremu predam soubor a on mi ho
vytiskne ..
Thx David
spocitanie podielu
[*] Bc. Jiri Cincura <diskuze(zv)cincura(tec)net> - 17.7.2005 19:14:06
Milan Dvorak wrote (on Friday, July 15, 2005 4:41 PM):
> Na nejvetsi spolecny delitel (NSD) je tzv. eukliduv algoritmus:
>
> while A<>B do
> if A>B then a := a - b
> else b := b-a;
No rychlejsi je jeste (pisu z hlavy, takze radsi otestovat, hlavne podminky,
ale myslim, ze je to OK):
function NSD(a, b: extended): extended;
var
pom: extended;
begin
repeat
a := a - b * Trunc(a / b);
pom := a;
a := b;
b := pom;
until b = 0;
NSD := a
end;
--
Bc. Jiri Cincura
http://www.ID3renamer.com/
ICQ: 314711544; Yahoo!: x2develop
http://photo.cincura.net/Jedna transakce pres dve databaze FireBird
[*] Slavomir Skopalik <skopalik(zv)elektlabs(tec)cz> - 16.7.2005 18:10:24
> Muzu se zeptat jak casto a jak se to ma delat ? - Jde to i
> nejak automaticky
> napr. z programu, jsou tam nejaka uskali ?
Delam to v radu tydnu (tj asi tak jednou za 3-10 tydnu),
pouzivam gfix a delam to rucne, automaticky me to nikdy nenapadlo.
Pokud to pujde jinak, rez to jinak.
Slavek
Jedna transakce pres dve databaze FireBird
[*] Tomas Bradle <t.bradle(zv)sanet(tec)cz> - 16.7.2005 17:50:22
Muzu se zeptat jak casto a jak se to ma delat ? - Jde to i nejak automaticky
napr. z programu, jsou tam nejaka uskali ?
diky
Tomas Bradle
t.bradle(zv)sanet(tec)cz
t.bradle(zv)worldonline(tec)cz
----- Original Message -----
From: "Slavomir Skopalik" <skopalik(zv)elektlabs(tec)cz>
To: <delphi-l(zv)clexpert(tec)cz>
Sent: Friday, July 15, 2005 10:04 PM
Subject: Re: Jedna transakce pres dve databaze FireBird
> Ano, mam.
> Je to jednoduche, na datamodul das jednu transakci a dve DB,
> u DB nastavis jako transakci tuto transakci.
> U query si pak vyberes nad kterou DB ma jet.
> Ale priprav se na pravidelne "fixovani" limbo transakci.
>
> Slavek
>
>> potrebuji provest transakci pres dve databaze
>> ma s tim nekdo zkusenost?
>
>
>
Jedna transakce pres dve databaze FireBird
[*] Slavomir Skopalik <skopalik(zv)elektlabs(tec)cz> - 15.7.2005 22:04:59
Ano, mam.
Je to jednoduche, na datamodul das jednu transakci a dve DB,
u DB nastavis jako transakci tuto transakci.
U query si pak vyberes nad kterou DB ma jet.
Ale priprav se na pravidelne "fixovani" limbo transakci.
Slavek
> potrebuji provest transakci pres dve databaze
> ma s tim nekdo zkusenost?Delphi 2005 - pomaly start a vsechno
[*] spravce(zv)dh-soft(tec)cz - 15.7.2005 16:56:38
Lepe je pouzit XP. Bez problemu i se SP2
D.
-----Original Message-----
From: delphi-l-owner(zv)clexpert(tec)cz [mailto:delphi-l-owner(zv)clexpert(tec)cz] On
Behalf Of Jan Harman
Sent: Friday, July 15, 2005 2:34 PM
To: delphi-l(zv)clexpert(tec)cz
Subject: Delphi 2005 - pomaly start a vsechno
Zdravim vsechny,
jen by me zajimalo jak jste natom vy.
Mam nainstalovany W2000.
Doted jsem pouzival Delphi 6, chodi to celkem pruzne, skoro zadne
prodlevy v nicem. Ted zacinam pracovat s Delphi 2005 a nemuzu se
dockat niceho. Start trva asi 20 sekund, a vse (uplne vse) je
hrozne pomale. Jak to bezi vam?
Diky.
Honza
--
Revolucni vysokorychlostni INTERNET jen za nizky mesicni pausal 399
Kc. Navic aktivace ZDARMA! Vice na http://www.revolucniinternet(tec)cz
spocitanie podielu
[*] Milan Dvorak <dvorak(zv)gymzn(tec)cz> - 15.7.2005 16:40:36
Na nejvetsi spolecny delitel (NSD) je tzv. eukliduv algoritmus:
while A<>B do
if A>B then a := a - b
else b := b-a;
Nejmensi spolecny nasobek (nsn) spocitas podle vztahu: nsn(a,b) = a*b/NSD(a, b).
Pak pouzijes vztahy pro soucet zlomku jak se uci uz na zakl. skole. Ale stejne to budes mit zatizene zaokrouhlovacima chybama.
Milan Dvorak
>>> brant(zv)dcomm(tec)cz 15.7.2005 13:38 >>>
Pokud potrebujes najit nejmensi spolecny jmenovatel, lze pouzit Eukliduv
algoritmus, ktery vychazi z toho, ze spolecny delitel cisel A, B je
stejny jako spolecny delitel cisel A-B a B (musi byt ovsem A >= B). Z
toho se spocita nejvetsi spolecny delitel a pak i nejmensi spolecny
nasobek neboli jmenovatel. Implementaci najdes na webu urcite furu nebo
si to muzes napsat sam.
RNDr. Petr Brant [brant(zv)dcomm(tec)cz]
neviem niekto mi vravel ze by to malo ist ze sa najde prvocislo a potom
sa
nejak vyrata spolocny menovatel, ale namam sajnu ako by som to spravil,
neviete niekto ?
> tak si urob vlastny typ na zlomky, nieco ako
> record (citatel, menovatel) a pocitaj to tak,
> ako tie zlomky scitavas na papieri,
> vysledok potom pripadne vydel statdardne.
> B.
>
>
> zdravim, ako spocitavate podiely napr nieco ako 1/3+1/3+1/3. Ak to
urobim
> delenim a naslednym spocitanim ta k neda 1/1 z dovodu ze operuje s
cislom
s
> urcitym poctom des. miest. A podiely mozu byt aj ovela ulozitejsie
napr
> 14579/478954 alebo 1/4789654. Ako by ste spocitali aby to robil
korektne
a
> spocital to na 1 a nie 0,99999998 ?
> dakujem
Jedna transakce pres dve databaze FireBird
[*] M.Hostinsky <miroslav.hostinsky(zv)worldonline(tec)cz> - 15.7.2005 16:32:35
Ahoj,
potrebuji provest transakci pres dve databaze
ma s tim nekdo zkusenost?
poradte
Diky Mira
Windows XP Embeded
[*] Frantisek Mlcoch <frantisek.mlcoch(zv)vsb(tec)cz> - 15.7.2005 16:26:35
Ma nekdo zkusenosti s vytvarenim aplikaci v Delphi pro systemy zalozene na
Windows Embeded?
Je na to treba mit nejakou nejnovejsi verzi Delphi nebo staci i sestka?
Prosim o jakekoliv informace.
Diky F.
Delphi 2005 - pomaly start a vsechno
[*] Petr Vones <konference(zv)petrvones(tec)net> - 15.7.2005 15:36:31
From: "Dalibor Toman" <dtoman(zv)fortech(tec)cz>
> ma na svedomi cele to zpomaleni a narocnost. Testy jsem provadel na
> nejake trial verzi co se objevila po uvolneni D2000 - mozna ze ted jiz
> existuji opravy resici tyto problemy ?
Ted uz je asi treti update kde jsou tyto chyby (Win32 memory leaky) postupne
opravovany. Je treba si uvedomit ze jde vlaste o zcela nove IDE.
Co se tyce rychlosti startu tak mam k dispozici reseni ktere zkrati start
az na polovinu (dle hw konfigurace) bez ztraty funkce, tedy nejde o nejake
odstranovani balicku. Nicmene je zalozeno na modifikaci RTLx.BPL coz by se
asi prilis nelibilo Borlandu ;-) a zaroven obchazi kontrolu duplicity unit
v baliccich coz muze v krajnim pripade zpusobit nepredvidatlene chyby pokud
nekdo vyrobi "chybny" balicek.
Petr Vones
Delphi 2005 - pomaly start a vsechno
[*] Dalibor Toman <dtoman(zv)fortech(tec)cz> - 15.7.2005 15:12:29
Jan Harman <jharman(zv)volny(tec)cz> wrote:
> Zdravim vsechny,
> jen by me zajimalo jak jste natom vy.
> Mam nainstalovany W2000.
> Doted jsem pouzival Delphi 6, chodi to celkem pruzne, skoro zadne
> prodlevy v nicem. Ted zacinam pracovat s Delphi 2005 a nemuzu se
> dockat niceho. Start trva asi 20 sekund, a vse (uplne vse) je
> hrozne pomale. Jak to bezi vam?
kdyz jsem je testoval tak jsem usoudil ze na systemu s mene nez 1GB
pameti to nema smysl provozovat. Pokus nacist/konvertovat projekt z D7
dost casto koncil zatuhnutim D2000 a vyzobanim veskere voklne pameti
(700MB+). Nektere nove vlastnosti by se mi libily/hodily ale bohuzel
je krome toho pritazeno (z meho pohledu) prilis mnoho balastu - ktery
ma na svedomi cele to zpomaleni a narocnost. Testy jsem provadel na
nejake trial verzi co se objevila po uvolneni D2000 - mozna ze ted jiz
existuji opravy resici tyto problemy ?
D. Toman
Delphi 2005 - pomaly start a vsechno
[*] Jan Harman <jharman(zv)volny(tec)cz> - 15.7.2005 14:34:26
Zdravim vsechny,
jen by me zajimalo jak jste natom vy.
Mam nainstalovany W2000.
Doted jsem pouzival Delphi 6, chodi to celkem pruzne, skoro zadne
prodlevy v nicem. Ted zacinam pracovat s Delphi 2005 a nemuzu se
dockat niceho. Start trva asi 20 sekund, a vse (uplne vse) je
hrozne pomale. Jak to bezi vam?
Diky.
Honza
--
Revolucni vysokorychlostni INTERNET jen za nizky mesicni pausal 399
Kc. Navic aktivace ZDARMA! Vice na http://www.revolucniinternet(tec)cz
Synaser - COM port - nepodari se otevrit port, pok
[*] Ing. Jiri SOKOL <js-delphi(zv)seznam(tec)cz> - 15.7.2005 14:18:25
Ahoj vsem!
Prosim, nesetkal jste se nekdo s problemem:
- mam aplikaci, ktera si otvre COM port, zahaji komunikace s HW, vysledky zpracuje a ulozi do FB 1.5.2
- bezproblemu nam bezi na vsech Win9x-WinXPProf
- ted se u jednoho zakaznika objevil problem a sice:
- nainstalovali jsme aplikaci pod jeho admin pravy na ucte u PC - aplikace bezproblemu bezi
- prihlasil se do site, kde jiz nema prava admina - aplikace hlasi, ze se ji nepodarilo otevrit COM port
- prihlasi se k jeho PC administrator site a tomu vse bezi OK
- nastavili jsme docasne max prava uzivateli a po prihlaseni do site vse jede
- odinstaovali jsme aplikaci, a s max. pravy jsme ji instalovali na PC pres sitovy ucet - sjednotili jsme login a password uzivatele site a lokalniho PC - vse beha - i po odebrani prav
- zkousel jsem vytvorit uzivatele primo jen pro to PC (skupina user nebo Power user) a ten neotevre COM port
To lokalni PC ma WinXP Prof + SP1, disk je s FAT32 - do registru nase aplikace nepise.
Muzete mi nekdo rict, co se deje? Nesetkal jste se s tim nekdo? Ono jde uzivatelum zakazat pristup na port? JAK???
Dekuji a preji hezky vikend!
Jirka
spocitanie podielu
[*] Ludek Finstrle <ludek.finstrle(zv)pzkagis(tec)cz> - 15.7.2005 13:46:22
> neviem niekto mi vravel ze by to malo ist ze sa najde prvocislo a potom sa
> nejak vyrata spolocny menovatel, ale namam sajnu ako by som to spravil,
> neviete niekto ?
Eukliduv algoritmus pro nejvetsi spolecny delitel nsd(A,B) vypada
nasledovne:
pro A > B
A = m1 * B + r1
B = m2 * r1 + r2
r1 = m3 * r2 + r3
...
rn-1 = mn * rn
, kde mN jsou prirozena cisla > 1, rN jsou prirozena cisla
a rn je nejvetsi spolecny delitel A a B.
Luf
spocitanie podielu
[*] Petr Brant <brant(zv)dcomm(tec)cz> - 15.7.2005 13:38:20
Pokud potrebujes najit nejmensi spolecny jmenovatel, lze pouzit Eukliduv
algoritmus, ktery vychazi z toho, ze spolecny delitel cisel A, B je
stejny jako spolecny delitel cisel A-B a B (musi byt ovsem A >= B). Z
toho se spocita nejvetsi spolecny delitel a pak i nejmensi spolecny
nasobek neboli jmenovatel. Implementaci najdes na webu urcite furu nebo
si to muzes napsat sam.
RNDr. Petr Brant [brant(zv)dcomm(tec)cz]
neviem niekto mi vravel ze by to malo ist ze sa najde prvocislo a potom
sa
nejak vyrata spolocny menovatel, ale namam sajnu ako by som to spravil,
neviete niekto ?
> tak si urob vlastny typ na zlomky, nieco ako
> record (citatel, menovatel) a pocitaj to tak,
> ako tie zlomky scitavas na papieri,
> vysledok potom pripadne vydel statdardne.
> B.
>
>
> zdravim, ako spocitavate podiely napr nieco ako 1/3+1/3+1/3. Ak to
urobim
> delenim a naslednym spocitanim ta k neda 1/1 z dovodu ze operuje s
cislom
s
> urcitym poctom des. miest. A podiely mozu byt aj ovela ulozitejsie
napr
> 14579/478954 alebo 1/4789654. Ako by ste spocitali aby to robil
korektne
a
> spocital to na 1 a nie 0,99999998 ?
> dakujem
spocitanie podielu
[*] mato <mato.tino(zv)inmail.sk> - 15.7.2005 13:12:16
neviem niekto mi vravel ze by to malo ist ze sa najde prvocislo a potom sa
nejak vyrata spolocny menovatel, ale namam sajnu ako by som to spravil,
neviete niekto ?
> tak si urob vlastny typ na zlomky, nieco ako
> record (citatel, menovatel) a pocitaj to tak,
> ako tie zlomky scitavas na papieri,
> vysledok potom pripadne vydel statdardne.
> B.
>
>
> zdravim, ako spocitavate podiely napr nieco ako 1/3+1/3+1/3. Ak to urobim
> delenim a naslednym spocitanim ta k neda 1/1 z dovodu ze operuje s cislom
s
> urcitym poctom des. miest. A podiely mozu byt aj ovela ulozitejsie napr
> 14579/478954 alebo 1/4789654. Ako by ste spocitali aby to robil korektne
a
> spocital to na 1 a nie 0,99999998 ?
> dakujem
Exception' XSQLDA index out of range' pri zapisu n
[*] Jaroslav Uher <jarek(zv)iuher(tec)cz> - 15.7.2005 12:42:13
On 15 Jul 2005 at 10:16, Tomas Krejzek wrote:
> Ahoj, mam problem s komponentou IBQuery, tipoval bych ze se jedna i o
> problem s borladim stringem. Problem se vyskytuje kdyz zapisuju do
> databaze retezce obsahujici ', ", `, nejhorsi je ze se to chova
> malinko nahodne, tj. ze nektere retezce to zapise bez problemu a
> nekolik malo ne, zatim se mi nepovedlo zjistit jakoukoliv logickou
> spojitost mezi temi co selzou. To ze misto ' musim zapisovat '' vim a
> zdvojuji je.
>
> Nemate s tim nekdo zkusenost? Nevite jak to odstranit?
> Dotaz je 100% spravne, protoze kdyz si z IDE zkopiruju text zapisovany
> pres IBQuery a zadam ho do IBExperta tak se to ulozi a neni s tim
> nejmensi problem.
zkousel jsi AnsiQuotedStr ?
Ale ja preferuji parametry...
Jarek Uher
Firebird a skript modifikujici databazi
[*] Jaroslav Uher <jarek(zv)iuher(tec)cz> - 15.7.2005 12:42:13
On 15 Jul 2005 at 11:22, t.bradle(zv)sanet(tec)cz wrote:
> chci si udelat pri kazde modifikaci databaze skript, ktery mi u vsech
> zakazniku provede update struktury. Je mozne napr. ALTER TABLE ADD
> COL24 INTEGER nejak podminit, aby se neprovadel, kdyz ten sloupecek
> jiz v databazi existuje ? Klasicky if (not exists(select * from
> RDB$RELATION_FIELDS ... mi nefunguje. Nevite nekdo jestli se to neda
> udelat nejak jinak v ramci jednoho skriptu?
my to resime jednoduchou tabulkou, viz
CREATE TABLE UPRAVY_INFO
(
ID DM_ID,
DATUM DATE,
POPIS_ZMEN VARCHAR(8192) CHARACTER SET WIN1250,
VERZE_EXE VARCHAR(20) CHARACTER SET WIN1250,
DEL DM_SI0,
AUTOR_UPRAV VARCHAR(20) CHARACTER SET WIN1250,
LAST_UPDATE DM_USER_TIMESTAMP,
PRIMARY KEY (ID)
);
a potom jen staci dotaz na verzi ktera je kontrolovana s verzi
aplikace (mimo Build).
A 'je vymalovano' :-)
Jarek Uher
Zatizeni procesoru
[*] Robert Suska <robert.suska(zv)fnusa(tec)cz> - 15.7.2005 12:22:12
Ahoj
Na tejto stranke je super unit http://www.aldyn.ru/products/index.html vola
sa to AdCpuUsage.
Robert, cau
>
Ahoj, jak z Delphi zjistim zatizeni procesoru? Potrebuji to zjistovat
prubezne. Dekuji
Firebird a skript modifikujici databazi
[*] Pavel Malinsky <malinsky(zv)pmcom(tec)cz> - 15.7.2005 12:18:11
> -----Original Message-----
> From: delphi-l-owner(zv)clexpert(tec)cz
Ahoj,
> chci si udelat pri kazde modifikaci databaze skript, ktery mi
> u vsech zakazniku provede update struktury. Je mozne napr.
> ALTER TABLE ADD COL24 INTEGER nejak podminit, aby se
> neprovadel, kdyz ten sloupecek jiz v databazi existuje ?
Vrele doporucuji DatabaseComparerVCL . Za ty prachy nestoji
se s tim psat.
http://clevercomponents.com/products/dbcomparer/dbcomparer.asp
S pozdravem a dikem
=====================================
> Pavel Malinsky; malinsky(zv)pmcom(tec)cz <
=====================================
> GSM: 602 652 203 | ICQ: 322015967 <
=====================================
Zatizeni procesoru
[*] Dalibor <dalibor(zv)torola(tec)cz> - 15.7.2005 12:10:10
Ahoj, jak z Delphi zjistim zatizeni procesoru? Potrebuji to zjistovat prubezne. Dekuji
D7Prof, W2000
Firebird a skript modifikujici databazi
[*] t.bradle(zv)sanet(tec)cz - 15.7.2005 11:22:07
Zdravim vsechny,
chci si udelat pri kazde modifikaci databaze skript, ktery mi u vsech zakazniku provede update struktury. Je mozne napr. ALTER TABLE ADD COL24 INTEGER nejak podminit, aby se neprovadel, kdyz ten sloupecek jiz v databazi existuje ? Klasicky if (not exists(select * from RDB$RELATION_FIELDS ... mi nefunguje. Nevite nekdo jestli se to neda udelat nejak jinak v ramci jednoho skriptu?
diky
Tomas Bradle
t.bradle(zv)sanet(tec)cz
Problem s dataseparator
[*] Milan Lucka <mlucka(zv)foxconn(tec)cz> - 15.7.2005 10:22:03
Zdravim,
neviem ako v Delphi3, ale v Delphi5 v helpe pre "Currency and date/time formatting variables" najdete v popise toto:
The Sysutils unit includes a number of variables that are used by various formatting routines. Values are assigned to these variables to define the formats of numeric and date/time strings. The initial values of these variables are fetched from the system registry using the GetLocaleInfo function in the Win32 API. VCL (non-console) applications automatically update these formatting variables in response to WM_WININICHANGE messages. The Application variable's UpdateFormatSettings method either allows or disallows changes in system settings. The default is True. Set this property to False to prevent the system settings from changing.
Takze si treba uvedomit, ze tieto premenne pri defaultnom nastaveni UpdateFormatSettings nemusia byt nemenne pocas behu aplikacie. Potom mozu byt ovplyvnovane inymi aplikaciami sucasne beziacimi a to v roznych momentoch. Potom vasa aplikacia moze chvilu konvertovat ten isty datum v pohode a zrazu konverzia toho isteho datumu zahuci...a je z toho hlavybolenie.
Takze ak v Delphi3 existuje UpdateFormatSettings, potom ho nastavte urcite na FALSE.
Na zaver moj nazor:
Aplikaciu nesmiem budovat stavebnymi dielmi zavislymi od lokalneho nastavenie, pretoze o lokalnom nastaveni dopredu neviem nic :-((.
Prijemny den prajem
Milan
> Mam dva webeve servery s touto konfiguraci:
>
> Windows 2000 Server SP4
> MSJVM 5.00.3810
> Oracle Client 8.1.7.4.1
> Netscape Directory Server (LDAP) V5.1 SP2
> Sun ONE Web Server V6.1 SP4
> jakarta-tomcat-3.3a
>
> Na obou serverech je nastaveno:
> Control Panel- Regional Options +IBM- Date +IBM- Date separator = /
>
> Na obou serverech se spousti servlety napsan+AOk- v DELPHI
> 3, ktere volaj+AO0- funkci
>
> StrToDate('01/01/1971')
>
> Na jednom serveru volani funkce probiha bez problemu, ale na
> druhem funkce jde
> do vyjimky, a kdyz jsem to zkoumal zjistil jsem ze v Delphi
> prebira ze systemu
> nastaveni Dateseparator='.'
> Lze to osetrit primo v programu nastavenim
> dateseperator:='/', ale stejne
> nechapu, kde se mi na tom jednom serveru ta hodnota zmeni.
> Servery nebyly delany
> soucasne, takze je mozne, ze nejsou nakonfigurovany uplne
> stejne, i kdyz by
> mely byt.
> Nevite jestli je mozne, ze je tam jeste nekde nejake
> nastaveni dateseparator,
> ktere by mohlo prebijet nastaveni v Control panel?
>
> Diky
>
> Radek Bernatek
>
>
>
>
Exception' XSQLDA index out of range' pri zapisu n
[*] Tomas Krejzek <tomas.krejzek(zv)kpsys(tec)cz> - 15.7.2005 10:16:02
Ahoj, mam problem s komponentou IBQuery, tipoval bych ze se jedna i o
problem s borladim stringem.
Problem se vyskytuje kdyz zapisuju do databaze retezce obsahujici ', ",
`, nejhorsi je ze se to chova malinko nahodne, tj. ze nektere retezce to
zapise bez problemu a nekolik malo ne, zatim se mi nepovedlo zjistit
jakoukoliv logickou spojitost mezi temi co selzou.
To ze misto ' musim zapisovat '' vim a zdvojuji je.
Nemate s tim nekdo zkusenost? Nevite jak to odstranit?
Dotaz je 100% spravne, protoze kdyz si z IDE zkopiruju text zapisovany
pres IBQuery a zadam ho do IBExperta tak se to ulozi a neni s tim
nejmensi problem.
Diky moc Tom
PasDoc - problem s komentarem
[*] Ales Pavel <aldik(zv)quick(tec)cz> - 15.7.2005 10:12:01
geeebi ty jsi proste uzasny.....:-D ja to stale hledat pod private a ono
to shodou okolnosti je trochu jinak:-D
Lukas Gebauer napsal(a):
>>No ja mam zase problem s vygenerovanim dokumentace nejdou mi
>>vygenerovat fce PRIVATE u classy...ani jeji promenne, treba je to
>>ucel...da se to nejak nastavit?
>>
>>
>
>viz:
>http://pasdoc.sipsolutions.net/IncludeByVisibility
>
>
>
>
PasDoc - problem s komentarem
[*] Lukas Gebauer <gebylist(zv)mlp(tec)cz> - 15.7.2005 09:47:59
> No ja mam zase problem s vygenerovanim dokumentace nejdou mi
> vygenerovat fce PRIVATE u classy...ani jeji promenne, treba je to
> ucel...da se to nejak nastavit?
viz:
http://pasdoc.sipsolutions.net/IncludeByVisibility
--
Lukas Gebauer.
E-mail: gebauerl(zv)mlp(tec)cz
http://www.ararat(tec)cz/synapse/ - Ararat Synapse - TCP/IP Lib.Problem s dataseparator
[*] Petr Brant <brant(zv)dcomm(tec)cz> - 15.7.2005 10:00:00
Pokud muzes do toho programu zasahnout, tak bych namisto StrToDate
pouzil EncodeDate a EncodeTime, tim se da problem dobre obejit a neni to
zavisle na narodnim nastaveni.
RNDr. Petr Brant [brant(zv)dcomm(tec)cz]
Mam dva webeve servery s touto konfiguraci:
Windows 2000 Server SP4
MSJVM 5.00.3810
Oracle Client 8.1.7.4.1
Netscape Directory Server (LDAP) V5.1 SP2
Sun ONE Web Server V6.1 SP4
jakarta-tomcat-3.3a
Na obou serverech je nastaveno:
Control Panel- Regional Options +IBM- Date +IBM- Date separator = /
Na obou serverech se spousti servlety napsan+AOk- v DELPHI 3, ktere
volaj+AO0- funkci
StrToDate('01/01/1971')
Na jednom serveru volani funkce probiha bez problemu, ale na druhem
funkce jde
do vyjimky, a kdyz jsem to zkoumal zjistil jsem ze v Delphi prebira ze
systemu
nastaveni Dateseparator='.'
Lze to osetrit primo v programu nastavenim dateseperator:='/', ale
stejne
nechapu, kde se mi na tom jednom serveru ta hodnota zmeni. Servery
nebyly delany
soucasne, takze je mozne, ze nejsou nakonfigurovany uplne stejne, i
kdyz by
mely byt.
Nevite jestli je mozne, ze je tam jeste nekde nejake nastaveni
dateseparator,
ktere by mohlo prebijet nastaveni v Control panel?
Problem s dataseparator
[*] Radek Bernatek <rbernatek(zv)seznam(tec)cz> - 15.7.2005 09:45:58
Ahoj,
posilam to jeste jednou, ted bez cestiny.
Mam dva webeve servery s touto konfiguraci:
Windows 2000 Server SP4
MSJVM 5.00.3810
Oracle Client 8.1.7.4.1
Netscape Directory Server (LDAP) V5.1 SP2
Sun ONE Web Server V6.1 SP4
jakarta-tomcat-3.3a
Na obou serverech je nastaveno:
Control Panel- Regional Options +IBM- Date +IBM- Date separator = /
Na obou serverech se spousti servlety napsan+AOk- v DELPHI 3, ktere volaj+AO0- funkci
StrToDate('01/01/1971')
Na jednom serveru volani funkce probiha bez problemu, ale na druhem funkce jde
do vyjimky, a kdyz jsem to zkoumal zjistil jsem ze v Delphi prebira ze systemu
nastaveni Dateseparator='.'
Lze to osetrit primo v programu nastavenim dateseperator:='/', ale stejne
nechapu, kde se mi na tom jednom serveru ta hodnota zmeni. Servery nebyly delany
soucasne, takze je mozne, ze nejsou nakonfigurovany uplne stejne, i kdyz by
mely byt.
Nevite jestli je mozne, ze je tam jeste nekde nejake nastaveni dateseparator,
ktere by mohlo prebijet nastaveni v Control panel?
Diky
Radek Bernatek
PasDoc - problem s komentarem
[*] Ales Pavel <aldik(zv)quick(tec)cz> - 15.7.2005 09:39:57
No ja mam zase problem s vygenerovanim dokumentace nejdou mi
vygenerovat fce PRIVATE u classy...ani jeji promenne, treba je to
ucel...da se to nejak nastavit?
Ales Pavel
Lukas Gebauer napsal(a):
>>pro tvorbu dokumentace pouzivam PasDoc a mam nasledujici problem -
>>nejsem schopen vygenerovat viceradkovy popisek.
>>
>>
>
>Odradkovani se vklada jen kdyz mas v komentari prazdny radek! Jinaks
>e to bere jako jeden odstavec. tedy zkus:
>
>{/
>(zv)abstract(Poskytuje funkce pro praci s .....)
>Text ..................
>
>gfdgjdfskglsgldsfl
>}
>
>
>
Problem s dataseparator
[*] Radek Bernatek <rbernatek(zv)seznam(tec)cz> - 15.7.2005 09:29:55
Ahoj,
m+AOE-m dva webev+AOk- servery s touto konfiguraci:
Windows 2000 Server SP4
MSJVM 5.00.3810
Oracle Client 8.1.7.4.1
Netscape Directory Server (LDAP) V5.1 SP2
Sun ONE Web Server V6.1 SP4
jakarta-tomcat-3.3a
Na obou serverech je nastaveno:
Control Panel- Regional Options +IBM- Date +IBM- Date separator = /
Na obou serverech se spousti+AO0- servlety napsan+AOk- v DELPHI 3, kter+AOk- volaj+AO0- funkci :
StrToDate('01/01/1971')
Na jednom serveru volani funkce probiha bez problemu, ale na druh+AOk-m funkce jde do vyjimky, a kdy+AX4- jsem to zkoumal zjistil jsem +AX4-e v Delphi prebira ze systemu nastaveni Dateseparator='.'
Lze to osetrit primo v programu nastavenim dateseperator:='/', ale stejne nechapu, kde se mi na tom jednom serveru ta hodnota zmeni. Servery nebyly delany soucasne, takze je mozne, ze nejsou nakonfigurovany uplne stejne, i kdyz by mely byt.
Nevite jestli je mozne, ze je tam jeste nekde nejake nastaveni dateseparator, ktere by mohlo prebijet nastaveni v Control panel?
Diky
Radek Bernatek
Podminka v Selectu podle dat. typu DATE
[*] Michal Kolisek <michal.kolisek(zv)asei(tec)cz> - 15.7.2005 06:57:43
Hezke dopoledne,
chyba je nejspis v predavani jako datetime, pak se ti dotahne i hodinova
cast k datumu a nejspis mas v databazi datum ulozeny bez ni, takze se ti to
nerovna. Zkus si parametr predat jen jako asdate, nebo pomoci
formatdatetime() si odsekni hodinovou cast, kdyz si ho predavas...
M.Kolisek
> Zdravim vsechny,
> mam nejspis jeden zacatecnickej...
> Pokud v podmince nize mam (datum > :p4) probehne SELECT bez problemu.
> Pokud zadam
> do podminky (datum = :p4), dostanu prazdnou mnozinu zaznamu...
Podminka v Selectu podle dat. typu DATE
[*] petr palicka <palicka.petr(zv)seznam(tec)cz> - 14.7.2005 20:14:59
Ahoj,
Lada napsal(a):
> Pokud v podmince mam (datum > :p4) probehne SELECT bez problemu.
> Pokud zadam do podminky (datum = :p4), dostanu prazdnou mnozinu zaznamu...
asi nemas ten datum "cistej", ale vcetne casu. Zkus nejprve datum
uriznout na celistvou cast. pouzij:
xxxx.AsDate:=int(datetimepicker.date);
Peca
Podminka v Selectu podle dat. typu DATE
[*] Lada <lada.xt(zv)volny(tec)cz> - 14.7.2005 19:18:55
Zdravim vsechny,
mam nejspis jeden zacatecnickej...
Pokud v podmince nize mam (datum > :p4) probehne SELECT bez problemu.
Pokud zadam
do podminky (datum = :p4), dostanu prazdnou mnozinu zaznamu...
zkousel jsem i
IBQuery2.ParamByName('p4').AsDatetime := dttmDatum.Datetime;.. bez
vysledku..
jinak dttmDatum je komponenta DateTimePicker
a v databazi FB je pole 'Datum'typu Date... IBQuery2.SQL.Add('Select Placeno, Firma, Stredisko, Cislo_fakt, Cena,
Datum,'+
'Splatnost, Poznamka, ID from Faktury');
IBQuery2.SQL.Add('Where (UPPER (Firma Collate PXW_CSY) LIKE :p1) and'+
'(UPPER (Cislo_fakt Collate PXW_CSY) LIKE :p2)
and'+
'(Cena LIKE :p3) and (datum = :p4) and'+
'(Splatnost > :p5) Order by ID');
IBQuery2.ParamByName('p1').AsString :=
'%'+AnsiUpperCase(editFirma1.Text)+'%';
IBQuery2.ParamByName('p2').AsString :=
'%'+AnsiUpperCase(editCFA.Text)+'%';
IBQuery2.ParamByName('p3').AsString := editCena.Text +'%';
IBQuery2.ParamByName('p4').AsDate := dttmDatum.Date;
IBQuery2.ParamByName('p5').AsDate := dttmSplatnost.Date;
Dekuju moc za radu,
Lada
OpenXML - vytvareni DOMu
[*] Jiri Matejka <matejka(zv)stemmark(tec)cz> - 14.7.2005 16:46:45
Zdar,
pouzivam OpenXML (verze 3.1.18) k praci s XML. Narazil sem na problem pri
vytvareni DOMu - chtel sem pouzit metody TdomDocument.CreateElement k
vytvoreni uzlu, ale Delphi se tvari ze CreateElement vubec nezna (stejne tak
napr. CreateDocument), stejne tak sem to nenasel v dokumentaci od OpenXML.
Pritom v rade examplu nalezenych na webu se s tim bezne pracuje (mozna ovsem
se starsi verzi OpenXML). Nemate s tim nekdo zkusenost?
diky
Jirka Matejka
D6Prof, W2000, OpenXML 3.1.18
spocitanie podielu
[*] brano <odber(zv)centrum.sk> - 14.7.2005 15:56:41
tak si urob vlastny typ na zlomky, nieco ako
record (citatel, menovatel) a pocitaj to tak,
ako tie zlomky scitavas na papieri,
vysledok potom pripadne vydel statdardne.
B.
mato wrote:
> zdravim, ako spocitavate podiely napr nieco ako 1/3+1/3+1/3. Ak to urobim
> delenim a naslednym spocitanim ta k neda 1/1 z dovodu ze operuje s cislom s
> urcitym poctom des. miest. A podiely mozu byt aj ovela ulozitejsie napr
> 14579/478954 alebo 1/4789654. Ako by ste spocitali aby to robil korektne a
> spocital to na 1 a nie 0,99999998 ?
> dakujem
> spocitanie podielu
[*] mato <mato.tino(zv)inmail.sk> - 14.7.2005 15:50:40
zdravim, ako spocitavate podiely napr nieco ako 1/3+1/3+1/3. Ak to urobim
delenim a naslednym spocitanim ta k neda 1/1 z dovodu ze operuje s cislom s
urcitym poctom des. miest. A podiely mozu byt aj ovela ulozitejsie napr
14579/478954 alebo 1/4789654. Ako by ste spocitali aby to robil korektne a
spocital to na 1 a nie 0,99999998 ?
dakujem
import z excelu, odbc
[*] brano <odber(zv)centrum.sk> - 14.7.2005 15:46:40
dobry den,
potreboval by som nacitat udaje z jednoduchej excelovskej tabulky.
Presiel som si konferenciu, ale aj tak by som potreboval odpovede na
zopar otazok:
stav je:
WinXP Home, Delphi7 personal edition,
nemam nainstalovany EXCEL
V ODBC Data source administrator v zalozke Drivers v zozname
nainstalovanych driverov su okrem ineho aj:
-Driver do Microsoft Excel(*.xls), 4.00.6019.00, MS Corp., ODBCJT32.DLL,
31.3.2003
-Microsoft Excel driver ... -//-
-Microsoft Excel-Treiber ... -//-
1)
je mozne cez ODBC (alebo BDE?) pristupovat ku XLS suborom aj bez
nainstalovaneho Excelu ?
2)
treba nastavovat nieco v ODBC administrator (pridat tento driver do
inych "zaloziek"? , user DSN, system DSN...), da sa to automaticky z Delphi?
3)
treba pouzit BDE ?, alebo sa da priamo cez ODBC?
treba na pouzitie nejake specialne komponenty Delphi? (nie doinstalovane
od inych firiem),
ktoru verziu Delphi minimalne potrebujem ?
4)
podrobna dokumentacia na pouzitie ODBC
- najdem na MSDN? hladat ODBC SDK?
- kde dokumentaciu k ODBC na pouzitie v Delphi ?
- pripadne ak treba BDE - najdem dokumentaciu na borland developer
network ?
dakujem
8-mi tlacitkovy JoyStick
[*] Vaclav Sazima <vaclav.sazima(zv)utilia(tec)cz> - 14.7.2005 14:54:36
Ahoj,
pro obsluho joysticku pouzivam s uspechem fci joyGetPosEx (mmsystem).
Vaclav Sazima
Venca Zaruba wrote:
> Nevite nekdo o komponentce pro JoyStick s 8 tlacitky? Pouzivam s uspechem TJvJoystick, ale ten umi "jen" 4 tlacitka, nebo nevim jak ji presvedcit o odchytu udalosti na dalsich tlacitkach.
> DIK
> Vasek Zaruba
Synapse - jak na to ?
[*] Lukas Gebauer <gebylist(zv)mlp(tec)cz> - 14.7.2005 13:40:31
> Mohl by jsi mi prosim aspon strucne naznacit, jak napsat serverovou
> aplikaci pro zrizovani "trvalych" spojeni?
No, ten tvuj obsluzny thread na serveru funguje urcite tak, ze ze
nejdrive nacte od klienta jeho pozadavek, a na jeho zaklade
vygeneruje nejaka data, ktera posle zpet klientovi. Takze staci toto
dat do smycky, ze ktere vypadnes az kdyz doslo k fyzicke chybe na
spojeni (kleint se odpojil, prerusene spojeni, atd.)
> Jak lze vlastne na serverove strane odlisit stav "klient se JEN
> pripojil" od stavu "klient uz POSILA data" ?
To vubec nepotrebujes, k cemu by to bylo dobre? Nepotrebujues to
rozlisovat, protoze kazda akce se deje na jinem socketu. Skutecnost,z
e prcihazi nejake nove spojeni, je signalizovana na naslouchacim
socketu, ktery neumi posilat zadna data. A naopakm, skutecnost, ze
prisla nejaka data signalizovana na socketu uvnitr obsluzneho
threadu, a tento socket zase neumi prijimat zadna spojeni!
--
Lukas Gebauer.
E-mail: gebauerl(zv)mlp(tec)cz
http://www.ararat(tec)cz/synapse/ - Ararat Synapse - TCP/IP Lib.8-mi tlacitkovy JoyStick
[*] Venca Zaruba <zaruba(zv)elastoform(tec)cz> - 14.7.2005 13:18:29
Zdravim vsechny
Nevite nekdo o komponentce pro JoyStick s 8 tlacitky? Pouzivam s uspechem TJvJoystick, ale ten umi "jen" 4 tlacitka, nebo nevim jak ji presvedcit o odchytu udalosti na dalsich tlacitkach.
PS:Neprogramuji hru, ale tlacitka pouzivame pro technologicke zarizeni. JS je pripojen pres USB...
DIK
(Stale nevim jak odchytit zasunuti a zakazat nepovoleneho pametoveho USB flash driver )
Prijemny zbytek dne
Vasek Zaruba
8^)
Odpojeny ADO dataset a zapis do sloupce "readonly"
[*] pilifs <pilifs(zv)seznam(tec)cz> - 14.7.2005 12:32:26
Jo, jo, tak to delam taky. Ale pripada mi to strasne kostrbate. Nejak
tak tajne jsem doufal, ze to nejakym priznakem donutim k tomu at to
akceptuje mou hodnotu.
Ze by to opravdu neslo?>zdravim
>
> my to delame tak, ze provedeme select into do #tmp tabulky a druhym
>selektem na tomtez datasetu vybereme data z te #tmp tabulky a odpojime
>ho. Pokud je polozka identity, pak k ni jeste pricitame nulu, protoze
>jinak zustane porad "readonly". A nakonec jinou instanci datasetu
>zrusime tu #tmp tabulku.
>
>pr.
> >>>
>
> //---1. vyberovy dotaz ---
> ADODataset.SQL.Text := 'SELECT * INTO #TmpTableName FROM table';
> ADODataset.ExecSQL;
>
> //---2. vyberovy dotaz ---
> ADODataset.SQL.Text := 'SELECT * FROM #TmpTableName ';
> ADODataset.Open;
> ADODataset.Database := Nil;
>
> //--- odstraneni docasne tabulky ---
> fADODataSet.Close;
> fADODataSet.SQL.Text := 'DROP TABLE ' +- lConstTmpTableName;
>
><<<<
>
>Eva +AVg-i+AWE-icov+AOE-
>
>
>
>>Pri praci si potrebuju zapsat i udaje do gridu(datasetu), ktere jsou
>>oznaceny jako "readonly" (typicky vypocitavane sloupce v selectu, nebo
>>identity), dataset mne samozrejme nepusti.
>>Zatim jsem neprisel na zpusob jak jej donutit aby mi to dovolil.
>>Prelivat do jineho dataset (ClientDataSet) se mi to nechce, kdyz mi ADO
>>umoznuje pracovat na odpojenych datech veicemene stejne.
>>
>>Poradite jak na to?
>>
>>L. Filip
>>D5 Ent., MSSQL2000, MDAC2.7
>>
>>
>>
>>
>>
>>
>>
>
>
>Odpojeny ADO dataset a zapis do sloupce "readonly"
[*] Eva =?ISO-8859-1?Q?L=7FisicovA=3F?= <eva(zv)foresta(tec)cz> - 14.7.2005 12:08:24
zdravim
my to delame tak, ze provedeme select into do #tmp tabulky a druhym
selektem na tomtez datasetu vybereme data z te #tmp tabulky a odpojime
ho. Pokud je polozka identity, pak k ni jeste pricitame nulu, protoze
jinak zustane porad "readonly". A nakonec jinou instanci datasetu
zrusime tu #tmp tabulku.
pr.
>>>
//---1. vyberovy dotaz ---
ADODataset.SQL.Text := 'SELECT * INTO #TmpTableName FROM table';
ADODataset.ExecSQL;
//---2. vyberovy dotaz ---
ADODataset.SQL.Text := 'SELECT * FROM #TmpTableName ';
ADODataset.Open;
ADODataset.Database := Nil;
//--- odstraneni docasne tabulky ---
fADODataSet.Close;
fADODataSet.SQL.Text := 'DROP TABLE ' +- lConstTmpTableName;
<<<<
Eva +AVg-i+AWE-icov+AOE-
>Pri praci si potrebuju zapsat i udaje do gridu(datasetu), ktere jsou
>oznaceny jako "readonly" (typicky vypocitavane sloupce v selectu, nebo
>identity), dataset mne samozrejme nepusti.
>Zatim jsem neprisel na zpusob jak jej donutit aby mi to dovolil.
>Prelivat do jineho dataset (ClientDataSet) se mi to nechce, kdyz mi ADO
>umoznuje pracovat na odpojenych datech veicemene stejne.
>
>Poradite jak na to?
>
>L. Filip
>D5 Ent., MSSQL2000, MDAC2.7
>
>
>
>
--
Odchoz+AO0- zpr+AOE-va neobsahuje vir
Zkontrolov+AOE-no Antivirov+AP0-m syst+AOk-mem AVG.
Verze: 7.0.336 / Virov+AOE- b+AOE-ze: 267.8.14/48 - datum vyd+AOE-n+AO0-: 13
Test Query pro zapis
[*] Dalibor Faltynek <dalibor.faltynek(zv)orgrez(tec)cz> - 14.7.2005 10:44:18
Uz to mam, dal jsem do afteropen try .. edit a podle vysledku to zobrazuji.
Dalik.
> potreboval bych poradit, jak zjistim, ze nejaka otevrena query je dostupna
> pouze pro cteni. Podle toho chci zobrazit nejake upozorneni treba v
> udalosti Query1.afteropen. Zkousel jsem RequestLive, ale to nepomohlo,
> protoze muze byt z minula nastaveno na True a query je pritom dejme tomu
> setridena, takze jen pro cteni. Pro ilustraci potreboval bych neco
> takovehoto do udalosti afteropen:
> form1.lbDBstav.Visible:=not qKarta.RequestLive;Test Query pro zapis
[*] Dalibor Faltynek <dalibor.faltynek(zv)orgrez(tec)cz> - 14.7.2005 10:34:17
Ahoj delfinci,
potreboval bych poradit, jak zjistim, ze nejaka otevrena query je dostupna
pouze pro cteni. Podle toho chci zobrazit nejake upozorneni treba v
udalosti Query1.afteropen. Zkousel jsem RequestLive, ale to nepomohlo,
protoze muze byt z minula nastaveno na True a query je pritom dejme tomu
setridena, takze jen pro cteni. Pro ilustraci potreboval bych neco
takovehoto do udalosti afteropen:
form1.lbDBstav.Visible:=not qKarta.RequestLive;
Diky za napovedu
Dalibor Faltynek
Orgrez, a. s.
tel: +420 541 613 312
fax: +420 541 613 299
e-mail: dalibor.faltynek(zv)orgrez(tec)cz
Odpojeny ADO dataset a zapis do sloupce "readonly"
[*] pilifs <pilifs(zv)seznam(tec)cz> - 14.7.2005 08:48:07
Zdravim ve spolek,
lze vyresit nejak %subjekt% ?
Stav:
Otevru si ADO dataset nastaveny na ltBatchOptimistic, odpojim
Connection. Ted necham uzivatele s daty pracovat. Po ukonecni prace
projdu vsechny editovane (pridane) radky a vlastnim mechanismem je
ulozim do DB.
Problem:
Pri praci si potrebuju zapsat i udaje do gridu(datasetu), ktere jsou
oznaceny jako "readonly" (typicky vypocitavane sloupce v selectu, nebo
identity), dataset mne samozrejme nepusti.
Zatim jsem neprisel na zpusob jak jej donutit aby mi to dovolil.
Prelivat do jineho dataset (ClientDataSet) se mi to nechce, kdyz mi ADO
umoznuje pracovat na odpojenych datech veicemene stejne.
Poradite jak na to?
L. Filip
D5 Ent., MSSQL2000, MDAC2.7
OT: Jak tisknout razene?
[*] Tomas Fajman <tomas.fajman(zv)ortex(tec)cz> - 13.7.2005 13:00:44
Cus bus snazim se vytisknout vic kopii tak aby to bylo serazene 1,2,3...
ale porad mi to leze 1,1,2,2,3,3.. Vubec to nebere v potaz
co si nastavim v Printdialogu. Nevite prosim nekdo v cem by mohl byt
problem
procedure TForm1.SomePrint;
var ADevice, ADriver, APort: array[0..255] of Char;
DeviceHandle: THandle;
DevMode: PDeviceMode;
begin
if PrintDlg1.Execute then
begin
Printer.GetPrinter(ADevice, ADriver, APort, DeviceHandle);
if DeviceHandle = 0 then
begin
Printer.PrinterIndex := Printer.PrinterIndex;
Printer.GetPrinter(ADevice, ADriver, APort, DeviceHandle);
end;
if DeviceHandle = 0 then
raise Exception.Create('Unable to initialize printer');
DevMode := GlobalLock(DeviceHandle);
{See DEVMODE in Win32.hlp for more information}
try
with DevMode^ do
begin
dmFields := dmFields or DM_COPIES;
dmCopies := PrintDlg1.Copies;
dmFields := dmFields or DM_COLLATE;
if PrintDlg1.Collate then dmCollate := DMCOLLATE_TRUE
else dmCollate := DMCOLLATE_FALSE;
end;
finally
GlobalUnlock(DeviceHandle);
end;
Printer.Title := 'Your print title';
Printer.BeginDoc;
Printer.Canvas.TextOut(0,0,'kuku');
Printer.NewPage;
Printer.Canvas.TextOut(0,0,'kuku druha');
Printer.EndDoc;
end;
end;
procedure TForm1.Button1Click(Sender: TObject);
begin
Someprint;
end;
Internal error U1158
[*] Ondrej Kelle <o.kelle(zv)digitalpublishing.de> - 13.7.2005 11:46:39
> mam velky problem.Pri kompilaci balicku mi to havaruje na
> subj.
> D5 Ent,Win XP SP2
Explanation of Internal Error
http://cc.borland.com/item.aspx?id=14778
Skontroluj si, ci mas spravne zadefinovanu hierarchiu zavislosti (requires):
ci nemas unity, ktore su 'implicitly used', alebo pouzite (contains) vo viac
ako jednom balicku.
Skus si zmazat vsetky .bpl, .dcu a .dcp toho problematickeho balicka a
vsetkych balickov, od ktorych zavisi. Skus hladat aj duplicitne subory v
inych adresaroch na disku a zmazat ich tiez.
Potom skus build kazdeho balicka v poradi podla zavislosti.
HTH
TOndrej
Internal error U1158
[*] Svoboda Jiri <jsvoboda(zv)lekis(tec)cz> - 13.7.2005 11:06:36
Zdravim,
mam velky problem.Pri kompilaci balicku mi to havaruje na subj.Nenasel jsem
zadny vhodny odkaz na netu a tak vubec netusim,co dal.Jeste nedavno to
normalne fungovalo a nejednou to nejde.
Diky.
Jiri
D5 Ent,Win XP SP2
DRAG&DROP z DbGridu
[*] Venca Zaruba <zaruba(zv)elastoform(tec)cz> - 13.7.2005 07:18:16
Zdravim
Protoze jsem linej a zastance myslenky, ze uz neco podobneho nekdo delal, mam prosbicku o nasmerovani jak nejrychleji zrealizovat toto zadani:
Pomoci D&D vybrat z mrizky zaznam a ten polozit na jiny objekt (mam predstavu napr.: panel, ktery je vygenerovany dle jine tabulky) a takto vytvorit vazbu 1:1.
Abych se priznal, tak D&D jsem zatim pouzil jen automaticky a proto bych uvital nejaky samplik s tvorbou dragobjektu.
DIKY za jakoukoliv radu
Prijemny zbytek dne
Vasek Zaruba
8^)
Spojeni pres internet
[*] petr palicka <palicka.petr(zv)seznam(tec)cz> - 12.7.2005 21:43:27
Ahoj,
tak pro informaci, pres hamachi jsem se dostal na firemni server.
Neslo mi to sice podle jmena, ale podle IP OK (tu ti hamachi ukaze, a
myslim, ze si ji lze trvale zapykat. zkusil jsem ovladat server pomoci
TightVNC, a v pohode jsem nainstaloval nove zaplaty z windows update.
Pomoci nejake MicroSofti utilitky pry lze rozbehnout i jako sluzba.
Vice viz na http://hamachi.cc/
Peca
Ukazatel na pole ukazatelu v Delphi
[*] Dalibor Toman <dtoman(zv)fortech(tec)cz> - 12.7.2005 17:07:08
Jan Sebelik <honza(zv)haes(tec)cz> wrote:
>> mam problem s ukazateli, nejak mi to dnes nemysli. Mam napsanou DLL
>> knihovnu, se kterou si vymenuji data pomoci ukazatelu.
>> myslim, ze pomuze cast kodu:
>
> Promin, nestudoval jsem ten kod do detailu.
> Ale pripada mi to trochu "neobjektove".
program bez objektu je neco nepatricneho? Pokud tohle napise nekdo kdo
se v signature chlubi konzultacni cinnosti tak potes pambu..
D. Toman
Spojeni pres internet
[*] petr palicka <palicka.petr(zv)seznam(tec)cz> - 12.7.2005 15:44:58
Ahoj,
krom toho OpenVPN by mohlo pomoci jeste HAMACHI (googluj). Umi to
virtualni sitovou kartu a pripoji se to stylem P2P s sifrovanym prenosem
dat. umi i SPX/IPX. dneska po tom chci zkusit VNC na firemni server s
neverejnou IP adresou (za maskaradou) a doma mam taky neverejnou (taky
za maskaradou). ping z prace na kamose ve stejny domaci siti mi sel OK,
dokonce prochazel nasi firemni sit.
Peca
Spojeni pres internet
[*] Ludek <konference(zv)sales(tec)cz> - 12.7.2005 15:26:56
----- Original Message -----
From: "Kratochvil Milan" <mkratochvil(zv)farmtec(tec)cz>
> Prave ze tam nejsou schopni (telecom) zavest adsl a ostatni mi sefstvo
neschvali.
>
Ahoj,
Schvaleji ti alespon ISDN ?
POkud ne priprav se na peklo protoze si uvedom, ze analogove modemove
pripojeni do NETu je rychlosti 56kbps ale zpetne tedy z pobocky do netu
tecou data pouze cca 24kbps. Prime propojeni analogovym je malinko lepsi tam
dosahnes 33kbps/33kbps. ISDN je samozrejme mnohem lepsi, tam to fici 64/64
pripadne (pokud se pripojis dvoukanalove a platis dvojnasobek) dokonce
128/128.
To uz je rychlost pri ktere se da neco delat.
Dal samozrejme muze v obou pripadech dojit k omezeni na inetove trase ( i
kdyz pro tyto rychlosti je to dnes malo pravdepodobne).
Co se tyce pevne IP adresy, pak nejlepe by bylo zaplatit si (cca
100Kc/mesic) pevnou IP adresu pro dial-up napriklad na volny(tec)cz (nebo treba
u toho quicku ci jineho providera. Je to lepsi, nez delat nejake vylomeniny
se zjistovanim IP adresy. Taky si uvedom, ze vetsina provideru pro dialup
pouziva nejakou formu NATu ci PATu pro usetreni IP adres nebo nejakou formu
proxy. Proto je potreba peclive vybrat i ten dial-up.
Pak bych na jedne i druhe strane pouzil nejaky firewal (napriklad LanSuite
od SW602 je zadarmo pro 3 usery a v anglice verzi tusim dokonce pro 5
useru)) a na nem nastavil potrebna prava a pristupy.
No a uplne nejdrive bych se zamyslel, jestli nejde komunikace tahat nejakym
zpusobem bud pres e-mail (posilani synchronizacnich souboru) nebo treba pres
externi databazi dostupnou na netu pro obe strany (treba na nejakem
freehostingu - kdyz tak setrej) , kde budes udrzovat jen data potrebna pro
synchronizaci.
Ludek
Posledni upozorneni: 24 hodin s Delphi
[*] rkubat(zv)email(tec)cz - 12.7.2005 12:56:44
Vazeni a mili uzivatele Delphi,
jen kratce vam vsem pripominam, ze zitra, 13.7.2005 v 9:00
zacina zive vysilani "BDN Radio" s poradem "24 hodin s Delphi".
Vice informaci najdete na BDN:
http://bdn.borland.com/article/0,1410,33109,00.html
Cesky je to na: http://www.borland(tec)cz/blog/.
Upozornuji, ze o budoucnosti Delphi v oblasti podpory
.NET compact framework, .NET 2.0 a Windows Longhorn
se bude hovorit jiz behem prvni hodiny vysilani, tedy
v Cesku a na Slovensku od 9:00 do 10:00.
Verim, ze ve vysilani najdete dobre informace pouzitelne
pro vasi praci a ziskate odpovedi na dulezite otazky.
S pratelskym pozdravem, -- Richard Kubat, Borland s.r.o.
Spojeni pres internet
[*] Kratochvil Milan <mkratochvil(zv)farmtec(tec)cz> - 12.7.2005 13:24:47
> Zbytecne setrite na nespravnem miste.
> Levnejsi bude tam poridit nejlevnejsi ADSL s pevnou verejnou
> IP adresu.
Prave ze tam nejsou schopni (telecom) zavest adsl a ostatni mi sefstvo neschvali.
Milan
Synapse - jak na to ?
[*] jikulich(zv)quick(tec)cz - 12.7.2005 14:22:52
Ano, server mam napsany presne jak rikas. Naslouchaci thread bezi neustale, pokud detekuje stav CanRead, tak spusti obsluzny thread, kteremu preda socket handle, ziskany z funkce Accept. Obsluzny thread precte data, zpracuje je, odesle odpoved a ukonci se.
Mohl by jsi mi prosim aspon strucne naznacit, jak napsat serverovou aplikaci pro zrizovani "trvalych" spojeni? Jak lze vlastne na serverove strane odlisit stav "klient se JEN pripojil" od stavu "klient uz POSILA data" ?
Diky, Jirka
> No to zalezi na tom,jak mas napsany ten server... jestli klazdy ten
> obsluzny thread obslouzi jedenpozadavek a pak se ukonci, tak pak se
> musis pochopitelne pripojovat s kazdym pozadavkem znova.
>
> Pokud je obsluzny serverovy thread schopen obslouzit vice pozadavku
> zasebou jdoucich, pak se staci pripojit jen jednou a postupne posilat
> jednotlive pozadavky.
QuantumGrid
[*] Sula Milos <milos.sula(zv)musumperk(tec)cz> - 12.7.2005 13:58:50
Zdravim,
nevite jestli je v quantum gridu nejakej event, ktery se zavola vzdy po
vlozeni noveho radku do gridu ? Mam grid propojeny s TTable a v gridu
mam navic jednu unbounded column, kterou chci pri nacitani dat z DB do
gridu vzdy prepocitat. Calculated field pouzit nejde protoze ty jsou pak
v gridu jen read only a ja ten sloupec potrebuju menit v gridu.
Milos
Ukazatel na pole ukazatelu v Delphi - vyreseno
[*] Jitka Pizurova <jitka.pizurova(zv)nwt(tec)cz> - 12.7.2005 13:24:47
Diky vsem, prisla jsem na to zpusobem pokus/omyl chtelo to:
struct := UserQuestList.arraystruct;
Pointer(Quest) := Pointer(struct^);
a potom se posouvat o 4B :o)
Jitka
----- Original Message -----
From: "Jan Sebelik" <honza(zv)haes(tec)cz>
To: <delphi-l(zv)clexpert(tec)cz>
Sent: Tuesday, July 12, 2005 12:16 PM
Subject: Re: Ukazatel na pole ukazatelu v Delphi
>> mam problem s ukazateli, nejak mi to dnes nemysli. Mam napsanou DLL
>> knihovnu, se kterou si vymenuji data pomoci ukazatelu.
>> myslim, ze pomuze cast kodu:
>
> Promin, nestudoval jsem ten kod do detailu.
> Ale pripada mi to trochu "neobjektove".
>
> Mame preci TList, TObjectList - to muze byt vlastne seznam objektu.
> Misto record bych taky pouzil nejaky objekt.
> Snadno se pak uvolnuje pamet, a vubec ...
> Prace s temito objekty je snadna, "pruzracna".
>
> Navic zpracovani takovych UkTSIOUserQuest bude snazsi, kdyz budeme volat
> metody objektu, nikoli tyto struktury zpracovavat "zvenci".
> Vede to k snadne modularizaci problemu.
>
> Honza
> ====================================
> = RNDr. Jan Sebelik - HAES
> = Skolici a konzultacni stredisko pro vyvoj SW
> = www.haes(tec)cz
> = Vojtiskova 321
> = 507 81 Lazne Belohrad
> = tel. 493 792 569, 493 792 931, 776 347 735
> ====================================
>
>
>
>
> Ukazatel na pole ukazatelu v Delphi
[*] Jitka Pizurova <jitka.pizurova(zv)nwt(tec)cz> - 12.7.2005 13:14:46
Diky za odpoved, vim, ze tohle neni tak spravne, jak bych chtela, bohuzel
nemuzu komunikovat s tou DLL knihovnou objektove, protoze tu knihovnu ma na
starosti kolega, ktery programuje v C++, takze hledame nejaky nejsnazsi
zpusob komunikace mezi sebou tak, aby se "to netlouklo". Kdyby DLL knihovna
nepotrebovala volat jednu obsluznou funkci u me v programu napsanem v
Delphi, tak jsem uplne z obliga.
Jitka
S pozdravem
Mgr. Jitka Pizurova
NWT Computer s.r.o.
divize Adder
Nadrazni 804
768 24 Hulin
tel: +420 573 328 773
fax: +420 573 351 725
email: jitka.pizurova(zv)nwt(tec)cz
www.nwt(tec)cz
----- Original Message -----
From: "Jan Sebelik" <honza(zv)haes(tec)cz>
To: <delphi-l(zv)clexpert(tec)cz>
Sent: Tuesday, July 12, 2005 12:16 PM
Subject: Re: Ukazatel na pole ukazatelu v Delphi
>> mam problem s ukazateli, nejak mi to dnes nemysli. Mam napsanou DLL
>> knihovnu, se kterou si vymenuji data pomoci ukazatelu.
>> myslim, ze pomuze cast kodu:
>
> Promin, nestudoval jsem ten kod do detailu.
> Ale pripada mi to trochu "neobjektove".
>
> Mame preci TList, TObjectList - to muze byt vlastne seznam objektu.
> Misto record bych taky pouzil nejaky objekt.
> Snadno se pak uvolnuje pamet, a vubec ...
> Prace s temito objekty je snadna, "pruzracna".
>
> Navic zpracovani takovych UkTSIOUserQuest bude snazsi, kdyz budeme volat
> metody objektu, nikoli tyto struktury zpracovavat "zvenci".
> Vede to k snadne modularizaci problemu.
>
> Honza
> ====================================
> = RNDr. Jan Sebelik - HAES
> = Skolici a konzultacni stredisko pro vyvoj SW
> = www.haes(tec)cz
> = Vojtiskova 321
> = 507 81 Lazne Belohrad
> = tel. 493 792 569, 493 792 931, 776 347 735
> ====================================
>
>
>
>
> DBgrid a poloha posuvniku
[*] Dalibor Faltynek <dalibor.faltynek(zv)orgrez(tec)cz> - 12.7.2005 13:10:46
Ahoj,
jak se prosim vas da naridit pri vyberovam selectu s podminkou navazanemu
DBGridu, aby presunul svuj posuvnik na pravy horni roh sama sebe, tak jako
to udela, jeli select bez podminky? Delphi 5Ent, BDE, Paradox.
Dekuji
Dalibor.Spojeni pres internet
[*] Lukas Barton <lukas(zv)cnawr(tec)cz> - 12.7.2005 13:08:45
Kratochvil Milan wrote:
>Zdravim
>
>Omlouvam se za takove OT ale uz nevim kde se zeptat.
>Potreboval bych poradit ohdledne spojeni pres internet. Na jedne pobocce mame pouze vytacene spojeni pres tlf linku (quick) a na tento comp se potrebujeme pripojit. Co si pamatuji tak kdysi tam byl skript, ktery po vytoceni spojeni poslal emailem ip adresu kterou mu pridelil quick. Na centrale si ji technik precetl a musel stihnout se pripojit asi do 10 min. Dalsi postup jak se pripojit na tento comp neznam a vsichni tvrdi ze musim mit jakousi verejnou ip adresu, ale o tom pochybuji protoze pri vytacenem spojeni pres tlf linku ji urcite nedostanu. Nevite nahodou nekdo jak se tam pripojit? (technik bohuzel nekomunikuje) Prosim o nakopnuti.
>
>
>
Zbytecne setrite na nespravnem miste.
Levnejsi bude tam poridit nejlevnejsi ADSL s pevnou verejnou IP adresu.
>
>
>Spojeni pres internet
[*] Jerry <jry2000(zv)seznam(tec)cz> - 12.7.2005 12:58:44
www.openvpn.net
Staci jakykoliv TCP/UDP otevreny port. (Pres paranoidni firewall se chodi pres 443 TCP).
Jako pripojne misto musi byt stanice linux nebo WinXP(W2k nepodporuje bridging, co vim) s vnejsim otevrenym portem. Na tom udelas OpenVPN - bridged ne routed . Je potreba vzit OpenVPN verzi 2.0 . Predchozi verze si moc dobre nerozumi s WXP.
U klienta si das, aby se pripojoval na server s pevnou IP.
Po pripojeni se bude chovat jako by byl v interni siti a projde pres nej veskera sitova komunikace. Takze ti budou chodit i M$ sdilene slozky a tiskarny .....
J. Vorlicek
Spojeni pres internet
[*] Kratochvil Milan <mkratochvil(zv)farmtec(tec)cz> - 12.7.2005 12:56:44
> Ano, musis mit verejnou IP adresu (jde to i jinak, ale je to non-std).
> Jakmile se stroj pripoji, staci mit nekde na webu (treba)
> skript na ktery
> udela stroj request a hned mas jeho IP.
To je velky problem protoze tam nejde udelat poradne pripojeni takze verejna ip je ve hvezdach nebo pripojeni "za strasny prachy" a to mi neodsouhlasi.
Mne by zajimal prave ten non-std zpusob.
Milan
Vyber pouze x zaznamu z kazde skupiny FIREBIRD
[*] petr palicka <palicka.petr(zv)seznam(tec)cz> - 12.7.2005 12:54:44
Ahoj,
Dalibor Faltynek napsal(a):
> ale u FB nevim.
co takhle ulozena procedura? nebo union nekolika selektu, ale ma-li
byt pocet skupin variabilni, videl bych to na tu SP.
Peca
Ukazatel na pole ukazatelu v Delphi
[*] Petr Fejfar <development(zv)callnet(tec)cz> - 12.7.2005 12:48:43
Jan Sebelik wrote:
>> mam problem s ukazateli, nejak mi to dnes nemysli.
>> Mam napsanou DLL
>> knihovnu, se kterou si vymenuji data pomoci ukazatelu.
>> myslim, ze pomuze cast kodu:
>
> Promin, nestudoval jsem ten kod do detailu.
> Ale pripada mi to trochu "neobjektove".
>
> Mame preci TList, TObjectList - to muze byt vlastne seznam objektu.
> Misto record bych taky pouzil nejaky objekt.
Jenomze jestli to spravne chapu, tak se jedna o callback z DLL,
a tam ti Delphi objekty budou pravdepodobne na 2 veci ;-)
***
Abych se vyhnul pretypovavani ve vlastnim programu, tak bych si nadeklaroval
novy typ, treba:
ukTSIOUserQuests = ^ ukTSIOUserQuest;
a pak zmenil v definici TSIOUserQuestList untyped pointer na
ArrayStruct: ukTSIOUserQuests;
a pak to pouzival beznym zpusobem napr.
var
Cursor: ukTSIOUserQuests;
Idx: integer;
begin
Cursor := List.ArrayStruct;
for Idx:=0 to List.CountItem-1 do
begin
case Cursor^^.TypAkce of
...
end;
inc(Cursor);
end;
A je-li to v DLL, tak bych ocekaval, ze jeji autor definoval recordy
jako packed.
HTH, pf
Kolecko na mysce
[*] Ladislav Stary <stary(zv)ekodat(tec)cz> - 12.7.2005 12:16:40
Koukal jsem, ze si ve svoji komponente, ktera je potomkem DBGrid
osetruji udalosti OnMouseWheelDown a OnMouseWheelUp.
Jinak ta tvoje podminka je urcite spatne. V parametru W_Param je prave
uvedeno o kolik se kolecko pootocilo, urcite ne oznaceni
udalosti.
Zkus si stahnout Platform SDK od Microsoftu. Moc uzitecna dokumentace.
Ladislav Stary.
delphi(zv)spst(tec)cz napsal(a):
>Zdravim,
>Jak zjistim smer otaceni kolecka na mysi.
>
>Pouzivam
>
> if WParam = WM_MOUSEWHEEL then
> if TWMMouseWheel(Mess).WheelDelta>0 then
> RoolLabel.Caption := 'kolecko hore';
> if TWMMouseWheel(Mess).WheelDelta<0 then
> RoolLabel.Caption := 'kolecko dole';
>
>ale TWMMouseWheel(Mess).WheelDelta je porad rovno nule
>
>Predem dekuji
>Jirka
>
>Ukazatel na pole ukazatelu v Delphi
[*] Jan Sebelik <honza(zv)haes(tec)cz> - 12.7.2005 12:16:40
> mam problem s ukazateli, nejak mi to dnes nemysli. Mam napsanou DLL
> knihovnu, se kterou si vymenuji data pomoci ukazatelu.
> myslim, ze pomuze cast kodu:
Promin, nestudoval jsem ten kod do detailu.
Ale pripada mi to trochu "neobjektove".
Mame preci TList, TObjectList - to muze byt vlastne seznam objektu.
Misto record bych taky pouzil nejaky objekt.
Snadno se pak uvolnuje pamet, a vubec ...
Prace s temito objekty je snadna, "pruzracna".
Navic zpracovani takovych UkTSIOUserQuest bude snazsi, kdyz budeme volat metody objektu, nikoli tyto struktury zpracovavat "zvenci".
Vede to k snadne modularizaci problemu.
Honza
====================================
= RNDr. Jan Sebelik - HAES
= Skolici a konzultacni stredisko pro vyvoj SW
= www.haes(tec)cz
= Vojtiskova 321
= 507 81 Lazne Belohrad
= tel. 493 792 569, 493 792 931, 776 347 735
====================================Spojeni pres internet
[*] Bc. Jiri Cincura <diskuze(zv)cincura(tec)net> - 12.7.2005 12:38:42
Kratochvil Milan wrote (on Tuesday, July 12, 2005 12:13 PM):
> Zdravim
>
> Omlouvam se za takove OT ale uz nevim kde se zeptat.
> Potreboval bych poradit ohdledne spojeni pres internet. Na jedne pobocce
> mame pouze vytacene spojeni pres tlf linku (quick) a na tento comp se
> potrebujeme pripojit. Co si pamatuji tak kdysi tam byl skript, ktery po
> vytoceni spojeni poslal emailem ip adresu kterou mu pridelil quick. Na
> centrale si ji technik precetl a musel stihnout se pripojit asi do 10
> min. Dalsi postup jak se pripojit na tento comp neznam a vsichni tvrdi ze
> musim mit jakousi verejnou ip adresu, ale o tom pochybuji protoze pri
> vytacenem spojeni pres tlf linku ji urcite nedostanu. Nevite nahodou
> nekdo jak se tam pripojit? (technik bohuzel nekomunikuje) Prosim o
> nakopnuti.
>
> Diky
> Milan
Ano, musis mit verejnou IP adresu (jde to i jinak, ale je to non-std).
Jakmile se stroj pripoji, staci mit nekde na webu (treba) skript na ktery
udela stroj request a hned mas jeho IP.
--
Bc. Jiri Cincura
http://www.ID3renamer.com/
ICQ: 314711544; Yahoo!: x2develop
http://photo.cincura.net/OT: Spojeni pres internet
[*] Kratochvil Milan <mkratochvil(zv)farmtec(tec)cz> - 12.7.2005 12:12:39
Zdravim
Omlouvam se za takove OT ale uz nevim kde se zeptat.
Potreboval bych poradit ohdledne spojeni pres internet. Na jedne pobocce mame pouze vytacene spojeni pres tlf linku (quick) a na tento comp se potrebujeme pripojit. Co si pamatuji tak kdysi tam byl skript, ktery po vytoceni spojeni poslal emailem ip adresu kterou mu pridelil quick. Na centrale si ji technik precetl a musel stihnout se pripojit asi do 10 min. Dalsi postup jak se pripojit na tento comp neznam a vsichni tvrdi ze musim mit jakousi verejnou ip adresu, ale o tom pochybuji protoze pri vytacenem spojeni pres tlf linku ji urcite nedostanu. Nevite nahodou nekdo jak se tam pripojit? (technik bohuzel nekomunikuje) Prosim o nakopnuti.
Diky
Milan
Ukazatel na pole ukazatelu v Delphi
[*] Jitka Pizurova <jitka.pizurova(zv)nwt(tec)cz> - 12.7.2005 11:50:37
Zdravim vsechny,
mam problem s ukazateli, nejak mi to dnes nemysli. Mam napsanou DLL
knihovnu, se kterou si vymenuji data pomoci ukazatelu.
myslim, ze pomuze cast kodu:
Type
UkTSIOUserQuestList = ^TSIOUserQuestList;
TSIOUserQuestList = record //Obsahuje seznam pozadavku od uzivatele
patrici k sobe
size: Integer; // Velikost datove struktury. Vzdy 16
numbercall: Integer; // aktualni poradi volani dane funkce.
CountItem: Integer; // pocet ukazatelu na ktere ukazuje arraystruct
ArrayStruct: Pointer; // Ukazatel ukazujici na ukazatele, ktere ukazuji
na datove struktury typu UkTSIOUserQuest
end;
Type
UkTSIOUserQuest = ^TSIOUserQuest;
TSIOUserQuest = record //Obsahuje jednotlive pozadavky uzivatele.
Size: Integer; // Velikost datove struktury.=8/12/16 atd (podle typu
pozadavku)
TypAkce: Integer; //atd, dalsi neni dulezite
end;
DLL knihovna vola moji funkci. V parametru dostanu promennou typu
UkTSIOUserQuestList, ve ktere ArrayStruct ukazuje na blok pameti (teda spis
na ukazatel na zacatku bloku) o velikosti CountItem*4 B, tedy kdyz ukazuje
ukazatel arrayStruct na prvni ukazatel v bloku, tak nasledujici ukazatel
(pokud existuje), ma adresu o 4B vyssi. Ukazatele v bloku ukazuji na
promenne typu UkTSIOUserQuest a ja se potrebuju dostat prave na tyto
ukazatele typu UkTSIOUserQuest.
Muze mi nekdo, prosim, poradit?
Diky
Jitka
Vyber pouze x zaznamu z kazde skupiny FIREBIRD
[*] Dalibor Faltynek <dalibor.faltynek(zv)orgrez(tec)cz> - 12.7.2005 11:26:34
U BDE to slo prepsanim jakesi metody, muzu se doma podivat, treba to najdu,
ale u FB nevim.
Dalibor.
> Ahoj, potreboval bych viz %subj%. Neco jako je select first 10, * from
table, ale s tim, ze by to vybralo dany pocet z kazde skupiny.
> To asi jednim selektem nepujde, ze? Napada vas nejake efektivni reseni?
>
> D7Pro, Firebird 1,5
Kam ulozit heslo pro pristup k DB?
[*] Lukas Barton <lukas(zv)cnawr(tec)cz> - 12.7.2005 11:02:32
>Takze se proglasim na server jako "guest" s pristupem k 2. vrstve pro
>cteni, podle me tabulky prav mi druha vrstva na serveru vrati login +
>heslo, ktery bude mit danou uroven zabezpeceni (pristupu) a s tim se
>prihlasim do DB?
>Jak se da druha vrstva na serveru vytvorit? Procedura na serveru?
>
>
>
Propojeni 3ti a druhe vrstvy lze realizovat pomoci jakehokoliv RPC.
Zda konkretne MS SQL Server umi procedury, ktere bezi po jinym
uzivatelem, nez tim, ktery je zavolal nevim....
Jiste by take slo mit v tabulce uzivatelu pro kazdeho uzivatele ulozeny
login a heslo pro pristup k databazi, kdy heslo k databazi bude
kryptovano (staci XOR) pomoci hesla uzivatele.
Problem bude v pripade zmeny hesla uzivatele k databazi - bez znalosti
hesel vsechn uzivatelu to nelze zajistit.
Lukas
Vyber pouze x zaznamu z kazde skupiny FIREBIRD
[*] Dalibor <dalibor(zv)torola(tec)cz> - 12.7.2005 10:50:31
Ahoj, potreboval bych viz %subj%. Neco jako je select first 10, * from table, ale s tim, ze by to vybralo dany pocet z kazde skupiny.
To asi jednim selektem nepujde, ze? Napada vas nejake efektivni reseni?
D7Pro, Firebird 1,5
Kam ulozit heslo pro pristup k DB?
[*] Frantisek Bohac <bohacf_dkonf(zv)vnol(tec)cz> - 12.7.2005 10:28:29
Svoboda Jiri napsal(a):
>Pokud pouzivas MSSQL,nerozumim tomu,proc nepouzijes Windows
>Authentication.Slozite vyrabis neco,co je soucasti sql serveru.Proc ?
>
>Jiri S.
>
Prihlasovani do site probiha s pomoci klienta Novellu - uzivatele nemaji
ucet v domene; o lokalni ucty ve Win se stara Novell (vytvari lokalni
ucty - skupina Users).
Pokud tedy uzivatele nejsou v domene, jak se muzu do MSSQL prihlasit?
Jake overeni zvolit?
Zajima me to take z duvodu, kdybych chtel pouzit misto MSSQL treba FB.
Nejake obecne reseni, ktere se da aplikovat (skoro) na vse.
F.
Kam ulozit heslo pro pristup k DB?
[*] Svoboda Jiri <jsvoboda(zv)lekis(tec)cz> - 12.7.2005 10:08:27
>Ahoj,
>
>predem dekuji vsem za ochotu, ze se mi snazite pomoci :-)
>
>Jan Fiala napsal(a):
>
>Program bezi v ramci podnikove site. Databaze MS-SQL 2000, pripojeni
>pres ADO (D7 Profi).
>Pro pripojeni k DB je vyuzivano jedno prihlasovaci jmeno (plny pristup k
>databazi aplikace): "mainlogin".
>Heslo pro "mainlogin" je ulozeno sifrovane v registrech (kdyby bylo
>treba v DB zmenit heslo pro "mainlogin").
>V DB je tabulka "users", ve ktere jsou vlastni uzivatelske ucty a
>tabulka "usrrights", ve ktere jsou prava.
>Prihlaseni: dislog pro zadani jmena / hesla uzivatele , nactu registr,
>ziskam decryptovanim heslo, connectnu se k DB,
>select .. from users where usrname = :usrname
>porovnani MD5(heslo) a heslo ziskane dotazem, pokud souhlasi = dotahnu
>prava a spustim aplikaci.
>Na zaklade techto prav povoluji / zakazuji jednotlive akce.
>Mohl bych programove pridavat uzivatele do DB: *sp_addlogin *+ priradit
>jim prava, ale mit treba 200 uzivatelu v seznamu SQL uzivatelu, to se mi
>moc nechce :-(
>Takze se proglasim na server jako "guest" s pristupem k 2. vrstve pro
>cteni, podle me tabulky prav mi druha vrstva na serveru vrati login +
>heslo, ktery bude mit danou uroven zabezpeceni (pristupu) a s tim se
>prihlasim do DB?
>Jak se da druha vrstva na serveru vytvorit? Procedura na serveru?
>F.
Pokud pouzivas MSSQL,nerozumim tomu,proc nepouzijes Windows
Authentication.Slozite vyrabis neco,co je soucasti sql serveru.Proc ?
Jiri S.
Kam ulozit heslo pro pristup k DB?
[*] Frantisek Bohac <bohacf_dkonf(zv)vnol(tec)cz> - 12.7.2005 09:56:26
Ahoj,
predem dekuji vsem za ochotu, ze se mi snazite pomoci :-)
Jan Fiala napsal(a):
>...
>Zalezi na tom, jak mas delany zbytek aplikace, zda je zalozeny na
>pravech v databazi nebo jestli pristupujes k databazi pomoci
>jednoho skryteho interniho uzivatele.
>
>Tvuj puvodni pristup, kdy mas tyto informace ulozeny na stanici ma
>velkou nevyhodu - co kdyz si uzivatel sedne k jinemu pocitaci ?
>
Program bezi v ramci podnikove site. Databaze MS-SQL 2000, pripojeni
pres ADO (D7 Profi).
Pro pripojeni k DB je vyuzivano jedno prihlasovaci jmeno (plny pristup k
databazi aplikace): "mainlogin".
Heslo pro "mainlogin" je ulozeno sifrovane v registrech (kdyby bylo
treba v DB zmenit heslo pro "mainlogin").
V DB je tabulka "users", ve ktere jsou vlastni uzivatelske ucty a
tabulka "usrrights", ve ktere jsou prava.
Prihlaseni: dislog pro zadani jmena / hesla uzivatele , nactu registr,
ziskam decryptovanim heslo, connectnu se k DB,
select .. from users where usrname = :usrname
porovnani MD5(heslo) a heslo ziskane dotazem, pokud souhlasi = dotahnu
prava a spustim aplikaci.
Na zaklade techto prav povoluji / zakazuji jednotlive akce.
Mohl bych programove pridavat uzivatele do DB: *sp_addlogin *+ priradit
jim prava, ale mit treba 200 uzivatelu v seznamu SQL uzivatelu, to se mi
moc nechce :-(
Lukas Barton napsal(a):
> podle mne spravne reseni je mapovat uzivatele aplikace pomoci tabulek
>v databazi do roli, kterym odpovidaji uzivatele v databazi.
> Takto dostaneme odstineni uzivatele aplikace od uzivatele v databazi.
> Pro zajisteni bezpecnosti potom nezbyva nez pouzit 3 vrstou
>architekturu s druhou vrstvou na serveru.
>
>
Takze se proglasim na server jako "guest" s pristupem k 2. vrstve pro
cteni, podle me tabulky prav mi druha vrstva na serveru vrati login +
heslo, ktery bude mit danou uroven zabezpeceni (pristupu) a s tim se
prihlasim do DB?
Jak se da druha vrstva na serveru vytvorit? Procedura na serveru?
F.kvalita tisku
[*] Ladislav Fitz <ladislav.fitz(zv)kodytek(tec)cz> - 12.7.2005 09:18:23
> potreboval bych zjistit jakou kvalitu tisku uzivatel zvolil v dialogovem
> okne vyberu tiskarny
> tj jestli je rozliseni 300x300 bodu na palec nebo jine
pouzij API
//dc = handle tiskoveho platna
x:=GetDeviceCaps (dc,LOGPIXELSX); //rozliseni horizontalne bodu na
palec
y:=GetDeviceCaps (dc,LOGPIXELSY); //rozliseni vertikalne bodu na palec
PasDoc - problem s komentarem
[*] Lukas Gebauer <gebylist(zv)mlp(tec)cz> - 12.7.2005 08:44:20
> pro tvorbu dokumentace pouzivam PasDoc a mam nasledujici problem -
> nejsem schopen vygenerovat viceradkovy popisek.
Odradkovani se vklada jen kdyz mas v komentari prazdny radek! Jinaks
e to bere jako jeden odstavec. tedy zkus:
{/
(zv)abstract(Poskytuje funkce pro praci s .....)
Text ..................
gfdgjdfskglsgldsfl
}
--
Lukas Gebauer.
E-mail: gebauerl(zv)mlp(tec)cz
http://www.ararat(tec)cz/synapse/ - Ararat Synapse - TCP/IP Lib.Synapse - jak na to ?
[*] Lukas Gebauer <gebylist(zv)mlp(tec)cz> - 12.7.2005 08:40:20
> Nejasnost mam na klientske strane. Jaky je spravny (nebo lepsi,
> optimalni) postup pripojeni klienta? Musi se metoda
> TTCPBlockSocket.Connect volat neustale znovu pri kazde komunikaci se
> serverem (to funguje), nebo lze vytvorit jedno "persistentni" spojeni
> treba na zacatku aplikace a toto spojeni dlouhodobe pouzivat, napr. az
> do konce aplikace? (to mi nefungovalo).
No to zalezi na tom,jak mas napsany ten server... jestli klazdy ten
obsluzny thread obslouzi jedenpozadavek a pak se ukonci, tak pak se
musis pochopitelne pripojovat s kazdym pozadavkem znova.
Pokud je obsluzny serverovy thread schopen obslouzit vice pozadavku
zasebou jdoucich, pak se staci pripojit jen jednou a postupne posilat
jednotlive pozadavky.
--
Lukas Gebauer.
E-mail: gebauerl(zv)mlp(tec)cz
http://www.ararat(tec)cz/synapse/ - Ararat Synapse - TCP/IP Lib.PasDoc - problem s komentarem
[*] delphak(zv)centrum(tec)cz - 12.7.2005 08:36:19
Ahoj,
pro tvorbu dokumentace pouzivam PasDoc a mam nasledujici problem - nejsem schopen vygenerovat viceradkovy popisek.
Jako markers mam nastaveno /
Komentare /// Text komentare funguji bez problemu
Nedari se mi vsak zadnym zpusobem udelat viceradkovy
{/
(zv)abstract(Poskytuje funkce pro praci s .....)
Text ..................
gfdgjdfskglsgldsfl
}
Zkousel jsem ** a nastaveni --staronly ale Description je opet prazdna. Samozrejme muzu udelat kazdy radek jako samostatny komentar, ale to bych nerad ...
{**
(zv)abstract(Poskytuje funkce pro praci s .....)
Text ..................
gfdgjdfskglsgldsfl
}
Nemate nekdo podobnou zkusenost nebo napad, co s tim?
Pouzivam PasDoc 0.9.0, ale stejne chovani jsem mel i u verze predchozi ...
A jeste jedna drobnost, nevite jak ho presvedcit, aby kodovani nastavil na stredoevropske jazyky (CP1250 - treba jako pro slovenstinu, ale s anglickyma popiskama?)
Diky!kvalita tisku
[*] Matejcek Petr <konference(zv)crhov.komfi(tec)cz> - 11.7.2005 21:19:33
DD
potreboval bych zjistit jakou kvalitu tisku uzivatel zvolil v dialogovem
okne vyberu tiskarny
tj jestli je rozliseni 300x300 bodu na palec nebo jine
rozmery platna v bodech zjistim snadno ale jak mam vedet kolik je jeden
bod?
vedel by nekdo ?
if (PrinterSetupDialog1->Execute() == mrOk)
{
TPrinter * tisk = Printer();
tisk->BeginDoc();
tisk->PageWidth;
....
diky PM
Synapse - jak na to ?
[*] jikulich(zv)quick(tec)cz - 11.7.2005 19:08:56
Ahoj,
pro realizaci jednoducheho RPC pres TCP jsem hledal vhodny transportni prostredek, az jsem - jako zrejme spousta dalsich programatoru - zakotvil u Synapse.
Serverova aplikace je jednoducha a jasna: mnozina naslouchacich threadu + thready pro obsluhu klientskych volani, tj. stejna architektura jako v Indy a spouste dalsich komunikacnich knihoven.
Nejasnost mam na klientske strane. Jaky je spravny (nebo lepsi, optimalni) postup pripojeni klienta? Musi se metoda TTCPBlockSocket.Connect volat neustale znovu pri kazde komunikaci se serverem (to funguje), nebo lze vytvorit jedno "persistentni" spojeni treba na zacatku aplikace a toto spojeni dlouhodobe pouzivat, napr. az do konce aplikace? (to mi nefungovalo).
Diky, Jirka
Kam ulozit heslo pro pristup k DB?
[*] Jan Fiala <jan.fiala(zv)wo(tec)cz> - 11.7.2005 18:38:53
11.7.2005 Frantisek Bohac:
> Takze se pripojim (pouze cteni) k tabulce uzivatelu, ziskam data
> uzivatelu, ale stojim zase pred stejnym problemem: kde vezmu
> prihlasovaci udaje pro zapis?
Uzivatel zada jmeno a heslo
Ty se bud muzes pokusit pripojit primo pomoci techto informaci (lepsi
pripad) nebo k pripojeni a overeni pouzijes toho uzivatele overis
informace a pokracujes.
Zalezi na tom, jak mas delany zbytek aplikace, zda je zalozeny na
pravech v databazi nebo jestli pristupujes k databazi pomoci
jednoho skryteho interniho uzivatele.
Tvuj puvodni pristup, kdy mas tyto informace ulozeny na stanici ma
velkou nevyhodu - co kdyz si uzivatel sedne k jinemu pocitaci ?
--
Jan Fiala
mailto:jan.fiala(zv)wo(tec)cz
Kam ulozit heslo pro pristup k DB?
[*] Lukas Barton <lukas(zv)cnawr(tec)cz> - 11.7.2005 15:10:15
Frantisek Bohac wrote:
>Jinak asi nejlepsi je to resit na urovni DB serveru, ale to vzdy nejde :-(
>
>
>
Ahoj,
podle mne spravne reseni je mapovat uzivatele aplikace pomoci tabulek
v databazi do roli, kterym odpovidaji uzivatele v databazi.
Takto dostaneme odstineni uzivatele aplikace od uzivatele v databazi.
Pro zajisteni bezpecnosti potom nezbyva nez pouzit 3 vrstou
architekturu s druhou vrstvou na serveru.
Lukas
Kam ulozit heslo pro pristup k DB?
[*] Frantisek Bohac <bohacf_dkonf(zv)vnol(tec)cz> - 11.7.2005 14:42:12
Takze se pripojim (pouze cteni) k tabulce uzivatelu, ziskam data
uzivatelu, ale stojim zase pred stejnym problemem: kde vezmu
prihlasovaci udaje pro zapis?
Nebo slo by globalni heslo ziskat nejakou procedurou?
Ze bych spustil ulozenou proceduru s parametrem (jmeno, heslo),
procedura by prihlaseni overila v tabulce uzivatelu a vratila by heslo
pro uzivatele (login by byl pevne dan nebo vcetne loginu v pripade
viceurovnoveho zabezpeceni)?
Jinak asi nejlepsi je to resit na urovni DB serveru, ale to vzdy nejde :-(
Dekuji vsem za pomoc :-)
F.
Jan Fiala napsal(a):
>Mit to ulozene zasifrovane v databazi :-)
>Pokud pri prihlasovani budes k DB pristupovat pomoci nejakeho
>interniho uzivatele, ktery bude mit pristup napr. pouze k tabulce
>uzivatelu a jeste jen pro cteni...
>
format MD5 hashe
[*] Petr Fejfar <development(zv)callnet(tec)cz> - 11.7.2005 13:40:08
Martin Pisarik wrote:
> pokud provedu MD5 hash na retezec "aaaaa" tak mi vyjde toto
> "594f803b380a41396ed63dca39503542".
> zajimave je ze server se kterym se snazim komunikovat chape jako MD5
> hash retezce "aaaaa" toto: "WU+AOzgKQTlu1j3KOVA1Qg=="
> Jak tomu mam rozumet? nejprve jsem si mylel, ze ten prvni tvar je
> pouze hexadecimalni vyjadreni binarniho druheho tvaru, ale neni tomu
> tak. Stejny problem mam i s SHA.
> Jak dostanu ten druhy tvar? Zda se mi, ze jsou v nem obsazeny pouze
> "tisknutelne" znaky, takze to neni nejaky ciste binarni tvar.
MD5 predstavuje stream 128 bitu:
# v prvnim pripade ho mas v hexadecimalni reprezentaci
# ve druhem pripade je zakodovan do Base64 viz RFC 1521
HTH, pf
format MD5 hashe
[*] Martin Pisarik <martin.pisarik(zv)seznam(tec)cz> - 11.7.2005 13:28:06
Ahoj *,
prave resim tento problem
pokud provedu MD5 hash na retezec "aaaaa" tak mi vyjde toto
"594f803b380a41396ed63dca39503542".
zajimave je ze server se kterym se snazim komunikovat chape jako MD5 hash
retezce "aaaaa" toto: "WU+AOzgKQTlu1j3KOVA1Qg=="
Jak tomu mam rozumet? nejprve jsem si mylel, ze ten prvni tvar je pouze
hexadecimalni vyjadreni binarniho druheho tvaru, ale neni tomu tak.
Stejny problem mam i s SHA.
Jak dostanu ten druhy tvar? Zda se mi, ze jsou v nem obsazeny pouze
"tisknutelne" znaky, takze to neni nejaky ciste binarni tvar.
Dik za radu.
Protection Error
[*] Vaclav Sazima <vaclav.sazima(zv)utilia(tec)cz> - 11.7.2005 12:06:00
Ahoj,
tenhle problem jsem mel po instalaci Windows XP SP2 a pri pouziti ATI karty.
Vaclav Sazima
Dalibor wrote:
> Ahoj, v posledni dobe se mi pri ladeni programu, ktery pouziva VIDEO zobrazuje hlaseni, pri spusteni z DELPHI .
>
> Protection Error
> Debugger detected - please close it down and restart.
> Windows NT users: Please note that having the
> WinIce/SoftIce service installed means that tou are
> runing a debugger.
>
> Nevite co s tim? Jak zjistit, co by to mohlo zpusobovat?
Protection Error
[*] Jaroslav Bucek <jaroslav.bucek-kd(zv)seznam(tec)cz> - 11.7.2005 11:57:59
Ahoj,
----- Original Message -----
From: "Dalibor" <dalibor(zv)torola(tec)cz>> Nevite co s tim? Jak zjistit, co by to mohlo zpusobovat?
Tuto hlasku mi zpusoboval, myslim, DivX kodek, protoze v nem pouzivaji
ochranu proti Win/SoftICE. Ale jen pri spusteni programu z vyvojoveho
prostredi, takze u zakaznika je jedno, jaky kodek pouziva a hlasku by videt
nemel.
Reseni: Pouzivat jiny kodek.
Ja pouzivam ffdshow a bez problemu.
Jarda
Kam ulozit heslo pro pristup k DB?
[*] Jan Fiala <jan.fiala(zv)wo(tec)cz> - 11.7.2005 11:35:57
11.7.2005 Ludek:
> ----- Original Message -----
> From: "Jan Fiala" <jan.fiala(zv)wo(tec)cz>
>> > kam nejlepe se da ulozit heslo pro pristup do DB (desktopova aplikace),
>> > aby se nedalo jednoduse vydolovat?
>> > V soucasne dobe to funguje tak, ze je heslo pro pristup k DB v
>> > zasifrovane podobe v registrech a klic je sestavovany z nekolika casti
>> > pri inicializaci aplikace.
>>
>> Mit to ulozene zasifrovane v databazi :-)
>> Pokud pri prihlasovani budes k DB pristupovat pomoci nejakeho
>> interniho uzivatele, ktery bude mit pristup napr. pouze k tabulce
>> uzivatelu a jeste jen pro cteni...
> Ahoj,
> A kde bude ulozeno to heslo pro toho interniho uzivatele :)
To muze byt klidne interni uzivatelske jmeno, ktere bude pouzivat
aplikace jen pro overeni.
Vytvoreno bude natvrdo pri vytvoreni databaze. Pristup jen pro cteni k
te jedne tabulce, takze nehrozi zneuziti.
--
Jan Fiala
mailto:jan.fiala(zv)wo(tec)cz
DBGrid s chekbox, image...
[*] Ing. Igor Vodicka <vodicka(zv)sagit(tec)cz> - 11.7.2005 11:33:57
Ahoj!
> -----Original Message-----
> From: delphi-l-owner(zv)clexpert(tec)cz
> [mailto:delphi-l-owner(zv)clexpert(tec)cz]On Behalf Of delphi(zv)spst(tec)cz
>
> Jeste jeden dotaz, jakou pokud mozno free komponentu je mozne pouzit misto
> klasicke DBGrid.
>
> Potrebuji tam mit checkbox, image(ikonu) a combobox. Libi se mi
> NextDBGrid, ale ta neni free.
Mam vcelku dobre zkusenosti s Delphi freeware SMComponent library viz
http://www.scalabium.com.
Ing. Igor Vodicka
informacni systemy
Nakladatelstvi Sagit
Tel.: 59 6786 001
HTTP://www.sagit(tec)cz/Kam ulozit heslo pro pristup k DB?
[*] Petr Brant <brant(zv)dcomm(tec)cz> - 11.7.2005 11:29:57
Tak uloz jen hash (otisk) toho hesla, algoritmu vcetne implementace v
Delphi najdes mraky. A pri prihlasovani uzivatele nebudes kontrolovat
heslo, ktere on zadal, ale otisk toho hesla proti ulozenemu otisku.
Algoritmy pro otisk jsou psane tak, aby s z otisku nedala vykutat
puvodni data, takze je to bezpecne. Nevyhoda je, ze pak ani ty nedokazes
z otisku poznat puvodni heslo, takze kdyz si to uzivatel zmeni a
zapomene, ma databazi, ale uz se do ni nedostane.
RNDr. Petr Brant [brant(zv)dcomm(tec)cz]
kam nejlepe se da ulozit heslo pro pristup do DB (desktopova aplikace),
aby se nedalo jednoduse vydolovat?
V soucasne dobe to funguje tak, ze je heslo pro pristup k DB v
zasifrovane podobe v registrech a klic je sestavovany z nekolika casti
pri inicializaci aplikace.
DBGrid s chekbox, image...
[*] Marek <marek.rakowski(zv)trz(tec)cz> - 11.7.2005 11:23:56
Ahoj,
Combobox jde zobrazit v DBGRIDU
A checkbox
procedure Tfrm_main.DBGrid1DrawColumnCell(Sender: TObject; const Rect:
TRect;
DataCol: Integer; Column: TColumn; State: TGridDrawState);var
CheckBoxRectangle : TRect;
Const
CtrlState : array[Boolean] of Integer = (DFCS_BUTTONCHECK,
DFCS_BUTTONCHECK or DFCS_CHECKED);
begin
if (Column.FieldName = 'odeslat_fax') or (Column.FieldName =
'odeslat_mail') then
if Column.Field.Value = false then
begin
DBGrid1.Canvas.Brush.Color := clInfoBk;
DBGrid1.DefaultDrawColumnCell(Rect, DataCol, Column, State);
end
else
begin
DBGrid1.Canvas.Brush.Color := clMoneyGreen;
DBGrid1.DefaultDrawColumnCell(Rect, DataCol, Column, State);
end;
if Column.Field.DataType = ftBoolean then
begin
Self.DBGrid1.Canvas.FillRect(Rect);
CheckBoxRectangle.Left := Rect.Left + 2;
CheckBoxRectangle.Right := Rect.Right - 2;
CheckBoxRectangle.Top := Rect.Top + 2;
CheckBoxRectangle.Bottom := Rect.Bottom - 2;
DrawFrameControl(Self.DBGrid1.Canvas.Handle, CheckBoxRectangle, DFC_BUTTON,
CtrlState[Column.Field.AsBoolean]);
end;
Marek
Zdravim,
Jeste jeden dotaz, jakou pokud mozno free komponentu je mozne pouzit misto
klasicke DBGrid.
Potrebuji tam mit checkbox, image(ikonu) a combobox. Libi se mi NextDBGrid,
ale ta neni free.
Predem dekuji Jirka
PS. Jeji nedatabazava varianta je dle meho soudu dost dobra a je free.
www.bergsoft.com
Kam ulozit heslo pro pristup k DB?
[*] Ludek <konference(zv)sales(tec)cz> - 11.7.2005 11:21:56
----- Original Message -----
From: "Jan Fiala" <jan.fiala(zv)wo(tec)cz>
> > kam nejlepe se da ulozit heslo pro pristup do DB (desktopova aplikace),
> > aby se nedalo jednoduse vydolovat?
> > V soucasne dobe to funguje tak, ze je heslo pro pristup k DB v
> > zasifrovane podobe v registrech a klic je sestavovany z nekolika casti
> > pri inicializaci aplikace.
>
> Mit to ulozene zasifrovane v databazi :-)
> Pokud pri prihlasovani budes k DB pristupovat pomoci nejakeho
> interniho uzivatele, ktery bude mit pristup napr. pouze k tabulce
> uzivatelu a jeste jen pro cteni...
Ahoj,
A kde bude ulozeno to heslo pro toho interniho uzivatele :)
Ja myslim, ze spolehat se na ochranu v klientovi je prinejmensim nedobre.
Lepsi je aplikaci vybudovat tak, aby kazdy uzivatel mel uz primo v DB jen a
jen ta prava ktera ma mit. Cili zabezpeceni je pak presne na urovni
zabezpeceni pouziteho DB stroje.
No a pak ma uzivatel sve heslo, ktere neni treba nikam ukladat, protoze ho
proste zna. Pripadne lze pouzit NT autentifikaci (pokud to prislusny DB
stroj umoznuje)
Ludek
Kam ulozit heslo pro pristup k DB?
[*] Jan Fiala <jan.fiala(zv)wo(tec)cz> - 11.7.2005 11:03:55
11.7.2005 Frantisek Bohac:
> Dobry den,
> kam nejlepe se da ulozit heslo pro pristup do DB (desktopova aplikace),
> aby se nedalo jednoduse vydolovat?
> V soucasne dobe to funguje tak, ze je heslo pro pristup k DB v
> zasifrovane podobe v registrech a klic je sestavovany z nekolika casti
> pri inicializaci aplikace.
Mit to ulozene zasifrovane v databazi :-)
Pokud pri prihlasovani budes k DB pristupovat pomoci nejakeho
interniho uzivatele, ktery bude mit pristup napr. pouze k tabulce
uzivatelu a jeste jen pro cteni...
--
Jan Fiala
mailto:jan.fiala(zv)wo(tec)cz
Kam ulozit heslo pro pristup k DB?
[*] Frantisek Bohac <bohacf_dkonf(zv)vnol(tec)cz> - 11.7.2005 10:29:51
Dobry den,
kam nejlepe se da ulozit heslo pro pristup do DB (desktopova aplikace),
aby se nedalo jednoduse vydolovat?
V soucasne dobe to funguje tak, ze je heslo pro pristup k DB v
zasifrovane podobe v registrech a klic je sestavovany z nekolika casti
pri inicializaci aplikace.
Da se to vyresit nejak jinak (a lepe)?
Predem dekuji za odezvu :-)
F.
Kolecko na mysce
[*] Pavel GRATZER <pavelg(zv)stbk.mcs(tec)cz> - 11.7.2005 10:29:51
V TControl v sekci protected jsou dve metody, ktere reaguji na smer otaceni
function DoMouseWheelDown(Shift: TShiftState; MousePos: TPoint):Boolean;
override;
function DoMouseWheelUp(Shift: TShiftState; MousePos: TPoint):Boolean;
override;
staci je pridat do komponenty, ve ktere to potrebujes.
PG
----- Original Message -----
From: <delphi(zv)spst(tec)cz>
To: <delphi-l(zv)clexpert(tec)cz>
Sent: Monday, July 11, 2005 9:33 AM
Subject: Kolecko na mysce
> Zdravim,
> Jak zjistim smer otaceni kolecka na mysi.
>
> Pouzivam
>
> if WParam = WM_MOUSEWHEEL then
> if TWMMouseWheel(Mess).WheelDelta>0 then
> RoolLabel.Caption := 'kolecko hore';
> if TWMMouseWheel(Mess).WheelDelta<0 then
> RoolLabel.Caption := 'kolecko dole';
>
> ale TWMMouseWheel(Mess).WheelDelta je porad rovno nule
>
> Predem dekuji
> Jirka
>
>
>
OT: Protection Error
[*] Dalibor <dalibor(zv)torola(tec)cz> - 11.7.2005 10:37:52
Ahoj, v posledni dobe se mi pri ladeni programu, ktery pouziva VIDEO zobrazuje hlaseni, pri spusteni z DELPHI .
Protection Error
Debugger detected - please close it down and restart.
Windows NT users: Please note that having the
WinIce/SoftIce service installed means that tou are
runing a debugger.
Nevite co s tim? Jak zjistit, co by to mohlo zpusobovat?Preklad funkce z C
[*] Petr Brant <brant(zv)dcomm(tec)cz> - 11.7.2005 10:05:47
rcTemp: TRect; <<tady nevim, jestli by nemelo byt ^TRect, ale bohuzel to
nemam na cem vyzkouset
hParent, hWnd, hTemp: THandle;
if (PtInRect(rcTemp, point) and GetParent(hTemp) = hParent and
IsWindowVisible(hTemp)) then ....
Bohuzel tu nemam kompilator C, takze je to jen tak spatra, ale snad
dobre.
RNDr. Petr Brant [brant(zv)dcomm(tec)cz]
Prepisuji si jedu fci z C a nevim si rady s nasledujici podminkou
RECT rcTemp;
HWND hParent, hWnd, hTemp;
if(::PtInRect(&rcTemp, point) && ::GetParent(hTemp) == hParent &&
::IsWindowVisible(hTemp))
DBGrid s chekbox, image...
[*] delphi(zv)spst(tec)cz - 11.7.2005 10:01:47
Zdravim,
Jeste jeden dotaz, jakou pokud mozno free komponentu je mozne pouzit misto
klasicke DBGrid.
Potrebuji tam mit checkbox, image(ikonu) a combobox. Libi se mi NextDBGrid,
ale ta neni free.
Predem dekuji Jirka
PS. Jeji nedatabazava varianta je dle meho soudu dost dobra a je free.
www.bergsoft.com
Preklad funkce z C
[*] Milan Tomes <delphi(zv)haida(tec)cz> - 11.7.2005 09:43:40
Tusim takto:
Uses
Types, Windows;
Var
rcTemp: TRect;
Point: TPoint;
hParent, hTemp: HWND;
If PtInRect(rcTemp, point) and (GetParent(hTemp) = hParent) and
IsWindowVisible(hTemp) then ....
S pozdravem
Milan Tomes
> [mailto:delphi-l-owner(zv)clexpert(tec)cz] On Behalf Of delphi(zv)spst(tec)cz
> Sent: Monday, July 11, 2005 9:36 AM
>
> Prepisuji si jedu fci z C a nevim si rady s nasledujici podminkou
>
> RECT rcTemp;
>
> HWND hParent, hWnd, hTemp;
>
> if(::PtInRect(&rcTemp, point) && ::GetParent(hTemp) == hParent &&
> ::IsWindowVisible(hTemp))mozna uskali pri prevodu Firebird UDF dll na so
[*] petr palicka <palicka.petr(zv)seznam(tec)cz> - 11.7.2005 09:39:40
Ahoj,
potrebuju jednu nasi dll knihovnu (UDFko pro Firebird) prelozit jako
so knihovnu (aby mohl server bezet na linuxu). Absolutne netusim, co me
ceka, nemaje kylix, chci zkusit kompilaci pod free pascal compilerem,
ale rad bych, kdyby me nekdo predem varoval, aby pak zakaznikovi
nelehnul server. Ja totiz nemam zadnej linuxovej stroj na odzkouseni k
dispozici. :/
Dik
Peca
Preklad funkce z C
[*] delphi(zv)spst(tec)cz - 11.7.2005 09:35:40
Zdravim,
Prepisuji si jedu fci z C a nevim si rady s nasledujici podminkou
RECT rcTemp;
HWND hParent, hWnd, hTemp;
if(::PtInRect(&rcTemp, point) && ::GetParent(hTemp) == hParent &&
::IsWindowVisible(hTemp))
Muzete mi nekdo poradit jak toto prepsat do delphi
Predem dekuji Jirka
Kolecko na mysce
[*] delphi(zv)spst(tec)cz - 11.7.2005 09:33:39
Zdravim,
Jak zjistim smer otaceni kolecka na mysi.
Pouzivam
if WParam = WM_MOUSEWHEEL then
if TWMMouseWheel(Mess).WheelDelta>0 then
RoolLabel.Caption := 'kolecko hore';
if TWMMouseWheel(Mess).WheelDelta<0 then
RoolLabel.Caption := 'kolecko dole';
ale TWMMouseWheel(Mess).WheelDelta je porad rovno nule
Predem dekuji
Jirka
UDF ve FB Threadsafe ?
[*] Slavomir Skopalik <skopalik(zv)elektlabs(tec)cz> - 10.7.2005 10:41:24
Pro superserver ANO, pro clasic server to neni nutne.
Slavek
>
> mam mozna prihlouply dotaz: musi byt UDF pro FB napsana threadsafe ?
> UDF ve FB Threadsafe ?
[*] Tomas Bradle <t.bradle(zv)sanet(tec)cz> - 10.7.2005 10:01:19
Zdravim vsechny,
mam mozna prihlouply dotaz: musi byt UDF pro FB napsana threadsafe ?
diky
Tomas Bradle
t.bradle(zv)sanet(tec)cz
Pruhlednost obrazku v menu
[*] Petr Fejfar <development(zv)callnet(tec)cz> - 9.7.2005 10:27:38
jsdelphi(zv)creatix(tec)cz wrote:
> To vsechno jsem uz vyzkousel. Jde mi o princip, nechapu, proc to
> nechce fungovat :-( Jine (cizi) programy na mem notebooku tento
> problem nemaji, pouze muj DELPHI program :-(
Skoro totez jsem videl pred 6-7 lety: tenkrat to delal primo Delphi
a bylo to zpusobeno prilis velkym poctem glyfu, na ktery nestacila
kapacita cache graficke karty.
Pomohlo jit do nastaveni graficke karty a snizit uroven HW akcelerace
z uplne na nejaky nizsi stupen.
Ovsem mam v zive pameti, jak se na to panove ve vyspelem svete divali,
ze by meli na svych notebookach kvuli nejakemu Delphi snizovat HW
akceleraci, kdyz veskery ostatni soft jim chodi bez problemu.
Takze jestli je to stejny problem, tak bych doporucoval pocet tech glyfu
snizit, abys neodrazoval zakazniky.
HTH, pf
Pruhlednost obrazku v menu
[*] Bc. Jiri Cincura <diskuze(zv)cincura(tec)net> - 9.7.2005 09:53:35
jsdelphi(zv)creatix(tec)cz wrote (on Saturday, July 09, 2005 9:40 AM):
>> Hmm, tak kdyz jsou jinde OK, neni treba to snad resit. Asi nejaky bug
>> na
> notebooku. Zkus stahnout posledni drivery k "zobrazovaci" a event. mrkni
> jestli neni nejaky problem s LCD, mozna ze se divas pod blbym uhlem nebo
> tak neco.
>
> To vsechno jsem uz vyzkousel. Jde mi o princip, nechapu, proc to nechce
> fungovat :-( Jine (cizi) programy na mem notebooku tento problem nemaji,
> pouze muj DELPHI program :-(
Ha, tak to me jeste napada jedna vec. Vem vsechny ty obrazky a dej je pryc.
Potom restartni Delphi a znova je do menu naladuj a potom to zkus. Mozna ze
to bude OK. Jednou jsem mel podobny problem s obr. s jakousi zelenou barvou.
--
Bc. Jiri Cincura
http://www.ID3renamer.com/
ICQ: 314711544; Yahoo!: x2develop
http://photo.cincura.net/Pruhlednost obrazku v menu
[*] jsdelphi(zv)creatix(tec)cz - 9.7.2005 09:39:34
> Hmm, tak kdyz jsou jinde OK, neni treba to snad resit. Asi nejaky bug na
notebooku. Zkus stahnout posledni drivery k "zobrazovaci" a event. mrkni
jestli neni nejaky problem s LCD, mozna ze se divas pod blbym uhlem nebo tak
neco.
To vsechno jsem uz vyzkousel. Jde mi o princip, nechapu, proc to nechce
fungovat :-( Jine (cizi) programy na mem notebooku tento problem nemaji,
pouze muj DELPHI program :-(
Diky
Jan Skopovy
Pruhlednost obrazku v menu
[*] Bc. Jiri Cincura <diskuze(zv)cincura(tec)net> - 9.7.2005 09:31:33
jsdelphi(zv)creatix(tec)cz wrote (on Friday, July 08, 2005 11:27 PM):
> Prosim o radu. Na mem vyvojovem notebooku se deje zvlastni vec: vsechny
> obrazky v menu nejsou pruhledne ale jakoby se svetlym pozadim. Pokud
> spustim program na jakkemkoliv jinem pocitaci, je vse v poradku a obrazky
> jsou pruhledne.
>
> Uz jsem reinstaloval WinXP PRO (legalni :-), mam veskere upgrady,
> podepsane drivery, ...
>
> Cim to muze byt? Grafickou kartou nebo nejakou Win DLL knihovnou? Nemate
> s tim nekdo zkusenost?
Hmm, tak kdyz jsou jinde OK, neni treba to snad resit. Asi nejaky bug na
notebooku. Zkus stahnout posledni drivery k "zobrazovaci" a event. mrkni
jestli neni nejaky problem s LCD, mozna ze se divas pod blbym uhlem nebo tak
neco.
--
Bc. Jiri Cincura
http://www.ID3renamer.com/
ICQ: 314711544; Yahoo!: x2develop
http://photo.cincura.net/Pruhlednost obrazku v menu
[*] jsdelphi(zv)creatix(tec)cz - 8.7.2005 23:26:46
Prosim o radu. Na mem vyvojovem notebooku se deje zvlastni vec: vsechny
obrazky v menu nejsou pruhledne ale jakoby se svetlym pozadim. Pokud spustim
program na jakkemkoliv jinem pocitaci, je vse v poradku a obrazky jsou
pruhledne.
Uz jsem reinstaloval WinXP PRO (legalni :-), mam veskere upgrady, podepsane
drivery, ...
Cim to muze byt? Grafickou kartou nebo nejakou Win DLL knihovnou? Nemate s
tim nekdo zkusenost?
Dekuji
Jan Skopovy
CREATIX s.r.o.
tel/fax: +420 222 564 426
mobil: +420 776 097 202
email: js(zv)creatix(tec)cz
www.creatix(tec)cz
MySQL atribut typu BIT a Delphi TField.DataType
[*] Karel Rys <delphi(zv)zas-me(tec)cz> - 8.7.2005 19:34:28
Zadneho potomka neni nutne vytvaret, tDbChekBox ma vlastnosti ValueChecked a
ValueUnchecked, do kterych staci dat 'y' a 'n' a je vystarano (alespon v D5 ty
vlastnosti ma). Rozhodne mi to prijde lepsi nez definovat boolean jako varchar
(5)...
Karel Rys
Cituji z emailu od Vaclav Halik <spravasd(zv)suz.cvut(tec)cz>:
> Milan Tomes napsal(a):
>
> >No tak to taky neni uplne pravda - my pouzivame Developer Express Quantum
> >Grid a ten ma moznost nastaveni hodnoty, pri ktere je checkbox
> >checked/unchecked/grayed.
> >
> Jasne, ale kazdy nepouziva tyto krasne komponenty. Respektive
> predpokladam je je tady ma malokdo. Proto jsem to ani nezminoval.
>
> > A ohledne DBCheckBoxu by asi nebyl problem tohle
> >osetrit na urovni nejakeho potomka.
> >
> >
> Ano, to by slo, ale proc si pridelavat zbytecne praci :-)udalost OnDrawCell v DBGridu
[*] Ladislav Stary <stary(zv)ekodat(tec)cz> - 8.7.2005 17:34:18
Nastavuju to takto:
Canvas.Brush.Color := BarvaPozadi;
Canvas.Font.Color := BarvaPisma;
DefaultDrawColumnCell(Rect, DataCol, Column, State);
Ladislav Stary
Milan Dvorak napsal(a):
>Potrebuji nastavit jinou barvu textu pro specificke bunky v DBGridu. Barvu pozadi nastavuji pomoci Canvas.Brush.Color ale barvu pisma se mi nastavit nedari.
>Pokud pouziji Canvas.Pen.Color, nic se nestane, pokud nastavim barvu pomoci Font.Color. stane se to pro vsechny bunky v Gridu.
>Nevite jak nastavit jinou barvu jen pro nektere bunky?
>
>Dekuji
>Milan Dvorak
>udalost OnDrawCell v DBGridu
[*] Hovat <hovat(zv)pcservis(tec)cz> - 8.7.2005 17:18:16
Dvojklikem na DBGrid otevrit Editing DBGrid.Columns, vybrat sloupec a v
Object Inspectoru Font, Color ...
Pavel HOVAT
PC servis
Hudcova 76
612 00 BRNO
ICO : 105 43384
DIC : CZ450706457
tel : 541 213 196
fax : 541 244 056
udalost OnDrawCell v DBGridu
[*] Martin Cajbik <cajbik(zv)sct.sk> - 8.7.2005 16:56:15
Canvas.Font.Color
Milan Dvorak wrote:
> Potrebuji nastavit jinou barvu textu pro specificke bunky v DBGridu. Barvu pozadi nastavuji pomoci Canvas.Brush.Color ale barvu pisma se mi nastavit nedari.
> Pokud pouziji Canvas.Pen.Color, nic se nestane, pokud nastavim barvu pomoci Font.Color. stane se to pro vsechny bunky v Gridu.
> Nevite jak nastavit jinou barvu jen pro nektere bunky?
>
> Dekuji
> Milan Dvorak
> .
--
Martin Cajbik
SCT s.r.o. Kosice
udalost OnDrawCell v DBGridu
[*] Milan Dvorak <dvorak(zv)gymzn(tec)cz> - 8.7.2005 16:52:14
Potrebuji nastavit jinou barvu textu pro specificke bunky v DBGridu. Barvu pozadi nastavuji pomoci Canvas.Brush.Color ale barvu pisma se mi nastavit nedari.
Pokud pouziji Canvas.Pen.Color, nic se nestane, pokud nastavim barvu pomoci Font.Color. stane se to pro vsechny bunky v Gridu.
Nevite jak nastavit jinou barvu jen pro nektere bunky?
Dekuji
Milan Dvorak
Teplota CPU
[*] Venca Zaruba <zaruba(zv)elastoform(tec)cz> - 8.7.2005 13:35:57
HI *,
Mam trojdotaz:
1: Jak zjistit teplotu na CPU?
2: Stav HDD (nevznikaji bed sektory?)
3: Zasunuti Flash driveru (neznamy odpojit)?
Dik za jakekoliv info
Prijemny zbytek dne
Vasek Zaruba
8^)
MySQL atribut typu BIT a Delphi TField.DataType
[*] Marek <marek.rakowski(zv)trz(tec)cz> - 8.7.2005 12:59:33
Ahoj,
Typ enum('N', 'Y')
DM.TB_jednaniodeslano.Value := true;
V DBGRIDU na onDrawColumnCell
if Column.Field.DataType = ftBoolean then
Marek
-----Original Message-----
From: delphi-l-owner(zv)clexpert(tec)cz [mailto:delphi-l-owner(zv)clexpert(tec)cz] On
Behalf Of Milan Tomes
Sent: Friday, July 08, 2005 10:27 AM
To: delphi-l(zv)clexpert(tec)cz
Subject: Re: MySQL atribut typu BIT a Delphi TField.DataType
No tak to taky neni uplne pravda - my pouzivame Developer Express Quantum
Grid a ten ma moznost nastaveni hodnoty, pri ktere je checkbox
checked/unchecked/grayed. A ohledne DBCheckBoxu by asi nebyl problem tohle
osetrit na urovni nejakeho potomka.
S pozdravem
Milan Tomes
> [mailto:delphi-l-owner(zv)clexpert(tec)cz] On Behalf Of Vaclav Halik
> Sent: Friday, July 08, 2005 10:09 AM
>
> >No mozna staci z uspornych duvodu CHAR(1) a davat tam "A" / "N"
> >("Y" / "N")
>
> Nestaci, vtip je v tom ze sice usetris misto, ale pak se ti
> na takovy sloupec nechytene treba TDBCheckBox, nebo pokud
> budes chtit v nejakem lepsim DBGridu zobrazovat CheckBoxy tak
> si nahrany.
MySQL atribut typu BIT a Delphi TField.DataType
[*] Martin Pavera <martin.pavera(zv)cmail(tec)cz> - 8.7.2005 11:39:26
Ja jsem tu proceduru uz prepsal, ale zjistil jsem, ze primo v te procedure
neni problem, ze problem je v tom, ze atribut typu BIT je pro Delphi
ftSmallInt... Nemuzu definovat sloupecky v QDBGridu rucne, protoze to
potrebuji nacitat dynamicky... Jde nejak jinak v Delphi (ZEOS) zjistit, ze
dany atribut je BIT a ne SMALLINT ?
Martin Pavera
> Mam obavu, ze v tomto pripade to znamena bud prepsat onu proceduru nebo ji
> prestat pouzivat a radkove seznamy vzdy nadefinovat "rucne". Prepsanim
> rozumim ziskani dodatecnych informaci o sloupci napr. z nejakych dalsich
> metadat one DB.
>
> S pozdravem
>
> Milan Tomes
MySQL atribut typu BIT a Delphi TField.DataType
[*] Martin Pavera <martin.pavera(zv)cmail(tec)cz> - 8.7.2005 11:23:25
Zrovna ja taky pouzivam Developer Express Quantum Grid, jenze problem je v
tom, ze po otevreni dat nechavam Grid, aby si automaticky vytvoril sloupce
podle aktualnich dat pomoci procedury
"dxDBGrid1.CreateDefaultColumns(dxDBGrid1.DataSource.DataSet, dxDBGrid1);".
ZEOS "TZQuery.Fields[x].DataType" u atributu "BIT" vraci hodnotu
"ftSmallInt"...
Kdyz pouziju v jedne tabulce atribut typu "BIT" a "SMALLINT" nebo "TINYINT"
tak je v Delphi nepoznam - vsechny jsou "ftSmallInt". Jak na to ? Potrebuji
je rozlisit, abych v QuantumGridu cislo zobrazoval jako cislo a "boolean"
jako checkbox....
Diky za radu. Martin Pavera
> No tak to taky neni uplne pravda - my pouzivame Developer Express Quantum
> Grid a ten ma moznost nastaveni hodnoty, pri ktere je checkbox
> checked/unchecked/grayed. A ohledne DBCheckBoxu by asi nebyl problem tohle
> osetrit na urovni nejakeho potomka.
>
> S pozdravem
>
> Milan Tomes MySQL atribut typu BIT a Delphi TField.DataType
[*] Milan Tomes <delphi(zv)haida(tec)cz> - 8.7.2005 11:21:24
Mam obavu, ze v tomto pripade to znamena bud prepsat onu proceduru nebo ji
prestat pouzivat a radkove seznamy vzdy nadefinovat "rucne". Prepsanim
rozumim ziskani dodatecnych informaci o sloupci napr. z nejakych dalsich
metadat one DB.
S pozdravem
Milan Tomes
> [mailto:delphi-l-owner(zv)clexpert(tec)cz] On Behalf Of Martin Pavera
> Sent: Friday, July 08, 2005 11:11 AM
>
> Zrovna ja taky pozivam Developer Express Quantum Grid, jenze
> problem je v tom, ze po otevreni dat nechavam Grid, aby si
> automaticky vytvoril sloupce podle aktualnich dat pomoci
> procedury
> "DBGridCreateDefaultColumns(dxDBGrid1.DataSource.DataSet,
>
> > No tak to taky neni uplne pravda - my pouzivame Developer Express
> > Quantum Grid a ten ma moznost nastaveni hodnoty, pri ktere
> je checkbox
> > checked/unchecked/grayed. A ohledne DBCheckBoxu by asi
> nebyl problem
> > tohle osetrit na urovni nejakeho potomka.
> >
> > S pozdravem
> >
> > Milan Tomes
>
>
>
> MySQL atribut typu BIT a Delphi TField.DataType
[*] Martin Pavera <martin.pavera(zv)cmail(tec)cz> - 8.7.2005 11:11:23
Zrovna ja taky pozivam Developer Express Quantum Grid, jenze problem je v
tom, ze po otevreni dat nechavam Grid, aby si automaticky vytvoril sloupce
podle aktualnich dat pomoci procedury
"DBGridCreateDefaultColumns(dxDBGrid1.DataSource.DataSet, dxDBGrid1);".
ZEOS "TZQuery.Fields[x].DataType" u atributu "BIT" vraci hodnotu
"ftSmallInt"...
Kdyz pouziju v jedne tabulce atribut typu "BIT" a "SMALLINT" nebo "TINYINT"
tak je v Delphi nepoznam - vsechny jsou "ftSmallInt". Jak na to ? Potrebuji
je rozlisit, abych v QuantumGridu cislo zobrazoval jako cislo a "boolean"
jako checkbox....
Diky za radu. Martin Pavera
> No tak to taky neni uplne pravda - my pouzivame Developer Express Quantum
> Grid a ten ma moznost nastaveni hodnoty, pri ktere je checkbox
> checked/unchecked/grayed. A ohledne DBCheckBoxu by asi nebyl problem tohle
> osetrit na urovni nejakeho potomka.
>
> S pozdravem
>
> Milan Tomes
hook na uzavreni jine aplikace
[*] Ing. Jiri Novacek <jnovacek(zv)zmvs(tec)cz> - 8.7.2005 10:57:21
Dobry den,
Napsal jsem si HOOK, ktery mam v DLL. Potrebuji v jistem okamziku zabranit
jinemu oknu v uzavreni. To znamena aby se po stisku tlacitka OK, Konec,
Storno... nestalo nic.
Pouzil jsem
CBT_HookHandle := SetWindowsHookEx(WH_CBT, (zv)CBTHookProc, HInstance, 0);
pravdeodobne jsem vsak v tomto haku pouze informovan o HCBT_DESTROYWND.
Jak se da odfiltrovat zprava na ukonceni okna.
Druha otazka
Opet mam hook, tentokrat ale na mys. Kdyz prejedu nad formularem jine
aplikace jsem schopen zjistit: Text, Class, Style, Handle, ID..., ale jak
zjistim, ze se jedna o tlacitko. Sledovat Class a tam zjistovat Button
neni to prave, protoze to muze byt i TButton, TBitBtn a vpodstate cokoli
co si programator prislusne aplikace vymisli.
Predem moc dekuji Novacek
MySQL atribut typu BIT a Delphi TField.DataType
[*] Vaclav Halik <spravasd(zv)suz.cvut(tec)cz> - 8.7.2005 10:37:20
Milan Tomes napsal(a):
>No tak to taky neni uplne pravda - my pouzivame Developer Express Quantum
>Grid a ten ma moznost nastaveni hodnoty, pri ktere je checkbox
>checked/unchecked/grayed.
>
Jasne, ale kazdy nepouziva tyto krasne komponenty. Respektive
predpokladam je je tady ma malokdo. Proto jsem to ani nezminoval.
> A ohledne DBCheckBoxu by asi nebyl problem tohle
>osetrit na urovni nejakeho potomka.
>
>
Ano, to by slo, ale proc si pridelavat zbytecne praci :-)
Vaclav Halik
MySQL atribut typu BIT a Delphi TField.DataType
[*] Milan Tomes <delphi(zv)haida(tec)cz> - 8.7.2005 10:27:19
No tak to taky neni uplne pravda - my pouzivame Developer Express Quantum
Grid a ten ma moznost nastaveni hodnoty, pri ktere je checkbox
checked/unchecked/grayed. A ohledne DBCheckBoxu by asi nebyl problem tohle
osetrit na urovni nejakeho potomka.
S pozdravem
Milan Tomes
> [mailto:delphi-l-owner(zv)clexpert(tec)cz] On Behalf Of Vaclav Halik
> Sent: Friday, July 08, 2005 10:09 AM
>
> >No mozna staci z uspornych duvodu CHAR(1) a davat tam "A" / "N"
> >("Y" / "N")
>
> Nestaci, vtip je v tom ze sice usetris misto, ale pak se ti
> na takovy sloupec nechytene treba TDBCheckBox, nebo pokud
> budes chtit v nejakem lepsim DBGridu zobrazovat CheckBoxy tak
> si nahrany.MySQL atribut typu BIT a Delphi TField.DataType
[*] Vaclav Halik <spravasd(zv)suz.cvut(tec)cz> - 8.7.2005 10:09:18
>No mozna staci z uspornych duvodu CHAR(1) a davat tam "A" / "N"
>("Y" / "N")
Nestaci, vtip je v tom ze sice usetris misto, ale pak se ti na
takovy sloupec nechytene treba TDBCheckBox, nebo pokud budes
chtit v nejakem lepsim DBGridu zobrazovat CheckBoxy tak si nahrany.
Vaclav Halik
MySQL atribut typu BIT a Delphi TField.DataType
[*] MUDr. Patrik Valenta <valentapat(zv)volny(tec)cz> - 8.7.2005 09:47:16
> s uspechem pouzivam k ukladani typu boolean, sloupec varchar(5).
No mozna staci z uspornych duvodu CHAR(1) a davat tam "A" / "N" ("Y" /
"N")
valik MySQL atribut typu BIT a Delphi TField.DataType
[*] Vaclav Halik <spravasd(zv)suz.cvut(tec)cz> - 8.7.2005 09:17:14
Zdravim,
>Potebuji vedet typ sloupecku pro spravne zobrazeni dat v gridech...
>Pro pristup k datum MySQL pouzivam ZEOS komponenty.
>
>
s uspechem pouzivam k ukladani typu boolean, sloupec varchar(5).
Uznavam ze to neni uplne ciste a neni to zrovna podle moji predstavy
o cistem kodu, ale funguje to naprosto bezproblemove. Funguje to s
kazdou komponentou. Je pak celkem prijemne, ze mas ve sloupcich
i v DB hodnoty True a False, coz se hodne pekne cte.
Pokud nekdo vi o lepsim reseni pak se rad poucim.
S pozdravem Vaclav Halik
cestina v konzolove aplikaci
[*] Jan Fiala <jan.fiala(zv)wo(tec)cz> - 7.7.2005 17:50:08
7.7.2005 Petr Vesely:
> Zdravim,
> jakym zpusobem dosahnu zobrazeni ceskych znaku s diakritikou
> pri vypisu pomoci write/writeln na konzoli?
> Je to zalezitost OS, Delphi nebo spustene aplikace?
Musis pozivat OEM kodovani (Latin2)
Konverzni funkce AnsiToOEM() by ti mohla pomoc
--
Jan Fiala
mailto:jan.fiala(zv)wo(tec)cz
cestina v konzolove aplikaci
[*] Petr Vesely <petr.vesely(zv)upce(tec)cz> - 7.7.2005 17:38:07
Zdravim,
jakym zpusobem dosahnu zobrazeni ceskych znaku s diakritikou
pri vypisu pomoci write/writeln na konzoli?
Je to zalezitost OS, Delphi nebo spustene aplikace?
Pouzivam D6, Win2000 Eng, Regional Options mam nastaveno na Czech.
Diky, Petr.
ukoncenie aplikacie po urcitom case necinnosti
[*] PCservis Skloform a.s. <pcservis(zv)skloform(tec)cz> - 7.7.2005 14:05:47
Zdar a silu!
Urcite do hlavniho formu, ale pro dotazovany ucel je to asi uplne jedno, hlavne aby byl zapnuty timer. Nejlepsi bude to vyzkouset.
V helpu k TApplicationEvents je popsano pouziti ve vice formech asi takto (trenuju svou slabou anglictinu):
- kazdy formular aplikace muze mit vlastni objekt TApplicationEvents
- kazda udalost nastane pro vsechny objekty TApplicationEvents v projektu
- ke zmene poradi, ve kterem odlisne objekty TApplicationEvents prijimaji udalosti mame pouzit metodu Activate.
- pokud chceme jine objekty TApplicationEvents vyloucit z prijmu udalosti, mame pouzit metodu CancelDispatch
Jirka
----- Original Message -----
From: "mato" <mato.tino(zv)inmail.sk>
To: <delphi-l(zv)clexpert(tec)cz>
Sent: Thursday, July 07, 2005 12:53 PM
Subject: Re: ukoncenie aplikacie po urcitom case necinnosti
> toto vyzera dobre a kde mam ten kod dat ? Ak mam v aplikacii viac formularov
> ?
>
>> interval, last_msg_date, cas_rozdil: TDateTime;
>> interval:= StrToTime('0:10');
>>
>> procedure Timer_msgTimer(Sender: TObject);
>> begin
>> // u vypoctu delsich nez casovy interval by to chtelo timer vypinat
>> cas_rozdil:= Now - last_msg_date;
>> if cas_rozdil > interval then... // NIC NEDELAS, ZAVIRAM!
>> end;
>>
>> // komponenta ApplicationEventsMessage (zalozka Additional)
>> procedure ApplicationEvents1Message(var Msg: tagMSG; var Handled:
> Boolean);
>> begin
>> case msg.message of
>> WM_keydown, WM_LBUTTONDOWN, WM_MBUTTONDOWN,
>> WM_RBUTTONDOWN, WM_MOUSEWHEEL,WM_MOUSEMOVE: last_msg_date:= Now;
>> end;
>> end;
>
>
>
>
>
TListView - checked event
[*] p.sestak(zv)corag.sk - 7.7.2005 14:07:47
Hmm,
v mojom pripade uplne plati RTFM!
uplne to riesi TListVie.OnChange.
p.
delphi-l-owner(zv)clexpert(tec)cz wrote on 07.07.2005 14:01:46:
> Zdravim,
> mam ListView s check boxami. Potreboval by som odchytit nejaku odalost,
> ked uzivatel zaskrtne/odskrtne nejaky checkbox na konkretnej ListItem.
> Bohuzial TListItem nema ziadne events a na TListView som nic take
nenasiel
> (napr. OnItemChecked ;o( )
>
> s pozdravom
> Palo
>
>
>
MySQL atribut typu BIT a Delphi TField.DataType
[*] Martin Pavera <martin.pavera(zv)cmail(tec)cz> - 7.7.2005 14:05:47
Zdravim *,
mam jeden problem:
v MySQL 4.1 v tabulkach pouzivam pro ulozeni informaci typu "boolean
(ano/ne)" atribut s typem BIT. Problem nastava ve chvili, kdyz v Delphi se
snazim zjistit typ sloupecku pomoci Field.DataType - Delphi mi vraceni typ
ftSmallint. Proc nedostavam ftBoolean ?
Potebuji vedet typ sloupecku pro spravne zobrazeni dat v gridech...
Pro pristup k datum MySQL pouzivam ZEOS komponenty.
Dekuji za odpoved
Martin Pavera
TListView - checked event
[*] p.sestak(zv)corag.sk - 7.7.2005 14:01:46
Zdravim,
mam ListView s check boxami. Potreboval by som odchytit nejaku odalost,
ked uzivatel zaskrtne/odskrtne nejaky checkbox na konkretnej ListItem.
Bohuzial TListItem nema ziadne events a na TListView som nic take nenasiel
(napr. OnItemChecked ;o( )
s pozdravom
Palo
Streaming hodnot Variant
[*] Martin Schayna <mschayna(zv)aktis(tec)cz> - 7.7.2005 13:51:45
Jiri Kulisek wrote:
> nevite nekdo o jednoduchem a sikovnem zpusobu pro obecny a univerzalni
> streaming hodnot typu Variant/OleVariant ? Mam na mysli neco jako
>
> - procedure VariantToStream(AValue: Variant; Stream: TStream);
> - function VariantFromStream(AStream: TStream): Variant;
Co pouzit TReader/TWriter? Jediny problem jsou pole
(TWriter.WriteVariant neumi pole) ale to by slo vyresit primitivni
obalkou kolem.
Martin Schayna
ukoncenie aplikacie po urcitom case necinnosti
[*] mato <mato.tino(zv)inmail.sk> - 7.7.2005 12:53:41
toto vyzera dobre a kde mam ten kod dat ? Ak mam v aplikacii viac formularov
?
> interval, last_msg_date, cas_rozdil: TDateTime;
> interval:= StrToTime('0:10');
>
> procedure Timer_msgTimer(Sender: TObject);
> begin
> // u vypoctu delsich nez casovy interval by to chtelo timer vypinat
> cas_rozdil:= Now - last_msg_date;
> if cas_rozdil > interval then... // NIC NEDELAS, ZAVIRAM!
> end;
>
> // komponenta ApplicationEventsMessage (zalozka Additional)
> procedure ApplicationEvents1Message(var Msg: tagMSG; var Handled:
Boolean);
> begin
> case msg.message of
> WM_keydown, WM_LBUTTONDOWN, WM_MBUTTONDOWN,
> WM_RBUTTONDOWN, WM_MOUSEWHEEL,WM_MOUSEMOVE: last_msg_date:= Now;
> end;
> end;
Posilani digitalne podepsanych emailu
[*] Lukas Gebauer <gebylist(zv)mlp(tec)cz> - 7.7.2005 11:59:37
> jak poslat digitalne podepsany mail? Nekde jsem nasel nejake S-SMTP
> komponenty, ale jejich cena se pohybuje nad 300$/vyvojar a to je celkem
> dost ... Dalsi varianta je pouzit SimpleMAPI, ale s OutlookExpressem mi
> to posila odepsany mail (nastaveno vzdy podepisovat) pouze pokud necham
> zobrazit okno s mailem ... Radeji bych posilal maily bez nutnosti
> interakce s uzivatelem ...
No, da se pouzit i free reseni.
A to tak, ze ten mail podepises pomoci OpenSSL, CryptLibu ci
OpenStreamSecII, a vysledny text podepsaneho mailu pak uz odesles
treba pres Synapsi ci pomoci Indy.
--
Lukas Gebauer.
E-mail: gebauerl(zv)mlp(tec)cz
http://www.ararat(tec)cz/synapse/ - Ararat Synapse - TCP/IP Lib.Posilani digitalne podepsanych emailu
[*] Daniel Frantik <frantik(zv)telpro(tec)cz> - 7.7.2005 11:47:36
Dobry den,
jak poslat digitalne podepsany mail? Nekde jsem nasel nejake S-SMTP
komponenty, ale jejich cena se pohybuje nad 300$/vyvojar a to je celkem
dost ... Dalsi varianta je pouzit SimpleMAPI, ale s OutlookExpressem mi
to posila odepsany mail (nastaveno vzdy podepisovat) pouze pokud necham
zobrazit okno s mailem ... Radeji bych posilal maily bez nutnosti
interakce s uzivatelem ...
Diky za namety,
Danik
ukoncenie aplikacie po urcitom case necinnosti
[*] PCservis Skloform a.s. <pcservis(zv)skloform(tec)cz> - 7.7.2005 10:59:33
>> Pokud jde o sledovani uzivatele pres mys nebo klavesnici, tak
>> se da s uspechem pouzit toto:
>>
>> interval, last_msg_date, cas_rozdil: TDateTime;
>> interval:= StrToTime('0:10');
>>
>> procedure Timer_msgTimer(Sender: TObject);
>> begin
>> // u vypoctu delsich nez casovy interval by to chtelo timer vypinat
>> cas_rozdil:= Now - last_msg_date;
>> if cas_rozdil > interval then... // NIC NEDELAS, ZAVIRAM!
>> end;
>>
>> // komponenta ApplicationEventsMessage (zalozka Additional)
>> procedure ApplicationEvents1Message(var Msg: tagMSG; var
>> Handled: Boolean);
>> begin
>> case msg.message of
>> WM_keydown, WM_LBUTTONDOWN, WM_MBUTTONDOWN,
>> WM_RBUTTONDOWN, WM_MOUSEWHEEL,WM_MOUSEMOVE: last_msg_date:= Now;
>> end;
>> end;
>
> a propo, nemelo byt na konci EvnetsMsg byt jeste inherited ?
>
Ahoj,
nejsem zadny expert, abych k tomu mohl rici neco navic. Kod chodi tak, jak jsem si pral. Pripominam, ze udalosti jsou odchyceny pomoci komponenty "ApplicationEventsMessage", nikoliv primo z Application. V helpu ke komponente jsem nutnost uvedeni "inherited" nenasel.
Jirka
Posun ve ScrollBox se skrytym ScrollBarem
[*] Cizek.Milan <cizek.milan(zv)seznam(tec)cz> - 7.7.2005 10:37:31
Ahoj,
mam problem. Snazim se vytvorit takove jednoduche posuvne menu, sipka vlevo - scrollbox - sipka vpravo. Do scrollboxu si vytvorim dalsi komponenty a pomoci tlacitek potrebuji posouvat. Jde mi tedy o posun jen horizontalni, vic neresim. Toto funguje, problem je, ze k tomu potrebuji skryt defaultni scrollbox listu, jenze jakmile to provedu, prestane scrolovani uplne fungovat (position, range... vse je 0 a nehybe se). Posouvam timto zpusobem:
procedure TForm1.TimerTimer(Sender: TObject);
begin
Label1.Caption:=IntToStr(ScrollBox1.HorzScrollBar.Position);
case Smer of
spLevo:
ScrollBox1.HorzScrollBar.Position:=ScrollBox1.HorzScrollBar.Position+Posun;
spPravo:
ScrollBox1.HorzScrollBar.Position:=ScrollBox1.HorzScrollBar.Position-Posun;
end;
end;
Muzete mi prosim poradit jak scrolovat se skrytymi posuvniky, pripadne poradit obdobnou komponentu pro muj ucel? Diky
Milan, D7
Jakym odeslat vysledky selectu po TCP
[*] Pavel Smerk <xsmerk(zv)fi.muni(tec)cz> - 7.7.2005 10:19:30
On Thu, Jul 07, 2005 at 09:51:27AM +0200, Borkovec Roman wrote:
> Diky, to je temer ono - jen mam obavy pro pripadne vetsi objemy dat. Ale
> asi je to porad lepsi nez vymyslet vlastni format ulozeni (hlavne bloby
> napr.) - neexistuje nejaka usporna forma xml, aby to nebyl cisty text?
Za(g)zipovat a po prijeti zase rozbalit? Ale prijde mi, ze v dnesni dobe a s
dnesnim HW se setreni bitiky casto nevyplati, clovek si prida praci,
zesloziti kod a usetri par sekund.
P.
> ----- Original Message ----- From: "Svoboda Jiri" <jsvoboda(zv)lekis(tec)cz>
> >> potrebuji odeslat vysledek selectu jine aplikaci pres tcp - jaky
> >> zpusob zvolit? Nejaky vlastni format ulozeni (oddelovace sloupcu,
> >> radku) a poslat jako soubor, nebo existuje neco prirozenejsiho? Nutny
> >> predpoklad: aplikace, ktera vysledky selectu prijima nema zadne db
> >> pripojeni, pouze zobrazi vysledky.
> >> D5Pro SP1 - db obecna
> >
> > asi nejlepsi reseni je XML soubor.
Jakym odeslat vysledky selectu po TCP
[*] Svoboda Jiri <jsvoboda(zv)lekis(tec)cz> - 7.7.2005 09:59:28
>Diky, to je temer ono - jen mam obavy pro pripadne vetsi objemy dat. Ale
asi
>je to porad lepsi nez vymyslet
>vlastni format ulozeni (hlavne bloby napr.) - neexistuje nejaka usporna
>forma xml, aby to nebyl cisty text?
>Roman
Muzes pouzit nejakou komprimacni metodu,napr.ZIP ,ARJ apod. a poslat po siti
uz zkomprimovany soubor a na klientovi to jen rozbalit a zobrazit.
Pro komprimaci lze pouzit komponenty pro tento ucel,najdes je na netu.Jakym odeslat vysledky selectu po TCP
[*] Borkovec Roman <roman.borkovec(zv)bluepixel(tec)cz> - 7.7.2005 09:51:27
Diky, to je temer ono - jen mam obavy pro pripadne vetsi objemy dat. Ale asi
je to porad lepsi nez vymyslet
vlastni format ulozeni (hlavne bloby napr.) - neexistuje nejaka usporna
forma xml, aby to nebyl cisty text?
Roman
----- Original Message -----
From: "Svoboda Jiri" <jsvoboda(zv)lekis(tec)cz>
To: <delphi-l(zv)clexpert(tec)cz>
Sent: Thursday, July 07, 2005 9:09 AM
Subject: Re: Jakym odeslat vysledky selectu po TCP
>
>> Zdravim,
>> potrebuji odeslat vysledek selectu jine aplikaci pres tcp - jaky
>> zpusob
>> zvolit? Nejaky vlastni format ulozeni (oddelovace sloupcu, radku) a
>> poslat
>> jako soubor, nebo existuje neco prirozenejsiho? Nutny predpoklad:
> aplikace,
>> ktera vysledky selectu prijima nema zadne db pripojeni, pouze zobrazi
>> vysledky.
>> D5Pro SP1 - db obecna
>> Diky Roman
>
> asi nejlepsi reseni je XML soubor.
> JS
>
>
>
>
>
Jakym odeslat vysledky selectu po TCP
[*] Svoboda Jiri <jsvoboda(zv)lekis(tec)cz> - 7.7.2005 09:09:24
> Zdravim,
> potrebuji odeslat vysledek selectu jine aplikaci pres tcp - jaky zpusob
> zvolit? Nejaky vlastni format ulozeni (oddelovace sloupcu, radku) a poslat
> jako soubor, nebo existuje neco prirozenejsiho? Nutny predpoklad:
aplikace,
> ktera vysledky selectu prijima nema zadne db pripojeni, pouze zobrazi
> vysledky.
> D5Pro SP1 - db obecna
> Diky Roman
asi nejlepsi reseni je XML soubor.
JS
Jakym odeslat vysledky selectu po TCP
[*] Borkovec Roman <roman.borkovec(zv)bluepixel(tec)cz> - 7.7.2005 09:03:23
Zdravim,
potrebuji odeslat vysledek selectu jine aplikaci pres tcp - jaky zpusob
zvolit? Nejaky vlastni format ulozeni (oddelovace sloupcu, radku) a poslat
jako soubor, nebo existuje neco prirozenejsiho? Nutny predpoklad: aplikace,
ktera vysledky selectu prijima nema zadne db pripojeni, pouze zobrazi
vysledky.
D5Pro SP1 - db obecna
Diky Roman
Vypnuti/Zapnuti Sie pres COM
[*] Bc. Jiri Cincura <diskuze(zv)cincura(tec)net> - 7.7.2005 08:19:20
Milos Sontak wrote (on Wednesday, July 06, 2005 10:58 PM):
> zdravim,
>
> vypnout se da pomoci AT prikazu napr.
> VaComm1.WriteText('AT^SMSO'+#13);
>
Nasel jsem. Ale nikde u siemensu jsem nenasel na zapnuti (pritom to musi
jit, neb takove ty programy na flash-fw to delaji). A take jsem nikde
nenasel oficialni nastaveni komunikace. Vzdy jsem nasel jen "me se
osvedcilo..." atp. Nema nekdo toto nastaveni po ruce?
--
Bc. Jiri Cincura
http://www.ID3renamer.com/
ICQ: 314711544; Yahoo!: x2develop
http://photo.cincura.net/Zmena barvy ikony a blokovani propojeni na interne
[*] Jan Fiala <jan.fiala(zv)wo(tec)cz> - 7.7.2005 08:17:20
7.7.2005 Zapletal Martin:
> Dobry den, mozna je to trosku specificky dotaz ale mam aplikaci psanou v
> Delphi 5 ktera pres RS232 sbira nejaka data a uklada je na disk. Ve svete
> bezi stovky tehto instalaci ale jen jeden zakaznik si stezuje ze se po
> spusteni aplikace zmeni jeji ikona v liste na cervenou (zadnou takovou ikonu
> program neobsahuje) a pry prestane fungovat spojeni na internet. Zakaznik to
> provozuje na nejakem serveru PC AMD 2400+ XP CZ. Mimo to na tomto serveru
> behaji aplikace Firewall, Mailserver a FTP server(Cerberus), Bezi zde
> Mailserver a Winroute Firewall od fy. Kerio a antivirovy program AVG 7.0
> Mail Edition.
> Rad bych se zeptal zda nekdo nevite proc se toto deje? Zakaznik nas obvinuje
> ze mu to blokuje nase aplikace ale ja si osobne myslim ze to bude delat
> nejaka z tech aplikaci jeho. Nevite co se deje nebo co mam spatne?
Nech si poslat ScreenShot s tou cervenou ikonou. Mozna pak zjistis, ze
je to ikona uplne jineho programu...
--
Jan Fiala
mailto:jan.fiala(zv)wo(tec)cz
Zmena barvy ikony a blokovani propojeni na interne
[*] Zapletal Martin <zapletal(zv)inoma(tec)cz> - 7.7.2005 08:09:19
Dobry den, mozna je to trosku specificky dotaz ale mam aplikaci psanou v
Delphi 5 ktera pres RS232 sbira nejaka data a uklada je na disk. Ve svete
bezi stovky tehto instalaci ale jen jeden zakaznik si stezuje ze se po
spusteni aplikace zmeni jeji ikona v liste na cervenou (zadnou takovou ikonu
program neobsahuje) a pry prestane fungovat spojeni na internet. Zakaznik to
provozuje na nejakem serveru PC AMD 2400+ XP CZ. Mimo to na tomto serveru
behaji aplikace Firewall, Mailserver a FTP server(Cerberus), Bezi zde
Mailserver a Winroute Firewall od fy. Kerio a antivirovy program AVG 7.0
Mail Edition.
Rad bych se zeptal zda nekdo nevite proc se toto deje? Zakaznik nas obvinuje
ze mu to blokuje nase aplikace ale ja si osobne myslim ze to bude delat
nejaka z tech aplikaci jeho. Nevite co se deje nebo co mam spatne?
Zapletal Martin
string Grid
[*] Vlastimil Burian <vlastax.b(zv)seznam(tec)cz> - 7.7.2005 00:15:39
pokud vim tak TJvStringGrid (JVCL 3.00) bohuzel veci jako vicenasobny select
nebo wrapping radku neumi, alespon ten font je rozlisen (FixedFont vs.
Font), spis je obohacen o manipulacni metody ... asi nezbyde nez poohlednout
se na Torry
nevite nekdo o nejake vylepsene verzi komponenty StringGrid, u ktere by se
dalo do jedne bunky psat do vice radku a daly se vybirat ruzne bunky
(select), pripadne se dal nastavit ruzny font pro fixed a pro ostatni bunky?
Nejlepe free. Zkousel jsem StringGrid z JVCL, ale help je chudy a na nic moc
jsem neprisel. Nejlepsi by bylo, kdyby jste nekdo vedel jak dosahnout vyse
popsaneho u teto verze StringGridu (z JVCL).