Archív konference Delphi

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

Heslovani Woknows...znovu

[*] eL <eL_z_Prahy(zv)seznam(tec)cz> - 22.7.1999 10:32:45



Mal� Dobromil wrote:

> Muzu se zeptat o co se jedna ?
> Nejde mi tet http, diky.
> Dobra.
>

Je to PGP kodovani pro mail atd. a krom jineho obsahuje "PGP
disk".Funguje to asi tak, ze si reknes jak ma disk byt veliky, jak se
bude jmenovat a kam se umisti soubor s daty, pak te to necha chvili
"smrdalt" mysi po screenu aby se to naplnilo nejakymi nahodnymi
pocatecnimi daty vyberes si heslo no a pak se ti ve Win objevi novy
disk, ktery normalne formatujes, kopirujes do nej data (zkousel jsem do
toho umistit i Paradoxi databazi a vsechno behalo) ten disk se chova
uplne normalne ale muzes ho "odmontovat" a proste zmizi. Pak staci
poklepnout na vytvoreny soubor no a po zadani hesla se disk zase objevi.
Heslovani by melo byt dost dobre. Da se to dobre pouzit i treba na
zabezpeceny "prenos" dat po disketach. Ja jsem si udelal takovyhle 1,4MB
disk a ukladam si tam "citlive" informace jako hesla apod. no a pak to
klidne zalohuju (je to normalni soubor) kamkoliv bez obav, ze by to
nekdo nekdy nejak zneuzil.

eL..

Tady je kousek z dokumentace.
-----

What�s new in PGP version 6.0
This version of PGP includes these new features:
� Secure Viewer. Secure Viewer is PGP�s software solution to protect the

private information on your computer screen from interception through
electromagnetic radiation�also known as TEMPEST attacks. It is widely
known that eavesdroppers, with special equipment, can capture and
reconstruct video screen content from radio frequency radiation. When
text
is encrypted with the Secure Viewer option enabled, the decrypted text
is
displayed in a special TEMPEST attack prevention font and window that
are unreadable to radiation capturing equipment. The Secure Viewer
feature allows you to securely view your decrypted text.
� PGPdisk Functionality. PGPdisk functionality is built into PGP version

6.0. PGPdisk is an easy-to-use encryption application that enables you
to
set aside an area of disk space for storing your sensitive data.
� Designated Revokers. You may now specify that another public key on
your keyring is allowed to revoke your key. This can be useful in
situations
where you are afraid of losing your private key, forgetting your
passphrase, or in extreme cases such as a physical incapacity to use the
key.
In such cases, the third-party you designate will be able to revoke your
key,
send it to the server and it will be just as if you had revoked it
yourself.
� Added Plug-ins. Email plug-ins for Outlook Express and Outlook 98 are
included. A Groupwise plugin is available separately.
� Added Plug-ins. Email plug-ins for Outlook Express and Outlook 98 are
included. A Groupwise plugin is available separately.
� PGPdisk Functionality. PGPdisk functionality is built into PGP version

6.0. PGPdisk is an easy-to-use encryption application that enables you
to
set aside an area of disk space for storing your sensitive data.
� Photographic User ID. You can add your photograph to your public key.
Photo IDs can be signed just like a user ID to provide extra information

when verifying the key.
------
New features of PGPdisk
� Public Key Support. A public key or multiple public keys can now be
configured to open a PGPdisk. This support is integrated with PGP 6.0
and
its keyrings. For example, if Bob wants to give his wife Mary access to
his
PGPdisk, he can give access to Mary by adding her public key to the
PGPdisk. The key for the disk will be encrypted to Mary's key.
� New Disk Wizard. The process of creating a PGPdisk has been simplified

by a New Disk Wizard which will guide you through the process step by
step.
� Windows NT Support. PGPdisk now runs on Windows NT 4.0 in addition
to Windows 95, 98, and MacOS.

Stlacenie klavesy ENTER

[*] Mal� Dobromil <dodo(zv)rak.pr.ds.mfcr(tec)cz> - 22.7.1999 10:42:33

Ahoj, staci to jen trochu upravit a uz to pipat nebude...
(viz puvodni "source")

--------------------
> Snazim sa odchytit udalost stlacenia klavesy ENTER v Edit boxe a
> sparacovat ju.
> Vsetko je ok, len pri stlaceni klavesy ENTER sa ozve pipnutie
> pocitaca.
> Vedel by mi niekto poradit ako toto odstanit?
>
>
> procedure TForm5.Edit3KeyPress(Sender: TObject; var Key: Char);
> begin
> if Key=Chr(13) then
> begin
> ProcessAnswer; {procedura na spracovanie udalosti}
Key:=#0; { *** tady pripis toto ***}
> end;
> end;
>
>
> Miro
>

Heslovani Woknows...znovu

[*] Mal� Dobromil <dodo(zv)rak.pr.ds.mfcr(tec)cz> - 22.7.1999 10:49:30

Aha, diky. To je neco jako Discreet od Nortona.
D.

> ----------
> > Muzu se zeptat o co se jedna ?
> > Nejde mi tet http, diky.
> ...Funguje to asi tak, ze si reknes jak ma disk byt veliky, jak se
> bude jmenovat a kam se umisti soubor s daty, pak te to necha chvili
> "smrdalt" mysi po screenu aby se to naplnilo nejakymi nahodnymi
> pocatecnimi daty vyberes si heslo no a pak se ti ve Win objevi novy
> disk, ktery normalne formatujes,...

DdeServerItem

[*] Bob <delphi(zv)alf.dingo(tec)cz> - 22.7.1999 10:57:46

Hi Delphisti,

kamarad ma problem.

Kdyz da na plochu vyse zminenou komponentu, tak to vse pracuje jak ma.
Ale kdyz ji vytvori za behu programu, tak proste nefunguje.
Nevite nekdo, kde muze delat chybu?

Dik za nej.

Bob


Memo BLOB (?)

[*] Mal� Dobromil <dodo(zv)rak.pr.ds.mfcr(tec)cz> - 22.7.1999 10:59:31

This message is in MIME format. Since your mail reader does not understand
this format, some or all of this message may not be legible.

Ahoj,
prosim pomozte. Potreboval bych v souborove (pdx) databazi ulozit
vetsi
mnozstvi holeho textu (asi 200kB), udelal jsem si tabulku a k ni jedno
Memo pole (na zobrazeni jsem pouzil DBMemo), ale tam se toho moc
nevejde,
tak jsem zkusil i Formated Memo (a k tomu i odpovidajici komponentu
DBRichEdit), ale i to je prilis male.

Poradte mi prosim, jak to udelat.

Diky moc, Dobra.

Generovani bitmap ve threadu

[*] Pavel �im��ek - 22.7.1999 11:11:02

No to nejde jen tak povesit ten Panel do luftu. To musis mit nejaky Form na
ktery ho das, takze si nejaky vytvor.
Pavel


>No jo, kde mam ten Parent sehnat, kdyz ve threadu ani jinde v aplikaci ten
>Form nemam?
>
>Martin Uher
>
>
>-----Original Message-----
>From: Petr Brant [mailto:p.brant(zv)samo(tec)cz]
>Sent: 22. �ervence 1999 9:41
>To: delphi-l(zv)fwd(tec)cz
>Subject: RE: Generovani bitmap ve threadu
>
>
>Ahoj,
>
>kdyz pouzijes
>
>var Panel:TPanel;
>
>begin
> Panel:=TPanel.Create(nil);
>, musis pak nekde napsat
>
> Panel.Parent:=Tvuj_Form_kde_ma_panel_byt;
>
>atd.
>
>**************************************************
>Petr Brant [p.brant(zv)samo(tec)cz], programator v MSVC++,
>obcas Delphi nebo Visual Basic
>**************************************************
>
>> -----P�vodn� zpr�va-----
>> Od: muher(zv)csas(tec)cz [SMTP:muher(zv)csas(tec)cz]
>> Odesl�no: 22. �ervence 1999 7:43
>> Komu: delphi-l(zv)fwd(tec)cz
>> P�edm�t: Generovani bitmap ve threadu
>>
>> Zdravim vsechny
>> Snazim se vyvolat thread ve kterem vytvarim bitmapy (ty pak prevadim
>> na
>> jpeg). Mel by to byt obrazek s chybovym hlasenim, tedy vytvorim Panel,
>> Label1, Label2, Bitmapa a kdyz pak zkousim provadet
>> Panel.LineTo(Bitmapa.Canvas.Handle, 0, 0). A ted nasleduji dve
>> moznosti,
>> kdyz na zacatku pouziju TPanel.CreateParented(HWND_pro_TCPIP), tak
>> vysledny
>> obrazek ma 0 byte, kdyz pouziju TPanel.Create(Nil), dostanu chybu
>> 'Control
>> '' has no parent wondow'.
>> Muzete mi paradit? Jak by to slo vyresit jinak? Co musim jeste
>> dodelat?
>>
>> Dekuji
>>
>> Martin Uher
>

Memo BLOB (?)

[*] Martin Lasevic, ing. <vyvoj(zv)atlascon(tec)cz> - 22.7.1999 11:22:21

Mam neprijemny pocit, ze PARADOX je na takove mnozstvi nevhodny.

Pokud by si na tom trval, pak mne napada ulozeni nazvu souboru do tabulky a blob ulozit do externiho souboru ( rtf).

Paradox by takove kvantum asi nezvlad.

Preji hezky den .....
============================================
ML Software - Martin Lasevic
Budovatelska 459,
708 00 Ostrava - Poruba
tel.: + 420 (69) 691 85 11, 0603 338 765
mailto:ml_software(zv)email(tec)cz
mailto:+420603338765(zv)sms.paegas(tec)cz
http://cement.fmi(tec)cz/ml_software
ICQ:33630882
============================================


-----Puvodni zprava-----
Od: Maly Dobromil [SMTP:dodo(zv)rak.pr.ds.mfcr(tec)cz]
Odeslano: 22. eervence 1999 11:00
Komu: #Delphi-K
Poedmit: Memo BLOB (?)

Ahoj,
prosim pomozte. Potreboval bych v souborove (pdx) databazi ulozit vetsi
mnozstvi holeho textu (asi 200kB), udelal jsem si tabulku a k ni jedno
Memo pole (na zobrazeni jsem pouzil DBMemo), ale tam se toho moc nevejde,
tak jsem zkusil i Formated Memo (a k tomu i odpovidajici komponentu
DBRichEdit), ale i to je prilis male.

Poradte mi prosim, jak to udelat.

Diky moc, Dobra.


begin 600 WINMAIL.DAT
M>)\^(A<)`0:0" `$```````!``$``0>0!(zv)`(````X(zv)0```````#F``$((zv) <`
M& ```$E032Y-:6-R;W-O9G0(zv)36%I;"Y.;W1E`#$(`0V ! `"`````(zv)`"``$$
MD 8`B $```$````1`````P``, (````+``\.``````(!_P\!````/0``````
M``"!*Q^DOJ,0&9UN`-T!#U0"`````&1E;'!H:2UL0&9W9"YC>(zv)!33510`&1E
M;'!H:2UL0&9W9"YC>(zv)`````>``(P`0````4```!33510`````!X``S !````
M$ ```&1E;'!H:2UL0&9W9"YC>(zv)`#`!4,`0````,`_(zv)\&````'(zv)`!, $````2
M````)V1E;'!H:2UL0&9W9"YC>B<````"`0LP`0```!4```!33510.D1%3%!(
M22U,0$971"Y#6(zv)`````#```Y``````L`0#H!`````P!Q.(zv)`````>`/9?`0``
M`! ```!D96QP:&DM;$!F=V0N8WH``(zv)'W7P$````]`````````($K'Z2^HQ 9
MG6X`W0$/5 (`````9&5L<&AI+6Q 9G=D+F-Z`%--5% `9&5L<&AI+6Q 9G=D
M+F-Z``````,`_5\!`````P#_7P`````"`?8/`0````0````````"0$(zv)!!( !
M`!(```!213H(zv)365M;R!"3$]"("(zv)_*0!N! $%(zv) ,`#(zv)```,\'!P`6``L`%(zv)`5
M``0`+0$!(( #``X```#/!P<`%(zv)`+`!0`*P`$`$$!`0F `0`A````,S(U.4$R
M.$0Q130P1#,Q,4(R,#(zv)P,#(zv)P0S<T.#,V1#<`XP8!`Y &`% (```B````"P`"
M``$````+`",```````,`)(zv)``````"P`I```````#`"X```````,`-(zv)``````
M0 `Y`$"?JK,CU+X!'(zv)!P``$````.````365M;R!"3$]"("(zv)_*0````(!<0`!
M````&P````&^U"#*4%?JMS! %!'3D:(zv)`X"D/:O0``*NP( `>`!X,`0````4`
M``!33510`````!X`'PP!````$0```$QA<V5V:6- 871L87,N8WH``````P`&
M$".\$HP#``<0A0,``!X`"! !````90```$U!34Y%4%))2D5-3EE03T-)5"Q:
M15!!4D%$3UA*14Y!5$%+3U9%34Y/6E-45DE.159(3T1.65!/2U5$0EE324Y!
M5$]-5%)604PL4$%+34Y%3D%0041!54Q/6D5.24Y!6E954T\``````(zv)$)$ $`
M``#X! ``] 0``.0'``!,6D9U9;^85 ,`"(zv)!R8W!G,3(U%P%#`30+8&X.$# R
M.9T!]R "I /C`(zv)!C: K 0'-E=#(S. ``*G4"X6$'(zv)" '$P* !Q,(zv)/$-%`H,`
M4 +R$-H(zv)5"QA: -Q`H,R$&=P<K1Q-Q#7,!(F`?$S%6KO%5$0_Q(/$Q0T!$85
MTQ-Q?QB/&9$(50>R`H =61+S?;,*(zv) C((#L);PXP-0* V0J!=6,`4 L#8Q-B
M"\0C!= 9(zv)"!N917P:6H`96UN>2!P;V,(zv):70L('H9H%!!P%)!1$]8(". (R#$
M82 !D&MO=AF(zv)(Z! ;WIS='9I(R%V=13 9".P+(zv)JB"H0*(zv)%# ;VMU9"!B(\ `
MD.<E(P-P)5!R=(zv)= )# *L*YK)<$E$(zv)JP9"5 =0D`QR10`P`E(7IV=2(zv)P"&"E
M!N!R*P!D;R518BI SFLCP"5 `F!O8BHS)!#1*Y)E>'0$D6D4P"L7="(zv)(zv)`"$I
M)NP*P"H`;[9X* (E96LI``(P=2,0VF$H0F4JX M(zv)9";K(=9C`M$3<7,Q-R1P
M"7!JO29 :#&(zv)+"$!``.(zv)+C3RNEP/!#,7(zv)150)P,]-F^G-W\X%R;T34P&`&\!
M(zv)'9W"L 9H"TBX0`(zv)"X (zv)WDPQ4"9P#> F]$(GX"60(F$M(zv)&QS:R5 -#4>.20P
M)O4/!A-1(#<P]12 ,!; 3R80+] I`#HQ,R>P*W!B82;T/ $N.(zv)P(zv)*SQ(zv)(L$H
M-CDI!B! D#W0.#4(zv),3%I)# P-C6(zv)(#6P%( W?#8U)O4B,BI )< +<&SA** Z
M;6Q?*R YU#5*C"! (Y!#,2YC>C,C?RI `4!"6#TW*D ]LD,E*Q] 04&10=%"
M$D1;<VUS<BX*L&5G,5!%?T*F:"L"0#TK<$1+.CTK+R^F8R.0"?!T+(zv)10:4J!
MAB]#FDK+24-1.C6P]#8S/(zv)`X-?5$2S(zv)?5%^?.(X]*C)\(E<R>FQI4;#7`4 S
M,A7P;RV 8TPP%W,,,38Z,%L"4%PG9OPY=B:A6V )(zv)"1 %?!;X?XQ*0!;`R;V
M6A1&$PLQ6A9(zv):2TQ-#0!0%E(zv),9XX/C ,P5\3+*!/9$WPO0R28B+2"5!;<"?P
M1"R0`P-A`Q%;4TU44#HK*Z KH$ OT&M*$'(NNF1*`&T<`&,(zv)2I!=)O4_8$('
MD&$Q7( EX&"',C*V+(zv),P6_ X!) EH&Y.\&U!,#EFT$$Q.E^A9 9+)0-P=6"'
M(T0\$'!HG5[P2V/W6U)F,&1M6^$/6E!(zv)B".0*[!"3$]"^2YP/RE='UXJ660:
M\EAWTD$4P&HL)O0(zv)(] #8.\`D",0(^ $8'HM(zv)&7(zv))[ ]*.!E!N I`2(zv)!'! (zv)
M=L,K%262*'!D>$"P*A#?`9$JT"9 +,4EH'0`D2<#\R77%,!L92W1+8 M<"YA
MPS%2`= P:T(I)# GX/L\$!+1:AC (Q H02O4*P#?)4 I<"J1(X FL&\Y)6M2
M[R/(zv)=6 N<"4Q>F&A*M J(zv)IMW4R/(zv)=2SP`R!$0FM"OW:Q!T 9H &0=X%\86\M
MT?T$8&,F4C00`0!O525A=T3=-'!U`) #("9 1(zv)6P`,#_+8 G\&M#=A!X82BA
M*P`F0/\$<"/(zv))C J$#0(zv)) `PP -P7R/(zv)(S Q`2;T>[!2#>!H_$5D)!!\%7>Q
M*[ E`2-1_UE(zv)!" `P'5(zv))NTOT2V )<#W)D!OY"0P:BEAA"%VXT] >2;Z1&DL
M(7U!)#!ADF$7,(zv)\*(zv)!\A`(LP`P`0$ `````#`!$0`0```!X`0A !````,(zv)``
M`#PY0D-&,S<W04(S,D%$,C$Q.38P,S P,3 T0C1&-3)!0S U-$(V,4!&55)A
M:TY4,CX````#`( 0_____T `!S (zv)C0AY(]2^`4 `"# (zv)C0AY(]2^`0L``( (
M( 8``````, ```````!&``````.%`````````P`"(zv) (zv)(zv)!(zv)``````P ``````
M`$8`````$(4````````#``6 "" &``````# ````````1(zv)````!2A0``>Q `
M`!X`"8 (( 8``````, ```````!&`````%2%```!````!0```#(zv)N,#(`````
M`P`*(zv) (zv)(zv)!(zv)``````P ```````$8``````84````````+`!. "" &``````#
M````````1(zv)`````.A0````````,`%( (( 8``````, ```````!&`````!&%
M`````````P`6(zv) (zv)(zv)!(zv)``````P ```````$8`````&(4````````>`"6 "" &
M``````# ````````1(zv)`````VA0```0````$`````````'(zv)`F(zv) (zv)(zv)!(zv)``````
MP ```````$8`````-X4```$````!`````````!X`)X (( 8``````, `````
M``!&`````#B%```!`````0`````````>`#T``0````4```!213H(zv)``````,`
(#33]-P``&!>%
`
end

DBGrid

[*] Martin Fron�k <FRONEK(zv)zznslany(tec)cz> - 22.7.1999 11:34:50

Jenom bych doplnil, ze pokud je mozne pouzit knihovnu RXLib, tak tam je
RxDbGrid, tam je primo udalost, ve ktere staci jen nastavit barvu
pozadi, nebo druh a barvu pisma... Je to jednodussi nez to nize napsane.


Martin Fron�k
ZZN Slan� a.s.
Pra�sk� 1579, 274 49, Slan�
tel. +420-314-522986
e-mail: fronek(zv)zznslany(tec)cz

> -----P�vodn� zpr�va-----
> Od: Martin Lasevic, ing. [SMTP:vyvoj(zv)atlascon(tec)cz]
> Odesl�no: 22. �ervence 1999 8:12
> Komu: 'delphi-l(zv)fwd(tec)cz'
> P�edm�t: RE: DBGrid
>
> Daly a to povesenim metody na udalost OnDrawColumnCell. Priklad, jak
> to resim, prikladam.
>
> //********************************************************************
> **********
> procedure TFKONSZTMP.dbgKlienDrawColumnCell(Sender: TObject;
> const Rect: TRect; DataCol: Integer; Column: TColumn;
> State: TGridDrawState);
> { Metoda zajisti barevne odli?eni star?ich poiznani, ne? je
> RokKonverze. }
> begin
> inherited;
> if ((( Owner as TFKONMDTMP).DM as TFKONDMTMP).tblArchiv.
> FieldByName( 'Rok').AsString >= RokKonverze){ and
> ( Owner as TFKONMDTMP).OdpovidaVerze(( Owner as
> TFKONMDTMP).TableVerze)}
>
> (*
> if ( Owner as TFKONMDTMP).OdpovidaVerze(( Owner as
> TFKONMDTMP).TableVerze, False)
> *)
> then begin
> { posledni rok 1997 }
> _dbgKlien.canvas.brush.color:= clWindow;
> _dbgKlien.canvas.fillrect(rect);
> _dbgKlien.canvas.font.color:= clWindowText;
>
> _dbgKlien.canvas.textout(rect.left+2,rect.Top+2,column.field.AsString)
> ;
> end
> else
> begin
> // Toto je ta podstatna cast
> { barevne odli?eni star?ich roku}
> _dbgKlien.canvas.brush.color:= clActiveBorder;
> _dbgKlien.canvas.fillrect(rect);
> _dbgKlien.canvas.font.color:=clBlue;
>
> _dbgKlien.canvas.textout(rect.left+2,rect.Top+2,column.field.AsString)
> ;
> end;
> end;
>
> Preji hezky den .....
> ============================================
> ML Software - Martin Lasevic
> Budovatelska 459,
> 708 00 Ostrava - Poruba
> tel.: + 420 (69) 691 85 11, 0603 338 765
> mailto:ml_software(zv)email(tec)cz
> mailto:+420603338765(zv)sms.paegas(tec)cz
> http:/cement.fmi(tec)cz/ml_software
> ICQ:33630882
> ============================================
>
>
> -----Puvodni zprava-----
> Od: Dalibor Bednareik [SMTP:d.bednarcik(zv)vpfm(tec)cz]
> Odeslano: 22. eervence 1999 6:54
> Komu: delphi-l(zv)fwd(tec)cz
> Poedmit: DBGrid
>
> Jak by se daly barevne odlisit radky v DBGridu...?
>
> <<Soubor: ATT00000.htm>>
>

Heslovani Woknows...

[*] Iko <iko(zv)kamarad(tec)cz> - 22.7.1999 11:38:21

> > >Na ukrytie programu z TASK-LISTU je dobra komponenta TStealth
> > >(na torry asi je). Aby sa spustal skoro prvy, tak staci do registrov
> > do
> > >kluca
> >
> --- To je praci neco jineho, tazatel nechtel okno schovat
> z tasklistu, chtel zablokoval Ctrl-Alt-Del, aby program
> nesel takto "sestrelit".

Viem, ze chcel, aby nesiel zostrelit po ALT+CTRL+DEL. To robi
komponenta TStealth, ktora ti ukryje program z dolnej listy aj zo
zoznamu v ALT+CTRL+DEL !!!
iko
iko(zv)kamarad(tec)cz


Heslovani Woknows...znovu

[*] Martin Fron�k <FRONEK(zv)zznslany(tec)cz> - 22.7.1999 11:39:21

http://web.mit.edu/network/pgp.html


Martin Fron�k
ZZN Slan� a.s.
Pra�sk� 1579, 274 49, Slan�
tel. +420-314-522986
e-mail: fronek(zv)zznslany(tec)cz

> -----P�vodn� zpr�va-----
> Od: Mal� Dobromil [SMTP:dodo(zv)rak.pr.ds.mfcr(tec)cz]
> Odesl�no: 22. �ervence 1999 9:28
> Komu: delphi-l(zv)fwd(tec)cz
> P�edm�t: RE: Heslovani Woknows...znovu
>
> Muzu se zeptat o co se jedna ?
> Nejde mi tet http, diky.
> Dobra.
>
> > ----------
> > Pokud ti jde o to skryt nejaka data pak pouzij PGP disk
> > (http://www.pgpi.com).
> > To jen tak nekdo nerozlouskne.
> >
> >

DBGrid

[*] rjunga(zv)oku-ka(tec)cz - 22.7.1999 11:53:47

Lepsi bude, kdyz si stahnes RX komponenty a jejich RXDBGrid to umi lip,
rychleji a hlavne nemusis vypisovat kvanta kodu.
Roman Junga


Polak Jiri <Jiri.Polak(zv)tconsult(tec)cz> na 22.07.99 08:19:39

Please respond to delphi-l(zv)fwd(tec)cz

To: "'delphi-l(zv)fwd(tec)cz'" <delphi-l(zv)fwd(tec)cz>
cc: (bcc: Roman Junga/IDC/OkUKarvina/CZ)
Subject: RE: DBGrid

-----Original Message-----
From: Dalibor Bednar??k [mailto:d.bednarcik(zv)vpfm(tec)cz]
> Jak by se daly barevne odlisit radky v DBGridu...?
V eventu OnDrawColumnCell. Tady je priklad pro barveni radku v zavislosti
na
dni v tydnu jedne polozky Query:
procedure TForm1.DBGrid1DrawColumnCell(Sender: TObject;
const Rect: TRect; DataCol: Integer; Column: TColumn;
State: TGridDrawState);
const
CWeekColor: TWeekColor =
// (nedele, pondeli, utery, streda, ctvrtek, patek, sobota)
($00D8E5E2, $00D8E5E2, $00F6F3D1, $00D8E5E2, $00F6F3D1, $00D8E5E2,
$00F6F3D1)
var
C : TCanvas;
DenVTydnu: integer;
begin
C := (Sender as TDBGrid).Canvas;
// QueryDatum je Field Query DBGridu
DenVTydnu := DayOfWeek(QueryDatum.AsDateTime);
C.Brush.Color := WeekColor[DenVTydnu];
//jestlize vykreslovana bunka je aktivni, nastav ji tmave modrou barvu
if gdFocused in State then C.Brush.Color := clNavy;
(Sender as TDBGrid).DefaultDrawColumnCell(Rect, DataCol, Column, State);
end;

Jura

Komponenta v komponente

[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 22.7.1999 12:00:24

Petr Vones wrote:

> Pokud jsem to dobre pochopil, tak je to podobne napriklad komponente
> TRxTimerList z RxLib.

Jo, to je presne ono. Diky.


S pozdravem

Zbysek Hlinka
E-mail: zhlinka(zv)login(tec)cz, localizator(zv)localizator.com
Tel.: 02/795 29 56; GSM: 0603 551 282
Krystofova 1016, 149 00 Praha 4
CZ


Generovani bitmap ve threadu

[*] Pavel �im��ek - 22.7.1999 12:02:29

>> Nevim jestli jsem to pochopil zcela presne ale pri vytvareni panelu
>> neposilej Nil ale ukazatel na okno na kterem je panel
>> umisten. Pokud jej
>> vytvaris v metode prinalezici onomu oknu (formulari) pak by
>> melo stacit
>>
>> MyPanel:= TPanel.Create(Self);
>
>Prekladac hlasi: Incompatible types: TComponent and TThread


No to taky musis v metode nalezejici FORMULARI.

>>
>> Pripadne jeste nastaveni rodice:
>>
>> MyPanel.Parent:= Self;
>
>Prekladac hlasi: Incompatible types: TWinControl and TThread


Opet to musi byt v metode FORMULARE.
Pavel

DBGrid

[*] Martin Lasevic, ing. <vyvoj(zv)atlascon(tec)cz> - 22.7.1999 12:03:53

A to lze pouzit pro kazdy radek v DBGridu jinak????.-(((

Preji hezky den .....
============================================
ML Software - Martin Lasevic
Budovatelska 459,
708 00 Ostrava - Poruba
tel.: + 420 (69) 691 85 11, 0603 338 765
mailto:ml_software(zv)email(tec)cz
mailto:+420603338765(zv)sms.paegas(tec)cz
http://cement.fmi(tec)cz/ml_software
ICQ:33630882
============================================
-----Puvodni zprava-----
Od: Martin Fronik [SMTP:FRONEK(zv)zznslany(tec)cz]
Odeslano: 22. eervence 1999 11:35
Komu: 'delphi-l(zv)fwd(tec)cz'
Poedmit: RE: DBGrid

Jenom bych doplnil, ze pokud je mozne pouzit knihovnu RXLib, tak tam je
RxDbGrid, tam je primo udalost, ve ktere staci jen nastavit barvu
pozadi, nebo druh a barvu pisma... Je to jednodussi nez to nize napsane.


Martin Fronik
ZZN Slany a.s.
Pra?ska 1579, 274 49, Slany
tel. +420-314-522986
e-mail: fronek(zv)zznslany(tec)cz

> -----Puvodni zprava-----
> Od: Martin Lasevic, ing. [SMTP:vyvoj(zv)atlascon(tec)cz]
> Odeslano: 22. eervence 1999 8:12
> Komu: 'delphi-l(zv)fwd(tec)cz'
> Poedmit: RE: DBGrid
>
> Daly a to povesenim metody na udalost OnDrawColumnCell. Priklad, jak
> to resim, prikladam.
>
> //********************************************************************
> **********
> procedure TFKONSZTMP.dbgKlienDrawColumnCell(Sender: TObject;
> const Rect: TRect; DataCol: Integer; Column: TColumn;
> State: TGridDrawState);
> { Metoda zajisti barevne odli?eni star?ich poiznani, ne? je
> RokKonverze. }
> begin
> inherited;
> if ((( Owner as TFKONMDTMP).DM as TFKONDMTMP).tblArchiv.
> FieldByName( 'Rok').AsString >= RokKonverze){ and
> ( Owner as TFKONMDTMP).OdpovidaVerze(( Owner as
> TFKONMDTMP).TableVerze)}
>
> (*
> if ( Owner as TFKONMDTMP).OdpovidaVerze(( Owner as
> TFKONMDTMP).TableVerze, False)
> *)
> then begin
> { posledni rok 1997 }
> _dbgKlien.canvas.brush.color:= clWindow;
> _dbgKlien.canvas.fillrect(rect);
> _dbgKlien.canvas.font.color:= clWindowText;
>
> _dbgKlien.canvas.textout(rect.left+2,rect.Top+2,column.field.AsString)
> ;
> end
> else
> begin
> // Toto je ta podstatna cast
> { barevne odli?eni star?ich roku}
> _dbgKlien.canvas.brush.color:= clActiveBorder;
> _dbgKlien.canvas.fillrect(rect);
> _dbgKlien.canvas.font.color:=clBlue;
>
> _dbgKlien.canvas.textout(rect.left+2,rect.Top+2,column.field.AsString)
> ;
> end;
> end;
>
> Preji hezky den .....
> ============================================
> ML Software - Martin Lasevic
> Budovatelska 459,
> 708 00 Ostrava - Poruba
> tel.: + 420 (69) 691 85 11, 0603 338 765
> mailto:ml_software(zv)email(tec)cz
> mailto:+420603338765(zv)sms.paegas(tec)cz
> http:/cement.fmi(tec)cz/ml_software
> ICQ:33630882
> ============================================
>
>
> -----Puvodni zprava-----
> Od: Dalibor Bednareik [SMTP:d.bednarcik(zv)vpfm(tec)cz]
> Odeslano: 22. eervence 1999 6:54
> Komu: delphi-l(zv)fwd(tec)cz
> Poedmit: DBGrid
>
> Jak by se daly barevne odlisit radky v DBGridu...?
>
> <<Soubor: ATT00000.htm>>
>

Heslovani Woknows...

[*] Mal� Dobromil <dodo(zv)rak.pr.ds.mfcr(tec)cz> - 22.7.1999 12:36:30

No jo, to je vlastne pravda, to me nenapadlo,
kdyz to tam nebude videt, nepujde to ani
sestrelit.
D.

> ----------
> > > >Na ukrytie programu z TASK-LISTU je dobra komponenta TStealth
> > > >(na torry asi je). Aby sa spustal skoro prvy, tak staci do
> registrov
> > > do
> > > >kluca
> > >
> > --- To je praci neco jineho, tazatel nechtel okno schovat
> > z tasklistu, chtel zablokoval Ctrl-Alt-Del, aby program
> > nesel takto "sestrelit".
>
> Viem, ze chcel, aby nesiel zostrelit po ALT+CTRL+DEL. To robi
> komponenta TStealth, ktora ti ukryje program z dolnej listy aj zo
> zoznamu v ALT+CTRL+DEL !!!
> iko
> iko(zv)kamarad(tec)cz
>

enum fce

[*] Fryz, Zdenek <fryz(zv)dcb(tec)cz> - 22.7.1999 12:42:56

ahoj

nema nekdo priklad pouziti fce EnumResourceNames ?

diky

Zdenek Fryz


Heslovani Woknows...znovu

[*] Ing. Miroslav Ondrisek, BONNEL TECHNOLOGIE, s.r.o. <bonnel(zv)telecom(tec)cz> - 22.7.1999 12:50:36

Plne potvrzuji, pouzivam jiz dlouho (od te doby, co je PGP 6, ve kterem
je). Navic se snad da podotknout jen to, ze lze nastavit, po jake dobe
neaktivity ( a triggerem muze byt i to, ze se spusti screensaver) se sam
odloguje a zmizi ze seznamu disku. Takze kdyz odejdes od zapnuteho
pocitace a PGPdisk neodstrelis (da se nastavit hotkey), odstreli se po
definovane dobe sam.

Mira

----- P�vodn� zpr�va -----
Od: eL <eL_z_Prahy(zv)seznam(tec)cz>
Komu: <delphi-l(zv)fwd(tec)cz>
Odesl�no: 22. �ervence 1999 10:32
P�edm�t: Re: Heslovani Woknows...znovu

Mal� Dobromil wrote:

> Muzu se zeptat o co se jedna ?
> Nejde mi tet http, diky.
> Dobra.
>

Je to PGP kodovani pro mail atd. a krom jineho obsahuje "PGP
disk".Funguje to asi tak, ze si reknes jak ma disk byt veliky, jak se
bude jmenovat a kam se umisti soubor s daty, pak te to necha chvili
"smrdalt" mysi po screenu aby se to naplnilo nejakymi nahodnymi
pocatecnimi daty vyberes si heslo no a pak se ti ve Win objevi novy
disk, ktery normalne formatujes, kopirujes do nej data (zkousel jsem do
toho umistit i Paradoxi databazi a vsechno behalo) ten disk se chova
uplne normalne ale muzes ho "odmontovat" a proste zmizi. Pak staci
poklepnout na vytvoreny soubor no a po zadani hesla se disk zase objevi.
Heslovani by melo byt dost dobre. Da se to dobre pouzit i treba na
zabezpeceny "prenos" dat po disketach. Ja jsem si udelal takovyhle 1,4MB
disk a ukladam si tam "citlive" informace jako hesla apod. no a pak to
klidne zalohuju (je to normalni soubor) kamkoliv bez obav, ze by to
nekdo nekdy nejak zneuzil.

eL..

Tady je kousek z dokumentace.
-----

What�s new in PGP version 6.0
This version of PGP includes these new features:
� Secure Viewer. Secure Viewer is PGP�s software solution to protect the

private information on your computer screen from interception through
electromagnetic radiation�also known as TEMPEST attacks. It is widely
known that eavesdroppers, with special equipment, can capture and
reconstruct video screen content from radio frequency radiation. When
text
is encrypted with the Secure Viewer option enabled, the decrypted text
is
displayed in a special TEMPEST attack prevention font and window that
are unreadable to radiation capturing equipment. The Secure Viewer
feature allows you to securely view your decrypted text.
� PGPdisk Functionality. PGPdisk functionality is built into PGP version

6.0. PGPdisk is an easy-to-use encryption application that enables you
to
set aside an area of disk space for storing your sensitive data.
� Designated Revokers. You may now specify that another public key on
your keyring is allowed to revoke your key. This can be useful in
situations
where you are afraid of losing your private key, forgetting your
passphrase, or in extreme cases such as a physical incapacity to use the
key.
In such cases, the third-party you designate will be able to revoke your
key,
send it to the server and it will be just as if you had revoked it
yourself.
� Added Plug-ins. Email plug-ins for Outlook Express and Outlook 98 are
included. A Groupwise plugin is available separately.
� Added Plug-ins. Email plug-ins for Outlook Express and Outlook 98 are
included. A Groupwise plugin is available separately.
� PGPdisk Functionality. PGPdisk functionality is built into PGP version

6.0. PGPdisk is an easy-to-use encryption application that enables you
to
set aside an area of disk space for storing your sensitive data.
� Photographic User ID. You can add your photograph to your public key.
Photo IDs can be signed just like a user ID to provide extra information

when verifying the key.
------
New features of PGPdisk
� Public Key Support. A public key or multiple public keys can now be
configured to open a PGPdisk. This support is integrated with PGP 6.0
and
its keyrings. For example, if Bob wants to give his wife Mary access to
his
PGPdisk, he can give access to Mary by adding her public key to the
PGPdisk. The key for the disk will be encrypted to Mary's key.
� New Disk Wizard. The process of creating a PGPdisk has been simplified

by a New Disk Wizard which will guide you through the process step by
step.
� Windows NT Support. PGPdisk now runs on Windows NT 4.0 in addition
to Windows 95, 98, and MacOS.

PRAVOPIS

[*] Krayzel Libor <Libor.Krayzel(zv)czech-tv(tec)cz> - 22.7.1999 12:57:00

> Dala, zkus se podivat na Torryho (soubor se jmenuje
> spellers.zip a myslim,
> ze byl v rubrice Text).

To pouzivam, ale blbne to. Spis bych to videl primo z Wordu pres OLE (ale
nevim jak).

Memo BLOB (?)

[*] MIS-ELEKTROTECHNIKA, s.r.o. <otisk(zv)misel(tec)cz> - 22.7.1999 13:06:29

ja sem neco takoveho resil tim, ze jsem Binary field
tahal pres stream jako oleobject do wordpadu
popripade jinych ole serveru


PRAVOPIS

[*] Krayzel Libor <Libor.Krayzel(zv)czech-tv(tec)cz> - 22.7.1999 13:15:17

> Druha moznost, ktera by mohla projit je zkusit pouzit OLE a
> MS Word jako OLE Server.

Ovsem jak na to, to vubec nevim:-(

Mizejici tlacitko vlevo na ToolBaru

[*] Petr =?iso-8859-2?Q?Ga=EFourek?= <geta(zv)telecom(tec)cz> - 22.7.1999 13:28:41

Ahoj,

pouzil jsem radu Petra Vonese jak umistit tlacitko na ToolBaru uplne
vpravo - dva ToolBary . Navic ale umoznuji form zvetsovat, zmensovat a
posouvat. Pri zvetsovani formu neni problem s vykreslenim tlacitka
nejvic vpravo, ale pri zmensovan� a rychlem pohybu mysi tlacitko zmizi.
Obdobn� se chov� StatusBar, u ktereho se pri zmensovani nevykresli prav�
spodn� roh. Zkousel jsem udelat leccos, ale bez uspechu. Kdyz jsem
nastavil Anchros, tak pohyb mysi mohl byt rychlejsi, ale od urcite
rychlosti tlacitko opet zmizi.

Predem diky za radu jak to odstranit.

Petr Gadourek

P.S.:
K drive probehnutym diskusim Delphi 5 pro Petra Vonese:
I ja bych se primlouval za anonymni prispevky na konto Petr Vones.

Trizeni

[*] Dalibor Bednar��k - 22.7.1999 13:35:12

Toto je zpr�va ve form�tu MIME obsahuj�c�n�kolik ��st�.
Ahoj

Muzete mi nekdo vysvetlit jak je to z ceskym trizenim
Vytvarim standartne PARADOX tabulky a indexy pomoci Database Desktopu...
Mam delphi 3 C/S
Musim m�t jeste neco navic nainstalovano, nebo staci nekde neco nastavit..
..

Predem dik


DBGrid

[*] Martin Fron�k <FRONEK(zv)zznslany(tec)cz> - 22.7.1999 13:39:03

Jestli se to tyka RXDbGrid, tak samozrejme ano, dokonce je mozne pouzit
na kazdy field jinou barvu i pismo. Ale to bude vypadat jak velikonocni
vajicko :-)


Martin Fron�k
ZZN Slan� a.s.
Pra�sk� 1579, 274 49, Slan�
tel. +420-314-522986
e-mail: fronek(zv)zznslany(tec)cz

> -----P�vodn� zpr�va-----
> Od: Martin Lasevic, ing. [SMTP:vyvoj(zv)atlascon(tec)cz]
> Odesl�no: 22. �ervence 1999 12:04
> Komu: 'delphi-l(zv)fwd(tec)cz'
> P�edm�t: RE: DBGrid
>
> A to lze pouzit pro kazdy radek v DBGridu jinak????.-(((
>
> Preji hezky den .....
> ============================================
> ML Software - Martin Lasevic
> Budovatelska 459,
> 708 00 Ostrava - Poruba
> tel.: + 420 (69) 691 85 11, 0603 338 765
> mailto:ml_software(zv)email(tec)cz
> mailto:+420603338765(zv)sms.paegas(tec)cz
> http://cement.fmi(tec)cz/ml_software
> ICQ:33630882
> ============================================
>
>
>
> -----Puvodni zprava-----
> Od: Martin Fronik [SMTP:FRONEK(zv)zznslany(tec)cz]
> Odeslano: 22. eervence 1999 11:35
> Komu: 'delphi-l(zv)fwd(tec)cz'
> Poedmit: RE: DBGrid
>
> Jenom bych doplnil, ze pokud je mozne pouzit knihovnu RXLib, tak tam
> je
> RxDbGrid, tam je primo udalost, ve ktere staci jen nastavit barvu
> pozadi, nebo druh a barvu pisma... Je to jednodussi nez to nize
> napsane.
>
>

MP3 && Delphi

[*] petrhalamicek(zv)email(tec)cz - 22.7.1999 13:46:19

Zdravim vsechny. Nevite, jak bych mohl prehrat zvuk ve formatu MP3, aniz
by koncovy uzivatel mel nejaky prehravac ? Nevite nekdo o nejake
komponente, ktera by tohle umela ? Diky moc.


--- CREATED BY ATC O..R..G..A..N..I..Z..E..R
--- http://email(tec)cz <--- Get Your Free Email

GIF do paradoxu

[*] petrhalamicek(zv)email(tec)cz - 22.7.1999 13:49:04

Zdravim vsechny. Potreboval bych vedet, jak muzu ulozit obrazek GIF do
paradoxu. V Database Desktopu jsem si udelat pole typu Graphic. Pak jsem
zkousel normalne natahnout obrazek:
DBImage1.picture.loadfromfile(opendialog1.filename), ale tohle mi gif
nevezme. Dik za kazdou radu.


--- CREATED BY ATC O..R..G..A..N..I..Z..E..R
--- http://email(tec)cz <--- Get Your Free Email

Detekce RAS

[*] Radek Pospisil <radek.pospisil(zv)sprinx(tec)cz> - 22.7.1999 14:05:20

Preji vsem hezky den,

Muze mi nekdo poradit, jak na NT detekovat zda-li je nainstalovany RAS ?

diky

R.Pospisil


Jak porovnavat 6-tice bytu?

[*] Tomas Holan <HOLAN(zv)ksvi.mff.cuni(tec)cz> - 22.7.1999 14:09:51

>
> Mam problem s porovnavanim pole bytu delky 6 bytu. Napada mne porovnavat to
> pres variantni zaznamy:

A co to pretypovat na real?
(Nezkousel jsem, jestli nedela nejakou konversi, ale nemusel by.)

( PoleA,PoleB,: array[1..6] of byte;
....
if real(PoleA)=real(PoleB) then...)

Anebo assemblerem:

var rovno: boolean;

asm
CLD ; DF := 0 => zvetsovat adresy
LDS SI,PoleA ; DS:SI := adresa poleA
LES DI,PoleB ; ES:DI := adresa PoleB
MOV CX,6 ; pocet bytu
REPZ CMPSB ; porovnani dokud neni konec nebo nerovnost

MOV rovno,1
JZ (zv)(zv)konec
MOV rovno,0
(zv)(zv)konec:
end

Tom


TQDB

[*] Bene� Jaroslav <JBenes(zv)cpoj(tec)cz> - 22.7.1999 14:12:46

Ahoj,

mel bych maly dotaz zda nekdo pouziva nebo ma nejake zkusenosti s
pouzitim jednoducheho prostredku TQDB pro pristup k souborove tabulce
(*.QDB). Ziskal jsem ho z http://home.sprynet.com/sprynet/rrm . Pripada
mi to jako smes TDataSource, TDatabase a TTable ovsem bez BDE. Ma to i
nejakou nadstavbu (TQDBView, TQDBNavigator, TQDBPanel, TQDBItem a
TQDBGrid) a melo by to umoznovat snad i komprimaci zaznamu (LZW). Jedna
se mi predevsim o to, zda je to spolehlive a bezpecne a jake jsou
limity.

Diky

Jaro B.

PRAVOPIS

[*] Burger, Tomas <tomas.burger(zv)sap-ag.de> - 22.7.1999 14:34:08

> -----Original Message-----
> From: Krayzel Libor [mailto:Libor.Krayzel(zv)czech-tv(tec)cz]

> To pouzivam, ale blbne to. Spis bych to videl primo z Wordu
> pres OLE (ale nevim jak).

Na http://msdn.microsoft.com/ je v sekci "Online library" dokumentace k
Wordu a tam je metoda

Application.CheckGrammar("bla bla bla")

Takze staci vytvorit Word nebo Excel jako COM server a pak zavolat tu funkci
CheckGrammar...

Tomas


Platebni karty

[*] Vilem Svoboda <vilem_s(zv)mrp(tec)cz> - 22.7.1999 14:39:04

>To asi bude, protoze ta EC/MC Variant bude jenom domaci karta (viz info
>v bulletinu Inka), takze Madarsky bankomat si urcite pochutna ;))))))))

Mam pocit, ze cele je to zamereno na intenzivnejsi zdimani penez z
uzivatelu. Zatimci za vyber obycejnou kartou Variant jsem donedavna neplatil
nic, ted tri koruny, u te EC/MC Variant to ma byt uz dvacet korun a
popripade i procento z vybirane castky.

Jeste k te Cirrus Maestro: Masinka v te madarske bance ji vcetne meho PINu
akceptovala. Jen bankomatovi se nelibila. Takze pokud vam bankomat prohlasi,
ze PIN bylo spatne, radeji to hned stornujte. Pak mate sanci, ze kartu jeste
vyplivne. Chybama se clovek uci.

S pozdravem
Vilda
vilem.svoboda(zv)mrp(tec)cz

GIF do paradoxu

[*] Petr�j Zden�k <ZPetruj(zv)qgir(tec)cz> - 22.7.1999 15:19:10

GRAPHIC umi jenom bitmapy musis pouzit BLOB a ukladat a natahovat to pres
BLOBSTREAM
uz tady v konferenci na to tema bylo mnohokrat diskutovano. Hledej v
konferenci
klicove slovo TBlobStream.> -----P�vodn� zpr�va-----
> Od: petrhalamicek(zv)email(tec)cz [mailto:petrhalamicek(zv)email(tec)cz]
> Odesl�no: 22. �ervence 1999 13:49
> Komu: delphi-l(zv)fwd(tec)cz
> P�edm�t: GIF do paradoxu
>
>
> Zdravim vsechny. Potreboval bych vedet, jak muzu ulozit
> obrazek GIF do
> paradoxu. V Database Desktopu jsem si udelat pole typu
> Graphic. Pak jsem
> zkousel normalne natahnout obrazek:
> DBImage1.picture.loadfromfile(opendialog1.filename), ale tohle mi gif
> nevezme. Dik za kazdou radu.
>
>
> --- CREATED BY ATC O..R..G..A..N..I..Z..E..R
> --- http://email(tec)cz <--- Get Your Free Email
>
>

Generovani bitmap ve threadu

[*] muher(zv)csas(tec)cz - 22.7.1999 15:22:16

> No to nejde jen tak povesit ten Panel do luftu. To musis mit
> nejaky Form na
> ktery ho das, takze si nejaky vytvor.
> Pavel
>
>
> >No jo, kde mam ten Parent sehnat, kdyz ve threadu ani jinde
> v aplikaci ten
> >Form nemam?
> >

Jak se tak na to koukam, tak se asi s tim Panelem rozloucim. Cela aplikace
by mela byt nevizualni a zda se mi zbytecne ji zvetsovat o TForm jen kvuli
par obrazkum {byt generovanym dynamicky}. To radeji na tu bitmapu.Canvas
text a ramecek namaluju sam. Nicmene dekuji za prispevky a kdyby prece jen
to nejak slo tak budu cekat ...

Detekce RAS

[*] Milan Schembera <milan(zv)missoftware(tec)cz> - 22.7.1999 15:29:46

-----Puvodni zprava-----
Od: Radek Pospisil [SMTP:radek.pospisil(zv)sprinx(tec)cz]
Odeslano: 22. eervence 1999 14:05
Komu: 'delphi-l(zv)fwd(tec)cz'
Poedmit: Detekce RAS

Muze mi nekdo poradit, jak na NT detekovat zda-li je nainstalovany RAS ?

V adresari \winnt\system32 musi existovat soubor rasapi32.dll ;-)

Preji hezky den a jsem s pozdravem

Milan Schembera
missoftware - lanskrounska softwarova firma
tel./fax 0467/521555,0602/463353
mailto:info(zv)missoftware(tec)cz
http://www.missoftware(tec)cz
---------------------------------
- on-line objednavkove a rezervacni systemy po internetu
- tvorba www prezentaci vcetne skriptu
- zakazkovy software pro Windows 9x/NT

Presun TXT souboru do Start-Dokumenty

[*] Petr =?iso-8859-2?Q?Ga=EFourek?= <geta(zv)telecom(tec)cz> - 22.7.1999 15:38:48

Ahoj,

kdyz v D4 otevru ASCII soubor jako "Text", tak se mi objevi v nab�dce
Start-Dokumety. Lze to v D4 nejak programove vypnout?

Je nejaky rozdil v pristupu k souboru "Write only" nebo "Read/Write"
pokud chci do souboru pouze zapisovat a pristup predpokladam pouze od
jednoho programu? Nebo maji tyto funkce vyznam pouze pro sitove
aplikace?

Diky za odpoved


Petr Gadourek


Ulozeni pameti

[*] Jiri Virt <virt(zv)pepa(tec)cz> - 22.7.1999 16:11:26

Ahoj vsem,
nevite jak ulozit obsah pameti od adresy XXXXXX do adresy ZZZZZZ.
Vubec nevim kde zacit? Nemate nekdo dobry napad?


Diky

Jirka Virt

email: virt(zv)pepa(tec)cz

www.pepa(tec)cz


SQL

[*] Martin Klepoch <klepoch(zv)trexima.sk> - 22.7.1999 16:16:34

M�m nasledovn� probl�m:

V programe m�m nadefinovan� dve komponenty query. V prvej query vyber�m ist� hodnoty z tabulky, ktor� fyzicky existuje na harddisku, ktor� je typu Paradox. V druhej komponente query by som chcel vybera� �al�ie hodnoty ale z toho prv�ho query. Probl�m je v tom, �e v tej druhej komponente neviem nap�sa� spr�vny SQL pr�kaz, ktor� tie hodnoty z prvej query vyberie. Uk�ka k�du kde kompil�tor hl�si chybu:

query1.SQL.Add('select * from ' + query);

probl�m je v tom from query kde kompil�tor hl�si chybu
[Error] isppform.pas(529): Incompatible types: 'String' and 'TQuery'

Neviete mi niekto poradi� ako z�ska� nejak� d�ta z query v programe?

Martin Klepoch

TQDB

[*] Petr =?iso-8859-2?Q?Ga=EFourek?= <geta(zv)telecom(tec)cz> - 22.7.1999 16:40:18

Ahoj,

ja jsem si QDB (verzi 2.11) take stahnul, protoze jsem hledal neco co
nepotrebuje BDE. Pouzivam to pro jednoduchou databazi probantu - jmeno,
prijmeni, rodne cislo, poznamka atd. Vysel jsem z ukazkoveho prikladu a
po prvnich drobnych zaskobrtnuti jsem s tim spokojen. Nemam zatim
zkusenost s vetsim mnozstvim zaznamu, nebot aplikaci teprve vyvijim.
Prijemne je pouziti TQDBView s TQDBPanel, kdy se na Panel nastrkaji
vsechny Edity a Mema a ono si to samo vytvori strukturu. Take se da
TQDBView provazet s ListBoxem, kde pak je setrideny seznam zvolenych
poli. Horsi je to pak s pripadnou zmenou, staci na Panelu prehazet
poradi poli a uz to hlasi chybu souboru, ale se zmenou datave struktury
je vzdy problem. S TQDBNavigator neni zadny problem.
Jestli jsem to spravne pochopil tak TQDB s TQDBItem by mely umoznit
programove vytvaret strukturu databaze, trochu jsem to zkousel, ale
skoncil jsem na definovani tridiciho klice. Dal jsem se s tim nezab�val,
ale myslim, ze chyba byla u me a ne v komponentach.
Ve verzi, kterou mam ja TQDBGrid neni, ale asi to pujde obejit ListBoxem
a trochou prace. Dale mi vadi, ze tridici klic musi byt jednoznacny,
nejsou povoleny stejne zaznamy a navic pri zobrazovani musi byt klic
navazan na Listbox se seznamem, takze ja ted mam v ListBoxu zobrazene
Prijmeneni - Jmeno - Identifikacni cislo. Nema funkci autoinkrememt,
takze jednoznacnost klice musi byt resena programove. Presto vsechno je
vyvoj male databaze oproti jejimu programovani velmi rychly. V podstate
to same co popisuji jsem programoval v DOSu v BP 7 a ne tak obecne a
dalo mi to nekolikan�sobne vice prace ne� se seznamit s QDB.
Jedinn� v cem si myslim, ze autori udelali chybu je filter, ten musi byt
naprosto jednoznacny, napr. je-li filtr "PAV" pak jsou zobrazeny jen
pole "PAV", ale uz ne "PAVEL" ap., ale mozna jsem prehledl nejaky flag,
kterym se to nastavuje.

Pokud se rozhodnes (nebo nekdo jiny) QDB pouzivat, rad bych si vymenoval
zkusenosti.

Ahoj Petr

Bene� Jaroslav wrote:

> Ahoj,
>
> mel bych maly dotaz zda nekdo pouziva nebo ma nejake zkusenosti s
> pouzitim jednoducheho prostredku TQDB pro pristup k souborove tabulce
> (*.QDB). Ziskal jsem ho z http://home.sprynet.com/sprynet/rrm .

SQL

[*] Jezek Petr, Ing. (DELVINA) <PETR(zv)sevis.sk> - 22.7.1999 16:52:13

Na co pouzivas to druhe query. Vzdyt vysledek je stejny jako v tom
prvnim.
Nebo chces vybrat podmnozinu z toho prvniho? Pak pouzi stejny
SQL prikaz jako v tom prvnim a pridej tam filtrovaci podminku.
Nebo muzes vysledek toho prvniho query ulozit jako docasnou tabulku
pod nejakym jmenem a tu pak pouzit do druheho query.

Petr
-----Original Message-----
From: Martin Klepoch [mailto:klepoch(zv)trexima.sk]
Sent: Thursday, July 22, 1999 4:17 PM
To: Delphi konf.
Subject: SQL



M�m nasledovn� probl�m:

Vprograme m�m nadefinovan� dve komponenty query. V prvej query vyber�m
ist� hodnoty z tabulky, ktor� fyzicky existuje na harddisku, ktor� je
typu Paradox. V druhej komponente query by som chcel vybera� �al�ie
hodnoty ale z toho prv�ho query. Probl�m je v tom, �e v tej druhej
komponente neviem nap�sa� spr�vny SQL pr�kaz, ktor� tie hodnoty z prvej
query vyberie. Uk�ka k�du kde kompil�tor hl�si chybu:

query1.SQL.Add('select * from ' + query);

probl�m je v tom from query kde kompil�tor hl�si chybu
[Error] isppform.pas(529): Incompatible types: 'String' and 'TQuery'

Neviete mi niekto poradi� ako z�ska� nejak� d�ta z query v programe?

Martin Klepoch


Ulozeni pameti

[*] Iko <iko(zv)kamarad(tec)cz> - 22.7.1999 17:04:14

> Ahoj vsem,
> nevite jak ulozit obsah pameti od adresy XXXXXX do adresy ZZZZZZ.
> Vubec nevim kde zacit? Nemate nekdo dobry napad?

Hm... zeby to vyhodilo access violation?
iko
iko(zv)kamarad(tec)cz


SQL

[*] Martin Bobak <bobak(zv)minv.sk> - 22.7.1999 17:26:10

priklad mas neiake query v ktorom robis nejaky count(*) kde vysledok query je cislo (cele ;o)) a chces ten vysledok selectu priradit premennej tak je to asi taketo

Var
Vysledok:Integer;
Begin
Query1.Sql.Add ('Select count(*) from tabulka t where t.meno="jano" ');
Query1.Open;
Vysledok:=Query1.Fields[0].AsInteger ; { moze byt aj AsString a tak , zalezi akej premennej priradujes ........}

End;

No a s tou premennou mozes potom robi co xces , priradovat iu nejakemu inemu selectu a tak

Thats All

......... Bobek
----- Original Message -----
From: Martin Klepoch
To: Delphi konf.
Sent: Thursday, July 22, 1999 4:16 PM
Subject: SQL


M�m nasledovn� probl�m:

V programe m�m nadefinovan� dve komponenty query. V prvej query vyber�m ist� hodnoty z tabulky, ktor� fyzicky existuje na harddisku, ktor� je typu Paradox. V druhej komponente query by som chcel vybera� �al�ie hodnoty ale z toho prv�ho query. Probl�m je v tom, �e v tej druhej komponente neviem nap�sa� spr�vny SQL pr�kaz, ktor� tie hodnoty z prvej query vyberie. Uk�ka k�du kde kompil�tor hl�si chybu:

query1.SQL.Add('select * from ' + query);

probl�m je v tom from query kde kompil�tor hl�si chybu
[Error] isppform.pas(529): Incompatible types: 'String' and 'TQuery'

Neviete mi niekto poradi� ako z�ska� nejak� d�ta z query v programe?

Martin Klepoch


SQL

[*] TUNGLI Jan <tungli(zv)pvt.sk> - 22.7.1999 17:43:34

Riesenie:
1. select ... from ... where polozka1 in ( select polozka2 from ... ) ale toto je dosti specificke.

2. pouzivaj free komponentu na rozklad SELECT dotazu : SQLParse.pas
Naides na http://freeweb.coco(tec)cz/tungli
Komponent dokaze aj modifikovat SQL dotaz - napr. WHERE cast dotazu - a o to ti ide.

TUNGLI J�nos
email: tungli(zv)pvt.sk or Emial: jan.tungli(zv)seznam(tec)cz
Czech : http://freeweb.coco(tec)cz/tungli
Hungarian: http://www.nexus.hu/tungli
USA : http://www.fortunecity.com/skyscraper/zeros/864
-----P�vodn� zpr�va-----
Od: Martin Klepoch <klepoch(zv)trexima.sk>
Komu: Delphi konf. <delphi-l(zv)fwd(tec)cz>
Datum: 22. j�l 1999 16:40
P�edm�t: SQL


M�m nasledovn� probl�m:

V programe m�m nadefinovan� dve komponenty query. V prvej query vyber�m ist� hodnoty z tabulky, ktor� fyzicky existuje na harddisku, ktor� je typu Paradox. V druhej komponente query by som chcel vybera� �al�ie hodnoty ale z toho prv�ho query. Probl�m je v tom, �e v tej druhej komponente neviem nap�sa� spr�vny SQL pr�kaz, ktor� tie hodnoty z prvej query vyberie. Uk�ka k�du kde kompil�tor hl�si chybu:

query1.SQL.Add('select * from ' + query);

probl�m je v tom from query kde kompil�tor hl�si chybu
[Error] isppform.pas(529): Incompatible types: 'String' and 'TQuery'

Neviete mi niekto poradi� ako z�ska� nejak� d�ta z query v programe?

Martin Klepoch


DdeServerItem

[*] TUNGLI Jan <tungli(zv)pvt.sk> - 22.7.1999 17:48:01

A nastavil vlastnost Parent alebo Owner ?

TUNGLI J�nos
email: tungli(zv)pvt.sk or Emial: jan.tungli(zv)seznam(tec)cz
Czech : http://freeweb.coco(tec)cz/tungli
Hungarian: http://www.nexus.hu/tungli
USA : http://www.fortunecity.com/skyscraper/zeros/864
-----P�vodn� zpr�va-----
Od: Bob <delphi(zv)alf.dingo(tec)cz>
Komu: delphi-l(zv)fwd(tec)cz <delphi-l(zv)fwd(tec)cz>
Datum: 22. j�l 1999 11:24
P�edm�t: DdeServerItem


>Hi Delphisti,
>
>kamarad ma problem.
>
>Kdyz da na plochu vyse zminenou komponentu, tak to vse pracuje jak ma.
>Ale kdyz ji vytvori za behu programu, tak proste nefunguje.
>Nevite nekdo, kde muze delat chybu?
>
>Dik za nej.
>
>Bob
>

Zpomaleni serveru

[*] TUNGLI Jan <tungli(zv)pvt.sk> - 22.7.1999 17:51:53

Co sa deje ked sa zpomali server / zapisuje alebo co robi ?
Predpokladam ze zapisuje viac viet ale bez transakce - a preto robi neustale
commit.

TUNGLI J�nos
email: tungli(zv)pvt.sk or Emial: jan.tungli(zv)seznam(tec)cz
Czech : http://freeweb.coco(tec)cz/tungli
Hungarian: http://www.nexus.hu/tungli
USA : http://www.fortunecity.com/skyscraper/zeros/864
-----P�vodn� zpr�va-----
Od: Ivo Janal�k <janalik(zv)nam(tec)cz>
Komu: Delphi konference (el. adresa) <delphi-l(zv)fwd(tec)cz>
Datum: 22. j�l 1999 10:58
P�edm�t: Zpomaleni serveru


>Preji hezky den,
>potreboval bych poradit s nasledujicim problemem.
>
>Pouzivame InterBase SQL server. Po urcite dobe dochazi ke zpomaleni celeho
systemu,
>server jako by neco provadel a v te dobe se zmeni datum u souboru
databaze. Potom uz
>zase funguje dobre. Nicmene to zpomaleni je velmi kriticke. Muze to nejak
souviset s nastavenim
>sweep - mame ho zapnuto po 20000 transakcich.
>
>Budu vdecny za jakoukoliv radu.
>
>ing. Radek Urbanczyk
>
>
>

UPDATE v SQL s vysledekem v jednom kroku

[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 22.7.1999 18:47:22

Martin Fron�k wrote:

> Ano, ja. Mam celou sit postavenou na TCP/IP, ve trech segmentech,
> pripojenou na inet pevnou linkou. Na masine pripojene k inetu mam
> proxinu a na ni povoleno jen nekolik portu, nezbytne nutnych. Mam od
> providera pridelene IP adresy pro kazdy interni pocitac, takze nemam
> problemy s pripadnou duplicitou. Ale mohl by ses tomu vyhnout pouzitim
> adres, ktere jsou na to vycleneny (tusim neco jako 168.......) tyhle
> IPecka by mely byt interni, a pokud nahodou neco z nich neco proleze ven
> (chybnou konfiguraci), tak je zarazi nejblizsi cisco. Ale tohle je dost
> obecne, mas na mysli neco konkretniho?

Viz problem napsany Petru Zahradnikovi. Mas i takovy pripad? Jde
mi o to, jak to pripadne usadit u zakazniku, kteri mohou mit
vselijake konfigurace site. Tedy, za jakych okolnosti mohou nastat
kolize.


S pozdravem

Zbysek Hlinka
E-mail: zhlinka(zv)login(tec)cz, localizator(zv)localizator.com
Tel.: 02/795 29 56; GSM: 0603 551 282
Krystofova 1016, 149 00 Praha 4
CZ


UPDATE v SQL s vysledekem v jednom kroku

[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 22.7.1999 18:47:21

Petr Zahradnik wrote:

> > k tomuhle bych se chtel poptat na zkusenosti, protoze se
> > rozhoduji, pres jaky protokol mam udelat vicevrstvou komunikaci
> > pro OLE DB komponenty.
> >
> > Ma tady nekdo prakticke zkusenosti, jak se chova komunikace
> > pres TCP/IP, kdyz na siti (urcite na peer-to-peer) bezi pripojeni k
> > internetu a zaroven nejake dalsi komunikace?
>
> No, neni to zadny problem, funguje to dobre. Idealni je, kdyz mas
> vsechno na TCP/IP, tedy i tu sit. Co mas konkretne na mysli?

Konkretne jsem zkousel s jakousi knihovnou pristup pres TCP/IP k
programu, ale na mem pocitaci mi to zaroven chtelo komunikovat s
modemem - takze jsem musel odklepnout storno na prihlasovacim
dialogu k modemu, a pak to teprve slo na program. Zaroven by me
zajimalo, zda na tomtez pocitaci muze bezet dany program
soubezne s pripojenim na internet.


S pozdravem

Zbysek Hlinka
E-mail: zhlinka(zv)login(tec)cz, localizator(zv)localizator.com
Tel.: 02/795 29 56; GSM: 0603 551 282
Krystofova 1016, 149 00 Praha 4
CZ


off - calc602

[*] Jiri Heinisch <HeiJu(zv)sol(tec)cz> - 22.7.1999 19:44:47

Ahoj ja to sice nemam, ale pokud mi to posles, tak to u znameho prevedu
do pozadovaneho formatu a poslu zpet


S pozdravem Heinisch Jiri

----- Original Message -----
From: Richard Valny <richard.valny(zv)oku-st(tec)cz>
To: 'DELPHI Distribution List (el. adresa 2)' <delphi-l(zv)fwd(tec)cz>
Sent: Tuesday, July 20, 1999 8:52 AM
Subject: off - calc602


> Ahojky,
> kolegyne (mimochodem pekna) mi donesla stary pocitac a v nem ma dosti
> tabulek v Calc602 (verzi 1.52) (pro nepametniky takovy Excel od
> Software602). Bohuzel samotny Calc uspesne nekdo vycistil a instalacni
> diskety nema. Pidil jsem se u firem a nikdo jej neumi dodat. Lze jej jeste
> nejak ziskat?
> V podstate jej potrebuji jen abych otevrel tabulky a vysypal je jinam a
pak
> ho zahodil (smazal).
>
> Dik za info.
>
> ===========mozno pouzit PGP==============
> Richard Valny richard.valny(zv)oku-st(tec)cz
> Okresni urad Strakonice tel. 0342-441 l. 216
> Smetanova 533 fax. 0342-21208
> 386 22 STRAKONICE FiDoNet 2:423/35
> ===========mozno pouzit PGP==============
>
> ... Windows nemohou byti virem, nebot virus je napsan inteligentne a neco
> dela
>

Shift+TAB

[*] Jiri Heinisch <HeiJu(zv)sol(tec)cz> - 22.7.1999 19:58:10


----- Original Message -----
From: Jiri Heinisch
To: delphi-l(zv)fwd(tec)cz
Sent: Wednesday, July 21, 1999 7:39 PM
Subject: Shift+TAB


Ahoj

Muze nekdo poradit jak emulovat stisk klavesy SHIFT+TAB

S pozdravem Heinisch Jiri


PRAVOPIS

[*] Lukas Voborsky <xvobl03(zv)sorry.vse(tec)cz> - 22.7.1999 22:18:32

On Thu, 22 Jul 1999, Burger, Tomas wrote:

> > -----Original Message-----
> > From: Krayzel Libor [mailto:Libor.Krayzel(zv)czech-tv(tec)cz]
>
> > To pouzivam, ale blbne to. Spis bych to videl primo z Wordu
> > pres OLE (ale nevim jak).
>
> Na http://msdn.microsoft.com/ je v sekci "Online library" dokumentace k
> Wordu a tam je metoda
>
> Application.CheckGrammar("bla bla bla")
>
> Takze staci vytvorit Word nebo Excel jako COM server a pak zavolat tu funkci
> CheckGrammar...

Ahojte, tento problem me taky docela zajima. Nebyl by kousek kodu? Jestli
tomu rozumim, tak se to musi udelat jinak nez pres Import type library, ze
jo? (Stejne nevim, jaky dll bych mel naimportovat)
cau
Lukas

-==============================================================-
mailto: voborsky(zv)menza.mff.cuni(tec)cz ICQ: 21084410
www: http://come.to/voborsky tel. 8551040-9 l. 393
-==============================================================-


Paradox & Access

[*] Jiri Fait <ft-soft(zv)iol(tec)cz> - 22.7.1999 23:37:12

Mam prosbu,

V aplikacich jsem dosud pouzival tabulky PARADOX se spise spatnymi zkusenostmi.

Chtel bych prejit na databazi Acces ( DAO ), ale mam obavy ze bych se mohl dostat take do slepe ulicky.

Varianty s Interbase apod. nejsou aktualni (zatim) taktez ruzne nestandardni nahrady SQl (Flash Filler, apod).
Ma nikdo s timtozkusenosti pokud ano prosim kontaktujte mne.

Nepotkal nekdo komponentu na MP3

[*] Zdenek <zdeste(zv)seznam(tec)cz> - 22.7.1999 23:53:19

Mam, ale netestoval jsem. Je to stahnuty z DSP, freeware pro D2,3. (zdrojak + mpeg.dll).
Rad poslu na privat mail.

Zdenek
----- Original Message -----
From: Zden�k B�hm
To: delphi-l(zv)fwd(tec)cz
Sent: Thursday, July 22, 1999 9:35 AM
Subject: Nepotkal nekdo komponentu na MP3


Zdar vsem,

nepotkal jste nekdo delphackou komponentu na prehravani MP3. Brouzdal jsem po internetu a jedine, co jsem nasel, jsou komponenty na externi ovladani WinAmpu a to mi prilis nevyhovuje. Predstavoval bych si neco jako TMediaPlayer, ale nemusi byt vizualni. Vpodstate by stacila i funkce, ktere by se poslala cesta k souboru a ona by ho prehrala.
Nejlip, kdyby to byl freeware, ale i share za par dolacu by pomohlo. Jo, jeste neco, musi tomu stacit Delphi 3 Prof.

Diky Zdenek


Jak porovnavat 6-tice bytu?

[*] Pavel Cisar <pcisar(zv)aktis(tec)cz> - 23.7.1999 00:20:06

Haj hou!

> > Mam problem s porovnavanim pole bytu delky 6 bytu. Napada mne porovnavat
to
> > pres variantni zaznamy:


Pouzij funkci CompareMem v SysUtils.PAS

Hodne zdaru

enum fce

[*] Pavel Cisar <pcisar(zv)aktis(tec)cz> - 23.7.1999 00:23:40

Haj hou!

> nema nekdo priklad pouziti fce EnumResourceNames ?

procedure RegisterResources(ARegister: Boolean);
var i: Integer;
begin
NxResourceManager.BeginUpdate;
try
for i := Low(ResourceTypes) to High(ResourceTypes) do
EnumResourceNames(HInstance, ResourceTypes[i], (zv)RegisterProc,
Integer(ARegister));
finally
NxResourceManager.EndUpdate;
end;
end;

Detekce RAS

[*] Ing. �ubom�r G�L - 23.7.1999 07:18:09

Co tak skusit otazku na sluzbu RAS?

LuGa

******************************
Lubomir "Levec" GAL, -LuGa
IS, NUPSESO, a.s. Nitra, SK
mailto:lgal(zv)nupseso.sk
******************************

DdeServerItem

[*] Bob <delphi(zv)alf.dingo(tec)cz> - 23.7.1999 07:48:49

Tak uz si stimmnelamte hlavu, rozchodil jsem to.
Pri vytvareni za behu to musi byt navazano bud na komponentu TForm,
nebo na DdeServerConv, ale hlavne musi byt vyplnema vlastnost
TDdeServerItem.Name

Mejte se

Bob


> A nastavil vlastnost Parent alebo Owner ?
>
>
> >Hi Delphisti,
> >
> >kamarad ma problem.
> >
> >Kdyz da na plochu vyse zminenou komponentu, tak to vse
> pracuje jak ma.
> >Ale kdyz ji vytvori za behu programu, tak proste nefunguje.
> >Nevite nekdo, kde muze delat chybu?
> >
> >Dik za nej.
> >
> >Bob
> >

Tisk pres QReport

[*] Ren� Otisk - 23.7.1999 08:31:34

Mam takovy malicky problemek. Pouzivam QReport na generovani tiskovych sestav z databazi Paradoxu. Lec kdyz si chci nastavit v jiz spustene aplikaci v ukazce pred tiskem Printer Setup, tak rozsah stranek (pouze) mam nepristupny. Cim to je?

pora�te s DBLookUpCombobox

[*] Bo�an Hynek <HBocan(zv)cpoj(tec)cz> - 23.7.1999 08:34:18

Pora�te, pros�m, mo�n� d�l�m n�kde chybu..
M�m dblookupCombobox,ve vlastnosti listfield m�m uvedeno datafield kter�
je neunik�tn�m kl��em v tabulce.
P�i rozbalen� listu a posunu v listu polo�ek �ipkou dolu dojdu na
hodnotu, kter� je shodn� s n�sleduj�c� a d�l se �ipkou nedostanu,
vyberou se mi ob� dv�. a d�l m��u jen nap�. p�es PgDn.Pokud se vrac�m v
seznamu �ipkou nahoru projedu bez probl�m�, ale v�dy pokud jsou v listu
dv� identick� polo�ky vyberou "promod��" se ob� dv�.

D�k za radu ..

Hynek Bo�an
<mailto:hbocan(zv)cpoj(tec)cz>

Ulozeni pameti

[*] Jano <jj_delphi(zv)ke.ubp.sk> - 23.7.1999 08:05:41

-----Original Message-----
From: Jiri Virt <virt(zv)pepa(tec)cz>
To: delphi-l(zv)fwd(tec)cz <delphi-l(zv)fwd(tec)cz>
Date: 22. j�l 1999 15:47
Subject: Ulozeni pameti


>Ahoj vsem,
> nevite jak ulozit obsah pameti od adresy XXXXXX do adresy ZZZZZZ.
>Vubec nevim kde zacit? Nemate nekdo dobry napad?
>


Ahoj,
nepises, ci ide o vypis z pamati tvojho programu, alebo ineho. Pozri si tento priklad pre D4 od Petra Vonese (funguje pre obidva pripady):
ftp://ftp.mlp(tec)cz/pub/misc/Delphi/konference/D4/API/MemoryDump_example.zip
Pointa je v tom, ze dany proces o ktory Ti ide, si musis spristupnit najprv API fciou "OpenProcess":
:
private
FProcessID: DWORD;
:
OpenProcess(PROCESS_VM_OPERATION or PROCESS_VM_READ, False, FProcessID);

(v tomto pripade si ho spristupnis na citanie) a potom uz mozes citat obsah pamati cez API fciu "ReadProcessMemory":

var
Address: Pointer;
LineData: packed array[0..15] of Byte;
NR: DWORD;
:
:
begin
ReadProcessMemory(FProcess, Address, (zv)LineData, Sizeof(LineData), NR);
:

Priklad potrebujes len mierne upravit (cela pointa pristupu do pamati sa ale nemeni) a dosiahnes toho co pozadujes.

Jano
jj_delphi(zv)ke.ubp.sk

Grid s komponentama

[*] Pavel Polak <pavelp(zv)bnsoft(tec)cz> - 23.7.1999 09:11:50

Zdravim!

Mam nasledujici dotaz, nenasel jste nekdo nejakou komponentu gridu, ktera je freeware a umi mit v kazde bunce jednu ruznou komponentu20

Dik Pavel Polak

Dotaz - seznam =?iso-8859-2?Q?b=EC=BE=EDc=EDch=20a

[*] David Svoboda <dsvoboda(zv)iol(tec)cz> - 23.7.1999 09:37:29



Petr Vones wrote:
>
> David Svoboda wrote:
> >
> Mozne to je, ale ve Win9x a NT4 jsou na to naprosto rozdilne funkce.
>
> Tady mas priklad jak to delat ve Win9x:
> http://www.delphi(tec)cz/soubor.asp?rok=1999&mesic=Jul&den=01&first=46&soubor=dlfaaacb.htm
>
> A tady najdes zase reseni pro NT:
> http://www.wilsonc.demon.co.uk/delphi.htm
>

Dekuji velmi Petrovi Vonesovi za radu, jiz umim ziskat seznam vsech
bezicich procesu.

Bohuzel jeste postrebuji, zda lze ve Win95 zjistit, kolik dany process
pouziva pameti. Ve WinNT to umim pomoci PSAPI.DLL, coz se ale ve Win95
neda pouzit.

Diky za kazdou radu David Svoboda

PS: Mozna pomuze popis, jak se ve Win95 pamet pouziva a rozdeluje pro
jednotlive procesy. Ja osobne to nevim.

dsvoboda(zv)iol(tec)cz


Locate(..)

[*] Petr Sadovsky <petr(zv)slunce(tec)cz> - 23.7.1999 09:42:22

Ahojte.
Mam problem se %sub%
Potrebuji vyhledat retezec ve fieldu DBase tabulky hodnotu, ktera muze byt
ulozena jakkoli(tzn. velka mala pismena nastridacku,do toho cislice,...)
Mam to udelane takto:

V2:=Edit1.Text;
V3:=AnsiUpperCase(Edit1.Text)

ZapisPripadu.DBF1.Locate('NAZEV1',VarArrayOf([V2,V3]),[loCaseInsensitive,
loPartialKey]);

... a hodilo by se mi neco takoveho:

ZapisPripadu.DBF1.Locate(AnsiUpperCase(FieldByName('NAZEV1')),VarArrayOf([V2
,V3]),[loCaseInsensitive, loPartialKey]);

Jde to nejak udelat? Mne napada jenom nastavit Filter.
A vyhledava Locate i casti retezcu? Jako treba V:=�mer� a vyhleda field s
�hamer�?

Predem diky.

Petr Sadovsk�
p.sadovsky(zv)atlas(tec)cz
ICQ 37042001

PCMCIA karta

[*] Novak Josef <jnovak(zv)anect(tec)cz> - 23.7.1999 10:03:20

Ahoj All!
Nev�te jak se d� programov� odebrat �i p�idat PCMCIA karta na notebooku?
Za ve�ker� informace p�edem d�kuji.

S pozdravem Nov�k J.
---
Odchoz� zpr�va neobsahuje viry.
Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.65 / Virov� b�ze: 37 - datum vyd�n�: 28.6.1999


Presun TXT souboru do Start-Dokumenty

[*] Mal� Dobromil <dodo(zv)rak.pr.ds.mfcr(tec)cz> - 23.7.1999 10:06:10

Ahoj,
jestli to jde vypnout, to nevim, ale pokud z adresare
Windows\Recent (pripadne Windows\Profiles\%user%\Recent)
vymazes prislusny link, tak to odtamtud zmizi.

Co se tyka toho pristupu xouboru, myslim, ze nejde jen
o sit, vzdyt Windows jsou "multitaskingove"... Takze
to zabrani cteni/zapisu i jinym programum, spustenym
na temze stroji (-IMHO).

Dobra.

> ----------
> kdyz v D4 otevru ASCII soubor jako "Text", tak se mi objevi v nab�dce
> Start-Dokumety. Lze to v D4 nejak programove vypnout?
>
> Je nejaky rozdil v pristupu k souboru "Write only" nebo "Read/Write"
> pokud chci do souboru pouze zapisovat a pristup predpokladam pouze od
> jednoho programu? Nebo maji tyto funkce vyznam pouze pro sitove
> aplikace?
>
>

Ulozeni pameti

[*] Mal� Dobromil <dodo(zv)rak.pr.ds.mfcr(tec)cz> - 23.7.1999 10:11:45

Ahoj,
mno, v pascalu se dalo napsat napr
type
TMemImg : array[1..512] of byte;
{ vytvori se pole dlouhe napr 512 bytu }
var
MemImg : TMemImg absolute $xxxx:yyyy
{ a tady se promena umisti primo na
adresu xxxx:yyyy a tim bude jeji obsah
odpovidat tomu, co je prave v paneti }

Tusim to slo i nejak pres Ptr, ale jak je to
ted v ere Windows, to nevim... Vyzkousej to...

Dobra.

> ----------
> nevite jak ulozit obsah pameti od adresy XXXXXX do adresy ZZZZZZ.
> Vubec nevim kde zacit? Nemate nekdo dobry napad?
>
>

DCOM

[*] Ren� Otisk - 23.7.1999 10:15:24

Poradte mi prosim

Klient-aplikaci mam na WIN95. Kdyz ji konektnu pres DCOM na server-aplikaci na NTWorkstejsnu trva to strasne dlouho a navic se mi Login box (databaze Paradoxu) zobrazi na tom NT-ecku. Kdyz ji konektnu pres DCOM na NTServer tak to ani netukne. Co s tim?

Dik

Sroub


Shift+TAB

[*] Mal� Dobromil <dodo(zv)rak.pr.ds.mfcr(tec)cz> - 23.7.1999 10:19:11

Tak jeste zkus SelectNext, ale nbevim, jestli to bude fungovat
mezi bunkami te mrizky, nema na to nejakou vlastni metodu ?

procedure SelectNext(CurControl: TWinControl; GoForward, CheckTabStop:
Boolean);

SelectNext moves the input focus from the current child control
to the next one in the tab order.

> ----------
> > > Muze nekdo poradit jak emulovat stisk klavesy SHIFT+TAB
> >
> > Simulovat stisk klavesy muzes obecne takhle:
> > > http://www.borland.com/devsupport/delphi/qanda/FAQ1500D.html
>
> Potrebuji to prave na ten zpetny posun,
> funkce Perform(WM_NEXTDLGCTL, , ); ale bohuzel nefunguje na na
> TDBCTRLGRID
> kde to prave potrebuji.
>
>

Grid s komponentama

[*] Pavel ZIDEK <kopr(zv)kopr(tec)cz> - 23.7.1999 10:22:37

Jakou ruznou. Dalsi grid, TEdit, List ci co
Pavel

----------
Odes�latel: Pavel Polak <pavelp(zv)bnsoft(tec)cz>
Komu: delphi-l(zv)fwd(tec)cz
P�edm�t: Grid s komponentama
Datum: 23. �ervence 1999 9:11

Zdravim!

Mam nasledujici dotaz, nenasel jste nekdo nejakou komponentu gridu, ktera je freeware a umi mit v kazde bunce jednu ruznou komponentu?

Dik Pavel Polak


RTF - zm�na textu

[*] Petr Vale� - 23.7.1999 10:36:26


Ahoj vsem,

mam problem se zmenou textu v komponente TRichEdit, respektive potrebuji
zmenit text s tim aby mi zustaly puvodni fonty. Pokud tedy mam napriklad
"matka" ve velikosti napr. 12 a pomoci metod "AnsiPos,Delete,Insert" v
"RichEdit1.Lines.Strings[1]" to zmenim na "mama" tak se mi text sice zmeni,
ale bohuzel s nim i fonty dle defaultniho nastaveni.

Nemate s tim nahodou nekdo zkusenost. Budu vdecny za kazdou odpoved.

Dekuji


Petr Vales


Grid s komponentama

[*] Krayzel Libor <Libor.Krayzel(zv)czech-tv(tec)cz> - 23.7.1999 11:03:39

> Jakou ruznou. Dalsi grid, TEdit, List ci co

Ne, zrejme mu jde o "imitaci" Object Inspectora.
Nasel jsem peknou komponentu na Torry. Jmenuje se FixSelGrid (nebo tak nejak
podobne - mam z ni jen demo), je tam i EXE sampl (velky cca 400kB). Pro
ukazku jsem ho dal na ftp.mlp(tec)cz do slozky smeti
(/pub/misc/delphi/konference/smeti).

Je sbaleny do samorozbalovaciho archivu.==[ Libor Krayzel ]================================
http://webhost(tec)cz/elka * mailto:libor.krayzel(zv)czech-tv(tec)cz
http://easypad.fwd(tec)cz * mailto:elka(zv)seznam(tec)cz
office: +420-69-620 1375
GSM: +420-603-937 947
==============================================

Grid s komponentama

[*] Pavel Polak <pavelp(zv)bnsoft(tec)cz> - 23.7.1999 11:07:08

Presne tak aby se tam dalo umistit tlacitko, combobox, checkbox a podobny
komponenty. Ten dalsi grid v gridu bych mit ani nemusel :)

----- P�vodn� zpr�va -----
Od: Pavel ZIDEK <kopr(zv)kopr(tec)cz>
Komu: <delphi-l(zv)fwd(tec)cz>
Odesl�no: 23. �ervence 1999 10:22
P�edm�t: Re: Grid s komponentama


Jakou ruznou. Dalsi grid, TEdit, List ci co
Pavel

----------
Odes�latel: Pavel Polak <pavelp(zv)bnsoft(tec)cz>
Komu: delphi-l(zv)fwd(tec)cz
P�edm�t: Grid s komponentama
Datum: 23. �ervence 1999 9:11

Zdravim!

Mam nasledujici dotaz, nenasel jste nekdo nejakou komponentu gridu, ktera je
freeware a umi mit v kazde bunce jednu ruznou komponentu?

Dik Pavel Polak


Tisk pres QReport

[*] TUNGLI Jan <tungli(zv)pvt.sk> - 23.7.1999 11:17:35

Je to stray problem v QR a dodnes nie je opravany. Mne sa stava, ze po load reportu je nastavenie stran nepristupny , inak to funguje.
Momentalne pracujem na exporte s QR, ktory nebude mat tento problem. Do konca mesiaca bude hotovy a zabudovany do SQL Report Builder programu s moynostou komrimacie vystupnych zostav.
http://www.nexus.hu/tungli

TUNGLI J�nos
email: tungli(zv)pvt.sk or Emial: jan.tungli(zv)seznam(tec)cz
Czech : http://freeweb.coco(tec)cz/tungli
Hungarian: http://www.nexus.hu/tungli
USA : http://www.fortunecity.com/skyscraper/zeros/864
-----P�vodn� zpr�va-----
Od: Ren� Otisk <otisk(zv)misel(tec)cz>
Komu: delphi-l(zv)fwd(tec)cz <delphi-l(zv)fwd(tec)cz>
Datum: 23. j�l 1999 10:02
P�edm�t: Tisk pres QReport


Mam takovy malicky problemek. Pouzivam QReport na generovani tiskovych sestav z databazi Paradoxu. Lec kdyz si chci nastavit v jiz spustene aplikaci v ukazce pred tiskem Printer Setup, tak rozsah stranek (pouze) mam nepristupny. Cim to je?

Memo BLOB (?)

[*] Robert Jendrisak <delphi(zv)minv.sk> - 23.7.1999 11:28:34

What about to use picture?
You can even to compress it this way.
You can also use the blob but you have to set it big enough.
I have 32KB the max.

Another way is to use a local directory where a text file is named
by serial row in table.

Have luck


C u

Werki


Remote control

[*] Ivan Turcan <iturcan(zv)gamo.sk> - 23.7.1999 11:33:41



From: Ivan Turcan(zv)GAMO on 23.07.99 11:33


To: delphi-l(zv)fwd(tec)cz
cc:
Subject: Remote control


hi all,

nestretol sa niekto nahodou z komponentami alebo kniznicami na remote control
(like Anywhere)

tx

-----------------------------------------------------------------------------
Ivan Turcan

Development specialist
(Delphi,C++ , Assembler, Interbase, Informix, WinBase602)

WDE HomePage: www.software602(tec)cz/wde

Tel: +421-88-4137 935
e-mail: iturcan(zv)gamo.sk
WWW Server: www.gamo.sk
GAMO a.s.
Slovakia

OLE DB (Was: Re: A je to tady !)

[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 23.7.1999 11:48:17

Jaro wrote:

> A mohl bys strucne napsat co je to OLE DB
> a jak by asi bylo pracne predelat rozdelany projekt,
> resp. co to vse obnasi? Pises koupit od treti firmy.
> Atazka: co to kostuje (stoji) samotny.

OLE DB je univerzalni objektove rozhrani pro praci s daty. Tolik
obecne. To znamena, ze OLE DB nejen umoznuje komplexni
pristup k databazim (cilem je zcela nahradit a vyhodit ODBC), ale i
k dalsim informacim v systemu, kam ODBC nedosahne - treba
textum, majlum a podobne. ADO je pak nadstavba nad OLE DB
pro jednodussi programatorsky pristup k temuz. Windows 2000
budou OLE DB prolezle skrz naskrz, takze bude jen otazka casu,
kdy se OLE DB masove rozsiri vsude (jsou a budou samozrejme i
zaplaty pro 95, 98 a NT). Proto bych novy projekt nezacinal s BDE,
protoze ocekavam, ze databazovi vyrobci postupne prestanou
podporovat DBLib. To samozrejme znamena problemy s
pouzitelnosti novych verzi databazi - nyni je to uz pripad MS SQL
7, tam dochazi uz dnes pri pristupu pres DBLib ke ztrate nekterych
vlastnosti.

Jake jsou dostupne komponenty pro OLE DB? Jednak to jsou moje
na Delphree (tedy zdarma), ktere pristupuji primo na OLE DB.
Problem vsak je, ze jsou teprve ve vyvoji, tedy musi se s nimi
pracovat hodne "rucne" a nejsou ani zdokumentovane. BTW -
docela bych rad, kdybyste na ne ohnuli vas generator sestav. Dalsi
vec je, ze jsem definitivne upustil z nekolika vaznych duvodu od
implantace na TDataSet, takze to nelze pouzit na predelavku
starsich projektu.

Dale jsou tu uz dnes ruzne komercni komponenty pro pristup pres
ADO (zde vsak dochazi k urcitym ztratam schopnosti komponent
oproti OLE DB, prestoze se Microsoft snazi tvarit ze ne), napriklad
cosi prodava Erik Szalaj, ale lze nalezt na internetu jeste dalsi
komponenty, ceny jsou ruzne. Pak budou ADO komponenty v D5,
ale jen v te nejvyssi verzi. Zrejme bude mozne je dokoupit i
samostatne. Je vsak otazka, kolik to bude stat, jak budou kvalitni a
jak rychle budou stacit sledovat prechod na OLE DB (ADO) 2.5 a
dalsi verze. Urcite se vsak nevyplati jen kvuli tomu kupovat tu
nejdrazsi verzi Delphi. Proto bych dal prednost komponentam
tretich stran, kde bych ocekaval vetsi pruznost. Pripadne je mozne
pouzit ADO celkem jednoduse primo, je to vsak "rucni" prace.

Je tu jeste jedna drobnost, na kterou bych chtel upozornit. Je
vhodne zapomenout na deleni TTable a TQuery. Pokud nekdo bude
chtit preklapet starsi projekt na ADO, pak mu asi nezbyde nez
pouzit jakesi TADOTable a TADOQuery. V novych projektech bych
se tomu vsak vyhnul velkym obloukem a dal bych prednost
komponente, ktera spise kopiruje vlastnosti ADO (OLE DB). V teto
technologii je totiz deleni na Query a Table nesmysl, protoze
jednotlive vlastnosti se uzce prolinaji. Co se tyce ADO, tak tam je
defaultne pristup vzdy jako pres Query, i kdyz zadam jen jmeno
tabulky (preklopi se na select * from <tablename>). Pokud chci v
ADO skutecne pristupovat primo k tabulce, musim to nejdrive
direktivne nastavit. V OLE DB je to trosku jinak, tam mam vetsi
volnost, ale jinak konecny vysledek (z hlediska pristupu k
vybranym datum) je stejny at pristupuji k datum primo pres jmeno
nebo pres sql.

Chystam se, ze se ADO a OLE DB dukladne naucim a ze to budu
prednaset, jestli ovsem do te doby neodfrcim do Ameriky. Vytaci
me, jak vysoke procento dementu je tady v tomto state (viz
preference komunistum, zavist [dost me unavuje neustale celit
promilanim jinych lidi o tom co mam, nebo jeste hure co bych mohl
podle jejich predstav mit] atp.)...


S pozdravem

Zbysek Hlinka
E-mail: zhlinka(zv)login(tec)cz, localizator(zv)localizator.com
Tel.: 02/795 29 56; GSM: 0603 551 282
Krystofova 1016, 149 00 Praha 4
CZ


Remote control

[*] Milan N�mec <nemec(zv)goldcard(tec)cz> - 23.7.1999 12:38:12

S knihovnou ne, ale pouzivame program na rem. ctrl.
VNC Viewer. Je to freeware a funguje to nejen
mezi Win (9x, NT), ale i na ostatnich platformach.
Pouzivame Win <=> Linux a Win <=> Win.
Mozna ze k tomu sezenes nejakej zdrojak.

Milan

----- Original Message -----
From: Ivan Turcan <iturcan(zv)gamo.sk>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Friday, July 23, 1999 11:33 AM
Subject: Remote control


>
> From: Ivan Turcan(zv)GAMO on 23.07.99 11:33
>
>
> To: delphi-l(zv)fwd(tec)cz
> cc:
> Subject: Remote control
>
>
> hi all,
>
> nestretol sa niekto nahodou z komponentami alebo kniznicami na remote
control
> (like Anywhere)
>
> tx
>
>
>
> --------------------------------------------------------------------------
---
> Ivan Turcan
>
> Development specialist
> (Delphi,C++ , Assembler, Interbase, Informix, WinBase602)
>
> WDE HomePage: www.software602(tec)cz/wde
>
> Tel: +421-88-4137 935
> e-mail: iturcan(zv)gamo.sk
> WWW Server: www.gamo.sk
> GAMO a.s.
> Slovakia
>

Ulozeni pameti

[*] Jiri Virt <virt(zv)pepa(tec)cz> - 23.7.1999 12:57:10

To je presne neco takovyho co bych potreboval.


Jirka Virt

email: virt(zv)pepa(tec)cz

www.pepa(tec)cz
-----P�vodn� zpr�va-----
Od: Mal� Dobromil <dodo(zv)rak.pr.ds.mfcr(tec)cz>
Komu: delphi-l(zv)fwd(tec)cz <delphi-l(zv)fwd(tec)cz>
Datum: 23. �ervence 1999 10:51
P�edm�t: RE: Ulozeni pameti


>Ahoj,
> mno, v pascalu se dalo napsat napr
>type
> TMemImg : array[1..512] of byte;
> { vytvori se pole dlouhe napr 512 bytu }
>var
> MemImg : TMemImg absolute $xxxx:yyyy
> { a tady se promena umisti primo na
> adresu xxxx:yyyy a tim bude jeji obsah
> odpovidat tomu, co je prave v paneti }
>
>Tusim to slo i nejak pres Ptr, ale jak je to
>ted v ere Windows, to nevim... Vyzkousej to...
>
>Dobra.
>
>> ----------
>> nevite jak ulozit obsah pameti od adresy XXXXXX do adresy ZZZZZZ.
>> Vubec nevim kde zacit? Nemate nekdo dobry napad?
>>
>>

Zip a Unzip [3]

[*] Bene� Jaroslav <JBenes(zv)cpoj(tec)cz> - 23.7.1999 13:15:08

Ahoj

byl jsem prekvapen zajmem o zipovaci komponenty a proto jsem je umistil
(TZip a TUnzip) na http://www.micrel-dev.com/delphi/ , odkud si je kazdy
zajemce muze stahnout (zdrojak + demo project), davam je volne k
dispozici.
Komponenty jsou primo kompatibilni s PKZIP1.1, plne nativni (link cca 22
KB kodu), ale dostatecne jednoduche a nizkourovnove (nejsou obaleny
zadnym manazerem, umi pouze zabalit-rozbalit zip-unzip); Pouzivam je pro
instalaky a pripadne baleni provoznich dat.
Mam je odzkousene v Delphi 1 a funguji mi ve vice jak 2000 programech.
Stale nemam ale cas je doladit pro Win32.
Vsechny dalsi potrebne veci (knihovna jbStr aj.) jsou tez na teto
strance ke stazeni.
Privitam Vase pripominky a pripadne namety. Pokud budete zasahovat do
zdrojaku, poslete mi, prosim, kopii.

Diky
Jaro B.

Komprese .EXE (mirny offtopic)

[*] Ing. �ubom�r G�L - 23.7.1999 13:48:25

POZOR! Jednosmerny kompresor! Unpack yet not implemeted! Inak SUPER!!!!

LuGa

******************************
Lubomir "Levec" GAL, -LuGa
IS, NUPSESO, a.s. Nitra, SK
mailto:lgal(zv)nupseso.sk
******************************

Locate(..)

[*] Petr Sadovsky <petr(zv)slunce(tec)cz> - 23.7.1999 14:02:47


Ahojte.

> Mam problem se %sub%
> Potrebuji vyhledat retezec ve fieldu DBase tabulky hodnotu, ktera muze byt
> ulozena jakkoli(tzn. velka mala pismena nastridacku,do toho cislice,...)
> Mam to udelane takto:
>
> V2:=Edit1.Text;
> V3:=AnsiUpperCase(Edit1.Text)
>
> ZapisPripadu.DBF1.Locate('NAZEV1',VarArrayOf([V2,V3]),[loCaseInsensitive,
> loPartialKey]);

Chybicka bude asi nekde jinde.Poprve jsem mel vyraz takto:

1) ZapisPripadu.DBF1.Locate('NAZEV1',Edit1.Text,[loCaseInsensitive,
loPartialKey]);

^^^^^^^^^^
a dostal jsem chybu promenne TEdit a Variant.Pak jsem to predelal, takto:

2) ZapisPripadu.DBF1.Locate('NAZEV1',V2,[loCaseInsensitive, loPartialKey]);
^^^

a poprve mi to vyhledalo spravne, ale potom uz to neslo.A ted kdyz mam vyraz
ad 1)
tak projede bez chyby.Co mi pretypovalo Edit na Variant?

Je to v D4 C/S,BDE 5.01.

Petr Sadovsk�
p.sadovsky(zv)atlas(tec)cz
ICQ 37042001

Zip a Unzip [3]

[*] Mal� Dobromil <dodo(zv)rak.pr.ds.mfcr(tec)cz> - 23.7.1999 14:41:05

Netyka se to primo tech komponent, ale
muzes zrusit tu hudbu ? Vrely dik...

Dobra.> ----------
> Privitam Vase pripominky a pripadne namety. Pokud budete zasahovat do
> zdrojaku, poslete mi, prosim, kopii.
>

Vyhladanie spojenia

[*] Peter ROZIM <prozim(zv)pollux.sk> - 23.7.1999 15:28:19

Sprava vo formate MIME rozdelena na viac hastm.

Pred casom to tu urcite bolo ale mi to uniklo
potreboval by som nejake nakopnutie ako najst najkratsiu cestu medzi dvoma miestami ak poznam spojenia medzi nimi a vzdialenosti
(nieco na sposob ROUTE66)

za kazdy prispevok vrela vdaka
prozim(zv)pollux.sk


Heslovani Woknows...znovu

[*] Ale� Beran - 23.7.1999 16:28:32

�au,

na t� adrese se to n�jak ned� st�hnout, �ve to na mn�, �e nejsem ameri�an.
Kde jste to st�hnuli.

Ale�

http://web.mit.edu/network/pgp.html


Martin Fron�k
ZZN Slan� a.s.
Pra�sk� 1579, 274 49, Slan�
tel. +420-314-522986
e-mail: fronek(zv)zznslany(tec)cz

Off Topic - Calc 602

[*] H�gr Ond�ej <Hegro(zv)senat(tec)cz> - 23.7.1999 17:31:16

Kdosi tu shanel dosovou verzi %subj%. Z dalsich prispevku jsem
nevydedukoval, zdali uz ma svuj problem vyresen. Tak ma-li zajem, at se ozve
na muj mail.

Andrew

P.S. Ostatnim se omlouvam, osobne mi na teto konferenci nejvice vadi OffTop.
a ted jsem sam jeden pustil do eteru :-(
---
Odchoz� zpr�va neobsahuje viry.
Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.69 / Virov� b�ze: 37 - datum vyd�n�: 28.6.1999


Shift+TAB

[*] Jiri Heinisch <HeiJu(zv)sol(tec)cz> - 23.7.1999 19:28:17

> > Jiri Heinisch wrote:
> > Muze nekdo poradit jak emulovat stisk klavesy SHIFT+TAB
>

Petr Vones wrote :
>>
> Ahoj,
>
> Simulovat stisk klavesy muzes obecne takhle:
> > http://www.borland.com/devsupport/delphi/qanda/FAQ1500D.html



Ahoj

Diky za pomoc.
Potrebuji to prave na ten zpetny posun,
funkce Perform(WM_NEXTDLGCTL, , ); ale bohuzel nefunguje na na TDBCTRLGRID
kde to prave potrebuji.


S pozdravem Heinisch Jiri

Tisk pres QReport

[*] Mirun <forcom(zv)telecom(tec)cz> - 23.7.1999 19:57:08

No, nesvadel bych to na QR, problem vychazi z logiky veci : aby ti zpristupnil rozsah stran, musi nejprve zjistit kolik jich je (to mi nepripada jako chyba), takze nejprve musis provest QR.Prepare, nebo QR.Preview - pak Ti to bude fungovat.

Mirun
----- P�vodn� zpr�va -----
Od: TUNGLI Jan
Komu: delphi-l(zv)fwd(tec)cz
Odesl�no: 23. �ervence 1999 11:17
P�edm�t: Re: Tisk pres QReport


Je to stray problem v QR a dodnes nie je opravany. Mne sa stava, ze po load reportu je nastavenie stran nepristupny , inak to funguje.
Momentalne pracujem na exporte s QR, ktory nebude mat tento problem. Do konca mesiaca bude hotovy a zabudovany do SQL Report Builder programu s moynostou komrimacie vystupnych zostav.
http://www.nexus.hu/tungli

TUNGLI J�nos
email: tungli(zv)pvt.sk or Emial: jan.tungli(zv)seznam(tec)cz
Czech : http://freeweb.coco(tec)cz/tungli
Hungarian: http://www.nexus.hu/tungli
USA : http://www.fortunecity.com/skyscraper/zeros/864
-----P�vodn� zpr�va-----
Od: Ren� Otisk <otisk(zv)misel(tec)cz>
Komu: delphi-l(zv)fwd(tec)cz <delphi-l(zv)fwd(tec)cz>
Datum: 23. j�l 1999 10:02
P�edm�t: Tisk pres QReport


Mam takovy malicky problemek. Pouzivam QReport na generovani tiskovych sestav z databazi Paradoxu. Lec kdyz si chci nastavit v jiz spustene aplikaci v ukazce pred tiskem Printer Setup, tak rozsah stranek (pouze) mam nepristupny. Cim to je?

Zpomaleni serveru

[*] Jaro <jaro(zv)sinea(tec)cz> - 23.7.1999 21:32:42

Jak dlouhe je to zpomaleni.
Sweep muze byt opravdu pricinou, ale probiha velice rychle.
a zdrzeni by nemelo byt vetsi nez nekolik
sec nebo desitek sec. Dalsim duvodem muze byt alokace neveho
prostoru. Zjisti, zda pri tom soubor meni velikost a zda se
zmensil nebo zvetsil.
Pridej k 20000 jeste tak 3 nuly a uvidis, zda je Sweep pricinou.
Sweep lze spustit i rucne v dobe, kdy se nepracuje.

Jaro



-----Puvodni zprava-----
Od: Ivo Janalik <janalik(zv)nam(tec)cz>
Komu: Delphi konference (el. adresa) <delphi-l(zv)fwd(tec)cz>
Datum: 22. eervence 1999 11:08
Poedmit: Zpomaleni serveru


>Preji hezky den,
>potreboval bych poradit s nasledujicim problemem.
>
>Pouzivame InterBase SQL server. Po urcite dobe dochazi ke zpomaleni
celeho systemu,
>server jako by neco provadel a v te dobe se zmeni datum u souboru
databaze. Potom uz
>zase funguje dobre. Nicmene to zpomaleni je velmi kriticke. Muze to
nejak souviset s nastavenim
>sweep - mame ho zapnuto po 20000 transakcich.
>
>Budu vdecny za jakoukoliv radu.
>
>ing. Radek Urbanczyk
>

Tables

[*] Menfy <menfy(zv)iol(tec)cz> - 23.7.1999 22:56:28

Nevite nekdo nahodou neco o MemoTable a MemoryTable ?
Dik
_______

Menfy design - vse pro internetovou prezentaci...
Filip Rejlek
tel.: 0602 / 816 151
e-mail : menfy.design(zv)telecom(tec)cz
menfy(zv)iol(tec)cz
web : http://web.iol(tec)cz/menfy

Grid s komponentama

[*] Jiri Fait <ft-soft(zv)iol(tec)cz> - 23.7.1999 23:54:40

Vyzkousej VGLib nebo SOHOLib je to na Torry, jeden z tichto baliku ma DBGrid ktery umi pouzivate (jednoduse) dal?i komponenty

-----Puvodni zprava-----
Od: Pavel Polak [SMTP:pavelp(zv)bnsoft(tec)cz]
Odeslano: 23. eervence 1999 11:07
Komu: delphi-l(zv)fwd(tec)cz
Poedmit: Re: Grid s komponentama

Presne tak aby se tam dalo umistit tlacitko, combobox, checkbox a podobny
komponenty. Ten dalsi grid v gridu bych mit ani nemusel :)

----- Puvodni zprava -----
Od: Pavel ZIDEK <kopr(zv)kopr(tec)cz>
Komu: <delphi-l(zv)fwd(tec)cz>
Odeslano: 23. eervence 1999 10:22
Poedmit: Re: Grid s komponentama


Jakou ruznou. Dalsi grid, TEdit, List ci co
Pavel

----------
Odesilatel: Pavel Polak <pavelp(zv)bnsoft(tec)cz>
Komu: delphi-l(zv)fwd(tec)cz
Poedmit: Grid s komponentama
Datum: 23. eervence 1999 9:11

Zdravim!

Mam nasledujici dotaz, nenasel jste nekdo nejakou komponentu gridu, ktera je
freeware a umi mit v kazde bunce jednu ruznou komponentu?

Dik Pavel Polak

Komprese .EXE (mirny offtopic)

[*] Petr =?iso-8859-2?Q?Ga=EFourek?= <geta(zv)telecom(tec)cz> - 24.7.1999 00:48:24

Ahoj,

Flaska Jakub wrote:

> Nahodou jsem narazil na vyborny kompresor .EXE souboru jmenem UPX.

Muzete nekdo o pakovani EXE napsat vic? Nejsou s tim nejake problemy?

Diky

Petr Gadourek

Komprese .EXE (mirny offtopic)

[*] Milan Schembera <milan(zv)missoftware(tec)cz> - 24.7.1999 08:24:24

-----Puvodni zprava-----
Od: Flaska Jakub [SMTP:jakub.flaska(zv)zps.skoda-auto(tec)cz]
Odeslano: 22. eervence 1999 15:25
Komu: delphi-l(zv)fwd(tec)cz
Poedmit: Komprese .EXE (mirny offtopic)

Zdravicko...

Nahodou jsem narazil na vyborny kompresor .EXE souboru jmenem UPX. Je
free i pro komercni pouziti a pakuje lepe nez cokoli jineho (viz
http://web.act.by.net/~act/act-exepack.html). Homepage je na adrese
http://cdata.tvnet.hu/~ml/upx.html nebo
http://wildsau.idv.uni-linz.ac.at/mfx/upx.html.

Vrele doporucuji. Aplikaci (psanou v Delphi) o delce 1.4MB mi zkratil na
460kB...


A co treba ASPack ??? Ja mam jeste freeware verzi, ta dokaze spakovat i
DLL. Konkretne EXE vytvoreny v D3, ktery mel 1,9MB mi zmensil na 300kB....
Pokud mate nekdo zajem, dal jsem ho ke stazeni sem:

http://www.missoftware(tec)cz/script/stahni.php?soubor=aspack.exe&protokol=http

Preji hezky den a jsem s pozdravem

Milan Schembera
missoftware - lanskrounska softwarova firma
tel./fax 0467/521555,0602/463353
mailto:info(zv)missoftware(tec)cz
http://www.missoftware(tec)cz
---------------------------------
- on-line objednavkove a rezervacni systemy po internetu
- tvorba www prezentaci vcetne skriptu
- zakazkovy software pro Windows 9x/NT

Tables

[*] Menfy <menfy(zv)iol(tec)cz> - 24.7.1999 12:25:59

Asi me budete povazovat za blbce, ale nainstaloval jsem si
RXLib. 2.60, ale kdyz jsem potom zkousel cokoliv otevrit, hlasili
Delphini chyby. Co s tim ?
_______

Menfy design - vse pro internetovou prezentaci...
Filip Rejlek
tel.: 0602 / 816 151
e-mail : menfy.design(zv)telecom(tec)cz
menfy(zv)iol(tec)cz
web : http://web.iol(tec)cz/menfy

Tables

[*] Menfy <menfy(zv)iol(tec)cz> - 24.7.1999 13:46:09

From: "Pavel Cech" <cech(zv)sol(tec)cz>
To: <delphi-l(zv)fwd(tec)cz>
Subject: Re: Tables
Date sent: Sat, 21 Aug 1999 12:59:43 +0200
Send reply to: delphi-l(zv)fwd(tec)cz

Napriklad TDBStatusLabel not Found XXX not found a nabizi mi to
IGNORACI, ale ta mi moc nepomuze.

> co presne to pise?
>
> ----- Original Message -----
> From: Menfy <menfy(zv)iol(tec)cz>
> To: <delphi-l(zv)fwd(tec)cz>
> Sent: Saturday, July 24, 1999 12:25 PM
> Subject: Tables
>
>
> > Asi me budete povazovat za blbce, ale nainstaloval jsem si
> > RXLib. 2.60, ale kdyz jsem potom zkousel cokoliv otevrit, hlasili
> > Delphini chyby. Co s tim ?
> > _______
> >
> > Menfy design - vse pro internetovou prezentaci...
> > Filip Rejlek
> > tel.: 0602 / 816 151
> > e-mail : menfy.design(zv)telecom(tec)cz
> > menfy(zv)iol(tec)cz
> > web : http://web.iol(tec)cz/menfy
> >
> >
>


_______

Menfy design - vse pro internetovou prezentaci...
Filip Rejlek
tel.: 0602 / 816 151
e-mail : menfy.design(zv)telecom(tec)cz
menfy(zv)iol(tec)cz
web : http://web.iol(tec)cz/menfy

Query a Grid - [ filtr ]

[*] prog0807(zv)email(tec)cz - 24.7.1999 14:36:01


ahojte

mam dotazek. Mam databazi na MS SQL 7.0 a pomoci jednoducheho prikazu
'select * from Tabulka1' zobrazuji data v gridu. Tabulka1 ma strukturu
napr:

sl1 integer,
sl2 interer,
sl3 string,
sl4 DateTime,
sl5 DateTime

Ja bych potreboval, aby se mi datum '1.1.1900' ve sloupci sl4
nezobrazoval v gridu jako '1.1.1900' ale jako prazdne policko. Proste to
nejak odfiltrovat. Stejne tak treba aby se castky v sl1 nad 100000
nezobrazovali ale bylo misto nich prazdne policko. Diky
Martin



--- CREATED BY ATC O..R..G..A..N..I..Z..E..R
--- http://email(tec)cz <--- Get Your Free Email

Komprese .EXE (mirny offtopic)

[*] Vojt�ch Semeck�������y�?��rL��(~�� - 24.7.1999 15:36:22

>A co treba ASPack ??? Ja mam jeste freeware verzi, ta dokaze spakovat i
>DLL. Konkretne EXE vytvoreny v D3, ktery mel 1,9MB mi zmensil na 300kB....
>Pokud mate nekdo zajem, dal jsem ho ke stazeni sem:
>http://www.missoftware(tec)cz/script/stahni.php?soubor=aspack.exe&protokol=http

Ten je zdarma pouze pro nekomercni ucely.

Vojtech Semecky


Komprese .EXE (mirny offtopic)

[*] Petr Vale� - 24.7.1999 17:05:58


Je fakt dobryy, 9,2 MB mi zkomprimoval na 2,2 MB a zatim vse OK.

Petr

-----P�vodn� zpr�va-----
Od: Milan Schembera <milan(zv)missoftware(tec)cz>
Komu: 'delphi-l(zv)fwd(tec)cz' <delphi-l(zv)fwd(tec)cz>
Datum: 24. �ervence 1999 2:00
P�edm�t: RE: Komprese .EXE (mirny offtopic)>-----Puvodni zprava-----
>Od: Flaska Jakub [SMTP:jakub.flaska(zv)zps.skoda-auto(tec)cz]
>Odeslano: 22. eervence 1999 15:25
>Komu: delphi-l(zv)fwd(tec)cz
>Poedmit: Komprese .EXE (mirny offtopic)
>
>Zdravicko...
>
>Nahodou jsem narazil na vyborny kompresor .EXE souboru jmenem UPX. Je
>free i pro komercni pouziti a pakuje lepe nez cokoli jineho (viz
>http://web.act.by.net/~act/act-exepack.html). Homepage je na adrese
>http://cdata.tvnet.hu/~ml/upx.html nebo
>http://wildsau.idv.uni-linz.ac.at/mfx/upx.html.
>
>Vrele doporucuji. Aplikaci (psanou v Delphi) o delce 1.4MB mi zkratil na
>460kB...
>
>
>A co treba ASPack ??? Ja mam jeste freeware verzi, ta dokaze spakovat i
>DLL. Konkretne EXE vytvoreny v D3, ktery mel 1,9MB mi zmensil na 300kB....
>Pokud mate nekdo zajem, dal jsem ho ke stazeni sem:
>
>http://www.missoftware(tec)cz/script/stahni.php?soubor=aspack.exe&protokol=http
>
>Preji hezky den a jsem s pozdravem
>
>Milan Schembera
>missoftware - lanskrounska softwarova firma
>tel./fax 0467/521555,0602/463353
>mailto:info(zv)missoftware(tec)cz
>http://www.missoftware(tec)cz
>---------------------------------
>- on-line objednavkove a rezervacni systemy po internetu
>- tvorba www prezentaci vcetne skriptu
>- zakazkovy software pro Windows 9x/NT
>

Internet explorer a netscape navigator

[*] Miro Mrazik <miro_mr(zv)hotmail(tec)com> - 24.7.1999 16:44:02 pdt

Zdravim,

da sa niekde v registroch spolahlivo zistit, ktory (alebo oba) z tychto
programov je v PC nainstalovany ?


______________________________________________________
Get Your Private, Free Email at http://www.hotmail.com


Komprese .EXE (mirny offtopic)

[*] Pavel T�th <pavel.toth(zv)mujweb(tec)cz> - 24.7.1999 20:24:59

> Muzete nekdo o pakovani EXE napsat vic? Nejsou s tim nejake problemy?
Ahoj

ja pouzivam na pakovani Exovek ASPACK
<REKLAMA> http://www.entechtaiwan.com/aspack.htm </REKLAMA>
a to, co je napsane v Delphi spakuje a je to vsechno chodive.
ALE uz jsem nasel EXE soubory, ktere to pomrsilo (nejsou z Delphi). Podle vseho
byly na konci prilozena nestandartnim zpusobem nejaka data.

Nejlepsi je, udelat si pred pakovanim zalohu (ASPacku umi sam...)>Diky

Neni zac
----
Pavel T�th, informatik SSP p�i OkU Most
mailto: pavel.toth(zv)mujweb(tec)cz
http://mujweb(tec)cz/www/pavel_toth/

Komprese .EXE (mirny offtopic)

[*] Milan Schembera <milan(zv)missoftware(tec)cz> - 24.7.1999 20:46:57

Muzete nekdo o pakovani EXE napsat vic? Nejsou s tim nejake problemy?

Spusteni takto zpakovaneho souboru neni nic jineho nez on-line dekomprimace
do pameti a nasledne spusteni. Ten ASPack, co jsem psal, je pro Win32
executable (EXE, DLL a myslim, ze i DPL). Vyhodu to ma v tom, ze se to
rychlej spousti a da se to hure hacknout ;-)

Co se mych zkusenosti tyce, zatim zadny problem, nezkousel jsem to snad
jedine na i386 ;-)

Preji hezky den a jsem s pozdravem

Milan Schembera
missoftware - lanskrounska softwarova firma
tel./fax 0467/521555,0602/463353
mailto:info(zv)missoftware(tec)cz
http://www.missoftware(tec)cz
---------------------------------
- on-line objednavkove a rezervacni systemy po internetu
- tvorba www prezentaci vcetne skriptu
- zakazkovy software pro Windows 9x/NT

Komprese .EXE (mirny offtopic)

[*] Petr Zahradnik <clexpert(zv)clexpert(tec)cz> - 24.7.1999 20:23:26

Puvodni zprava, kterou napsal Petr Vale� dne 24 Jul 99,:

> Je fakt dobryy, 9,2 MB mi zkomprimoval na 2,2 MB a zatim vse OK.

Ty mas 9,2 MB EXE soubor z Delphi? Clovece, co tam mas? To se mi
tedy jeste nepovedlo, jak to chodi? Jako myslim ten program, jak
maka.


S pozdravem
Petr Zahradnik, pocitacovy expert

Autorizovany dealer TurboPower Software... knihovny pro Delphi
==============================================================
=== Petr Zahradnik - Computer Laboratory ===
=== Obvodova 740/14, PO BOX 15, 400 07 Usti nad Labem 7 ===
=== telefon: 047-5500610, telefon/fax: 047-5501627 ===
=== mobilni telefon GSM (hotline): 0602-409601 ===
=== http://www.clexpert(tec)cz/ clexpert(zv)clexpert(tec)cz ===
==============================================================
ICQ: 21215917, PGP vitano


Programove nastaveni NetDir a Local share?

[*] Michal Kara <lemming(zv)atrey.karlin.mff.cuni(tec)cz> - 25.7.1999 10:29:29

Ahoj lidi!

Delam PARADOX databazi, kterou lze provozovat sitove pomoci namapovani drivu.
Kvuli tomu se musi nastavit LOCAL SHARE na TRUE a NETDIR. Ale mam problem, jak
zajistit, aby po instalaci meho programu bvaci meho programu byly tyto spravne
nastaveny. Nejake takove polozky jsou i v Registry, ale tam se ignoruji. Rovnez
jsem zkousel nastavit NetDir u Session a rici tabulkam, at ji pouzivaji, ale to
se take miji ucinkem. Jedine, co funguje je nastavit to primo v BDE
administratorovi, ktery pouziva ideapi32.cfg, ktery je v nejakem binarnim
formatu.

Nevite nekdo, jak to delat programove?

Diky,
Michal Kara alias lemming


--
PING 111.111.111.111 (111.111.111.111): 56 data bytes
...
---- Waiting for outstanding packets ----
No outstanding packets received, just two ordinary.

Query a Grid - [ filtr ]

[*] Milan Schembera <milan(zv)missoftware(tec)cz> - 25.7.1999 11:15:45

Ja bych potreboval, aby se mi datum '1.1.1900' ve sloupci sl4
nezobrazoval v gridu jako '1.1.1900' ale jako prazdne policko. Proste to
nejak odfiltrovat. Stejne tak treba aby se castky v sl1 nad 100000
nezobrazovali ale bylo misto nich prazdne policko. Diky


Zkus to jako vypocitavane pole, s tim, ze si na OnCalcFields naprogramujes
svoje podminky (jestli ma byt vysledne pole null nebo neco jineho).

Preji hezky den a jsem s pozdravem

Milan Schembera
missoftware - lanskrounska softwarova firma
tel./fax 0467/521555,0602/463353
mailto:info(zv)missoftware(tec)cz
http://www.missoftware(tec)cz
---------------------------------
- on-line objednavkove a rezervacni systemy po internetu
- tvorba www prezentaci vcetne skriptu
- zakazkovy software pro Windows 9x/NT

Vyhladanie spojenia

[*] Michal Kara <lemming(zv)atrey.karlin.mff.cuni(tec)cz> - 25.7.1999 11:39:12

> Doporucuji se podivat v ucebnicich algoritmizace
> a programovani na priklady
> zvane obvykle "uloha obchodniho cestujiciho"
>
> Pred casom to tu urcite bolo ale mi to uniklo
> potreboval by som nejake nakopnutie ako najst najkratsiu cestu medzi
> dvoma miestami ak poznam spojenia medzi nimi a vzdialenosti
> (nieco na sposob ROUTE66)
>

Obchodni cestujici je ponekud jina uloha (a NP-Uplna). Na tohle
staci obycejne prohledavani do sirky.

Michal Kara alias lemming


--
PING 111.111.111.111 (111.111.111.111): 56 data bytes
...
---- Waiting for outstanding packets ----
No outstanding packets received, just two ordinary.

Vyhladanie spojenia

[*] Tomas Matousek <matousek(zv)havit(tec)cz> - 25.7.1999 11:59:09

>> Doporucuji se podivat v ucebnicich algoritmizace
>> a programovani na priklady
>> zvane obvykle "uloha obchodniho cestujiciho"
>>
>> Pred casom to tu urcite bolo ale mi to uniklo
>> potreboval by som nejake nakopnutie ako najst najkratsiu cestu medzi
>> dvoma miestami ak poznam spojenia medzi nimi a vzdialenosti
>> (nieco na sposob ROUTE66)
>>
>
> Obchodni cestujici je ponekud jina uloha (a NP-Uplna). Na tohle
>staci obycejne prohledavani do sirky.
>
> Michal Kara alias lemming
>
>
>--
>PING 111.111.111.111 (111.111.111.111): 56 data bytes
>...
>---- Waiting for outstanding packets ----
>No outstanding packets received, just two ordinary.
>


Konkretneji Dijkstruv algoritmus.
Tomas Matousek


Vyhladanie spojenia

[*] Zdenek Drvota <drvota(zv)zds(tec)cz> - 25.7.1999 11:06:50

Doporucuji se podivat v ucebnicich algoritmizace

a programovani na priklady

zvane obvykle "uloha obchodniho cestujiciho"<FontFamily><param>Times New Roman</param><bigger>### Peter ROZIM napsal d=
ne 23 Jul 99, v 15:28 :<FontFamily><param>Courier New CE</param><smaller>Od: "Peter =
ROZIM" <<prozim(zv)pollux.sk>

Komu: "DELPHI FORUM" <<delphi-l(zv)fwd(tec)cz>

V=ECc: Vyhladanie spojenia

Datum odesl=E1n=ED: Fri, 23 Jul 1999 15:28:19 +0200

Po=B9tovn=ED prog.: Microsoft Outlook Express 4.72.2106.4

Odpov=EC=EF kam: delphi-l(zv)fwd(tec)cz


<FontFamily><param>Times New Roman</param>Pred casom to tu urcite bolo ale=
mi to uniklo<bigger>

<smaller>potreboval by som nejake nakopnutie ako najst najkratsiu cestu me=
dzi dvoma miestami ak poznam
spojenia medzi nimi a vzdialenosti<bigger>

<smaller>(nieco na sposob ROUTE66)<bigger>



<smaller>za kazdy prispevok vrela vdaka<bigger>

<smaller>ollux.sk"<underline><color><param>0000,0000,FF00</=
param>prozim(zv)pollux.sk</underline></color><bigger>

-----------------------------------------------
Ing. Zdenek Drvota e-mail: drvota(zv)zds(tec)cz
director
ZDS, spol. s r.o.
Hronovicka 708 tel:+420-40-6613756
530 02 Pardubice fax:+420-40-6613756
Czech Republic http://www.zds(tec)cz
e-mail: info(zv)zds(tec)cz
Internet proti monopolu http://www.bojkot(tec)cz
Pripojte se k hledani mimozemskych civilizaci:
SETI(zv)Home http://setiathome.ssl.berkeley.edu


BDE

[*] Miloslav Sk�cel <kastner(zv)infos(tec)cz> - 25.7.1999 14:50:19

Nevite nekdo jak osekat BDE natolik aby je PARADOXOVSKY drivery nemely 2 MB .Zab�val se n�kdo podrobn�ji ClientDATASET
Muzes zkusit BDE partial instalation, ale zpusobis
tim zbytecne komplikace s kompatibilitou instalaci
jinych programu vyuzivajicich BDE.
Bez BDE to nejde?

S pozdravem,
Miloslav Skacel
skacel(zv)stereo(tec)cz


Problem s hppta.drv od HP LJ1100

[*] Martin Kubecka <martin.kubecka(zv)amenit(tec)cz> - 25.7.1999 14:58:00

Presne jak radi Petr, chyba je v driveru co je na tom CD k HP1100 - stahni si novejsi ...

Mac

Petr Vones wrote:

> > Bronislav Gabrhel wrote:
> > Nainstaloval jsem do w95 tiskarnu HP LaserJet 1100 a prestaly mi chodit vsechny aplikace
> > pouzivajici qreport. Ani v Delphi neotevru projekt, ktery pouziva qreport.
> > Hlasi me to obecnou chybu ochrany programu hppta.drv, coz je driver k zminene tiskarne.
>
> Chyba bude pravdepodobne v driveru te tiskarny. QR se pri inicializaci
> asi nejak dotazuje na parametry tiskarny. Mam pocit ze uz tu kdysi podobny
> problem byl. Zkus si stahnout nejnovejsi driver primo od vyrobce.

--
==============================================================
= Ing. Martin Kubecka - Amenit s.r.o. =
= Na Valech - budova Dytron, 741 01 Novy Jicin =
= telefon/fax: +420 656 706203 mobil: +420 603 265926 =
= http://www.amenit(tec)cz mailto:martin.kubecka(zv)amenit(tec)cz =
= ICQ: 8906773 GSM (SMS): martin.kubecka(zv)sms.paegas(tec)cz =
==============================================================

Tables

[*] Jiri Fait <ft-soft(zv)iol(tec)cz> - 25.7.1999 23:02:57

To ti hlasi v nejke puvodni aplikaci nebo v nove aplikaci. Pokud si dobre pamatuji byly v 2.6 nektere komponenty presunuty do jinych unit
a krome toho v 2.6 bylo dost chyb a tak jsem se osobne radeji vratil k verzi 2.5.

-----Puvodni zprava-----
Od: Menfy [SMTP:menfy(zv)iol(tec)cz]
Odeslano: 24. eervence 1999 13:46
Komu: delphi-l(zv)fwd(tec)cz; delphi-l(zv)fwd(tec)cz
Poedmit: Re: Tables

From: "Pavel Cech" <cech(zv)sol(tec)cz>
To: <delphi-l(zv)fwd(tec)cz>
Subject: Re: Tables
Date sent: Sat, 21 Aug 1999 12:59:43 +0200
Send reply to: delphi-l(zv)fwd(tec)cz

Napriklad TDBStatusLabel not Found XXX not found a nabizi mi to
IGNORACI, ale ta mi moc nepomuze.

> co presne to pise?
>
> ----- Original Message -----
> From: Menfy <menfy(zv)iol(tec)cz>
> To: <delphi-l(zv)fwd(tec)cz>
> Sent: Saturday, July 24, 1999 12:25 PM
> Subject: Tables
>
>
> > Asi me budete povazovat za blbce, ale nainstaloval jsem si
> > RXLib. 2.60, ale kdyz jsem potom zkousel cokoliv otevrit, hlasili
> > Delphini chyby. Co s tim ?
> > _______
> >
> > Menfy design - vse pro internetovou prezentaci...
> > Filip Rejlek
> > tel.: 0602 / 816 151
> > e-mail : menfy.design(zv)telecom(tec)cz
> > menfy(zv)iol(tec)cz
> > web : http://web.iol(tec)cz/menfy
> >
> >
>


_______

Menfy design - vse pro internetovou prezentaci...
Filip Rejlek
tel.: 0602 / 816 151
e-mail : menfy.design(zv)telecom(tec)cz
menfy(zv)iol(tec)cz
web : http://web.iol(tec)cz/menfy

Heslovani Woknows...znovu

[*] Ing. Miroslav Ondrisek, BONNEL TECHNOLOGIE, s.r.o. <bonnel(zv)telecom(tec)cz> - 26.7.1999 06:43:02

http://www.pgpi.com

Mira

----- P�vodn� zpr�va -----
Od: Ale� Beran <beran(zv)vishay-pt(tec)cz>
Komu: <delphi-l(zv)fwd(tec)cz>
Odesl�no: 23. �ervence 1999 16:28
P�edm�t: Re: Heslovani Woknows...znovu


�au,

na t� adrese se to n�jak ned� st�hnout, �ve to na mn�, �e nejsem
ameri�an.
Kde jste to st�hnuli.

Ale�

http://web.mit.edu/network/pgp.html


Martin Fron�k
ZZN Slan� a.s.
Pra�sk� 1579, 274 49, Slan�
tel. +420-314-522986
e-mail: fronek(zv)zznslany(tec)cz


Heslovani Woknows...znovu

[*] Pavel Zichovsky <zichovsky(zv)jesnem(tec)cz> - 26.7.1999 07:19:01

> http://web.mit.edu/network/pgp.html
>
> na t� adrese se to n�jak ned� st�hnout, �ve to na mn�, �e nejsem ameri�an.
> Kde jste to st�hnuli.
>
No jo, to taky musis stahovat mezinarodni verzi, kterou najdes na
http://www.pgpi.com nekde v sekci download. Pripadne v nejakem hledaci
souboru hledej PGPfreeware602i.exe
S pozdravem
Pavel "Zizi" Zichovsky <zichovsky(zv)jesnem(tec)cz>
mobil: zichovsky(zv)gate.mobil(tec)cz (120 znaku)
PGP podporovano a vitano


monitorovani serioveho portu

[*] sula milos <crkstrobe(zv)geocities(tec)com> - 26.7.1999 07:44:27

Cau
nemate nekdo nahodou nejaky program ktery by monitoroval data ktera prave
prichazeji-odchazeji ze serioveho portu ?
dik


Tisk pres QReport

[*] Ren� Otisk - 26.7.1999 07:50:48

Vsak jo. Ono to neni po prikazu Preview pristupne . V D2 C/S to fungovalo a v D3 C/S ne. Navic existuje v D3 C/S nejaka fce (byla v D2), kter� sdru�uje komponenty QReporu v r�mci jedn� str�nky tak aby se automaticky tiskly na jedin� str�nce logick� celky?
----- Original Message -----
From: Mirun
To: delphi-l(zv)fwd(tec)cz
Sent: Friday, July 23, 1999 7:57 PM
Subject: Re: Tisk pres QReport


No, nesvadel bych to na QR, problem vychazi z logiky veci : aby ti zpristupnil rozsah stran, musi nejprve zjistit kolik jich je (to mi nepripada jako chyba), takze nejprve musis provest QR.Prepare, nebo QR.Preview - pak Ti to bude fungovat.

Mirun
----- P�vodn� zpr�va -----
Od: TUNGLI Jan
Komu: delphi-l(zv)fwd(tec)cz
Odesl�no: 23. �ervence 1999 11:17
P�edm�t: Re: Tisk pres QReport


Je to stray problem v QR a dodnes nie je opravany. Mne sa stava, ze po load reportu je nastavenie stran nepristupny , inak to funguje.
Momentalne pracujem na exporte s QR, ktory nebude mat tento problem. Do konca mesiaca bude hotovy a zabudovany do SQL Report Builder programu s moynostou komrimacie vystupnych zostav.
http://www.nexus.hu/tungli

TUNGLI J�nos
email: tungli(zv)pvt.sk or Emial: jan.tungli(zv)seznam(tec)cz
Czech : http://freeweb.coco(tec)cz/tungli
Hungarian: http://www.nexus.hu/tungli
USA : http://www.fortunecity.com/skyscraper/zeros/864
-----P�vodn� zpr�va-----
Od: Ren� Otisk <otisk(zv)misel(tec)cz>
Komu: delphi-l(zv)fwd(tec)cz <delphi-l(zv)fwd(tec)cz>
Datum: 23. j�l 1999 10:02
P�edm�t: Tisk pres QReport


Mam takovy malicky problemek. Pouzivam QReport na generovani tiskovych sestav z databazi Paradoxu. Lec kdyz si chci nastavit v jiz spustene aplikaci v ukazce pred tiskem Printer Setup, tak rozsah stranek (pouze) mam nepristupny. Cim to je?

monitorovani serioveho portu

[*] kelleon(zv)nnsk.sk - 26.7.1999 08:10:36

> -----Original Message-----
> Cau
> nemate nekdo nahodou nejaky program ktery by monitoroval data
> ktera prave
> prichazeji-odchazeji ze serioveho portu ?
> dik

Ahoj,
skus http://www.sysinternals.com/portmon.htm

Ondrej Kelle


Komprese .EXE (mirny offtopic)

[*] Mal� Dobromil <dodo(zv)rak.pr.ds.mfcr(tec)cz> - 26.7.1999 08:55:25

No, jestli tam je hodne (hluboke) grafiky napr. jako wallpap a podobne,
a je-li to tam jako bitmapa a ne jako jpeg, rekl bych, ze je to klidne
i mozne. Ale kdo vi... :-))) 9MB je vazne hodne.

Dobra.

> ----------
> > Je fakt dobryy, 9,2 MB mi zkomprimoval na 2,2 MB a zatim vse OK.
>
> Ty mas 9,2 MB EXE soubor z Delphi? Clovece, co tam mas? To se mi
> tedy jeste nepovedlo, jak to chodi? Jako myslim ten program, jak
> maka.
>
>

A-V slozenky

[*] Ing. Daniel Ficek <ficek(zv)hstech(tec)cz> - 26.7.1999 09:11:32

Diky vsem za rady. Moc to pomohlo.

Daniel Ficek


David Maly wrote:

> Tiskem slozenek jsme se pomerne intenzivne zabyvali, spravny font je
> OCR 10 BT, je to overeno na nekolika desitkach tisic vytistenych
> slozenek (predchazely samozrejme testy na cteckach)
>
> David
>
> This is a forwarded message
> From: Ing. Daniel Ficek <ficek(zv)hstech(tec)cz>
> To: Delphi konference <delphi-l(zv)fwd(tec)cz>
> Date: Monday, July 19, 1999, 1:48:23 PM
> Subject: A-V slozenky
>
> ===8<==============Original message text===============
> Dobry den,
> Mam dotaz, zda se nekdo nepokousel o tisk A-V slozenek. Konkrekne mi
> jde o font OCR-B1, kterym ma byt slozenka tistena. Slozenku tisknu
> pomoci QuickReportu+D3 C/S a nevim kde sezenu vyse zminovany font.
> Neresil nekdo jiz tisk techto slozenek?
>
> predem diky
> Daniel Ficek
>
> ===8<===========End of original message text===========
>
> Best regards,
> David mailto:david(zv)archa.com
>
> ------------------------------------------------------------------------
> Name: ocrb10n.zip
> ocrb10n.zip Type: Zip Compressed Data (application/x-zip-compressed)
> Encoding: base64


monitorovani serioveho portu

[*] Milan Schembera <milan(zv)missoftware(tec)cz> - 26.7.1999 09:17:14

Zkus Hyperterminal. Da se s tim monitorovat
prakticky jakykoliv port.

Milan


Admin heslo na InterBase

[*] Riedel Petr <Petr.Riedel(zv)ipbpojistovna(tec)cz> - 26.7.1999 09:19:54

Dobry den,

nejspis je muj dotaz stupidni, ale nevite nekdo odkud zjistim
administratorske heslo k lokalni InterBase z CD D4 Pro?
V pohode jsem ji nainstaloval, ale ted s do ni nemuzu prihlasit.

S pozdravem

Petr Riedel
mailto:petr.riedel(zv)ipbpojistovna(tec)cz


Query a Grid - [ filtr ]

[*] Karel B�ich��� - 26.7.1999 09:22:44

Ahoj.
Ja bych zkusil pouzit TField.OnGetText a TField.OnSetText.
Brichna
----- Original Message -----
From: <prog0807(zv)email(tec)cz>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Saturday, July 24, 1999 2:36 PM
Subject: Query a Grid - [ filtr ]>
> ahojte
>
> mam dotazek. Mam databazi na MS SQL 7.0 a pomoci jednoducheho prikazu
> 'select * from Tabulka1' zobrazuji data v gridu. Tabulka1 ma strukturu
> napr:
>
> sl1 integer,
> sl2 interer,
> sl3 string,
> sl4 DateTime,
> sl5 DateTime
>
> Ja bych potreboval, aby se mi datum '1.1.1900' ve sloupci sl4
> nezobrazoval v gridu jako '1.1.1900' ale jako prazdne policko. Proste to
> nejak odfiltrovat. Stejne tak treba aby se castky v sl1 nad 100000
> nezobrazovali ale bylo misto nich prazdne policko. Diky
> Martin
>
>
> --- CREATED BY ATC O..R..G..A..N..I..Z..E..R
> --- http://email(tec)cz <--- Get Your Free Email
>
>

Komprese .EXE (mirny offtopic)

[*] Dalibor Toman <dtoman(zv)fortech(tec)cz> - 26.7.1999 09:23:29

>
>ja pouzivam na pakovani Exovek ASPACK
><REKLAMA> http://www.entechtaiwan.com/aspack.htm </REKLAMA>
>a to, co je napsane v Delphi spakuje a je to vsechno chodive.
>ALE uz jsem nasel EXE soubory, ktere to pomrsilo (nejsou z Delphi). Podle vseho
>byly na konci prilozena nestandartnim zpusobem nejaka data.


pakovace execek pracuji tak, ze delku zdrojoveho souboru urci z hlavicky EXE souboru. Pokud tedy za logickym koncem EXEcka je jeste neco prilepenyho do souboru je to ztraceno. Nevim jestli je to nutnost ale UPX se takhle chova.

Zdravi
D. Toman

Admin heslo na InterBase

[*] Pavel Cisar <pcisar(zv)aktis(tec)cz> - 26.7.1999 09:26:10

Haj hou!

From: Riedel Petr <Petr.Riedel(zv)ipbpojistovna(tec)cz>
> nejspis je muj dotaz stupidni, ale nevite nekdo odkud zjistim
> administratorske heslo k lokalni InterBase z CD D4 Pro?
> V pohode jsem ji nainstaloval, ale ted s do ni nemuzu prihlasit.


Default SYSDBA heslo pro vsechny verze IB je MASTERKEY.

Hodne zdaru

Admin heslo na InterBase

[*] Mal� Dobromil <dodo(zv)rak.pr.ds.mfcr(tec)cz> - 26.7.1999 09:37:42

User : SYSDBA
Pass : masterkey

> ----------
> nevite nekdo odkud zjistim
> administratorske heslo k lokalni InterBase z CD D4 Pro?
> V pohode jsem ji nainstaloval, ale ted s do ni nemuzu prihlasit.
>

ListView

[*] Mal� Dobromil <dodo(zv)rak.pr.ds.mfcr(tec)cz> - 26.7.1999 09:45:43

This message is in MIME format. Since your mail reader does not understand
this format, some or all of this message may not be legible.

Ahoj,
mel bych zase jeden dotaz, mam ListView, v nemz jednotlive
Items zastupuji soubory a chtel bych u nich mit takove ikony,
jake ma uzivatel v registrech nastavene a aby dvojitym klepnutim
na ikonu se spustila asociovana aplikace (tohle umim) (pripadne
dialogove okno "Otevrit cim"). Podobne, jako je to u WinZip 7.0.
Nedelal jste nekdo neco podobneho ? Nevite, jak na to ?

Diiky za pomoc.

Dobra.

DCOM

[*] Ren� Otisk - 26.7.1999 09:52:35

Hilfe!

Skousim spoustet server aplikaci (NT Workstejsna) pres DCOM z klientske (W95) a dokud ji na te workstejsne nespustim, tak mi to hlasi "Neocekavane selhani". Z predchozich prispevku o DCOM jsem pochopil, ze by spousteni serveru melo fungovat automaticky. Co delam spatne?

Trideni

[*] Dalibor Bednar��k - 26.7.1999 09:55:31

Diky za popis

Jenom jsem nenasel v seznamu Pdox ANSI czech 1250
ale jenom Pdox ANSI czech 'CH'
Ale to mi staci



-----P�vodn� zpr�va-----
Od: tomas.mazurek(zv)vitkovice(tec)cz <tomas.mazurek(zv)vitkovice(tec)cz>
Komu: delphi-l(zv)fwd(tec)cz <delphi-l(zv)fwd(tec)cz>
Datum: 26. �ervence 1999 10:12
P�edm�t: Re: Trideni


>
>
>
>Hello,
>
>
>pri vytvareni tabulky napr. v Databasovem Desktopu staci nastavit
>prislusny jazykovy ovladac - Lang. driver. Pro cestinu si muzes
>vybrat hned nekolik: 852, 867 a 1250. Vsechny tri existuji jeste ve
>verzich s Ch. Osobne doporucuji Pdox Ansi Czech 1250.
>
>
>TM
>

Vyhladanie spojenia

[*] Zdenek Drvota <drvota(zv)zds(tec)cz> - 26.7.1999 09:04:50

Je to pravda, neni to presne totez, ale zpravidla
se uvadeji v literature blizko sebe :-)
Myslim, ze jako "nakopnuti" to snad take poslouzilo
(hadat se nebudu :-)))

### Michal Kara napsal dne 25 Jul 99, v 11:39 :
> > Doporucuji se podivat v ucebnicich algoritmizace
> > a programovani na priklady
> > zvane obvykle "uloha obchodniho cestujiciho"
> >
> > Pred casom to tu urcite bolo ale mi to uniklo
> > potreboval by som nejake nakopnutie ako najst najkratsiu cestu medzi
> > dvoma miestami ak poznam spojenia medzi nimi a vzdialenosti (nieco na
> > sposob ROUTE66)
> >
>
> Obchodni cestujici je ponekud jina uloha (a NP-Uplna). Na tohle
> staci obycejne prohledavani do sirky.
>
> Michal Kara alias lemming
-----------------------------------------------
Ing. Zdenek Drvota e-mail: drvota(zv)zds(tec)cz
director
ZDS, spol. s r.o.
Hronovicka 708 tel:+420-40-6613756
530 02 Pardubice fax:+420-40-6613756
Czech Republic http://www.zds(tec)cz
e-mail: info(zv)zds(tec)cz
Internet proti monopolu http://www.bojkot(tec)cz
Pripojte se k hledani mimozemskych civilizaci:
SETI(zv)Home http://setiathome.ssl.berkeley.edu


monitorovani serioveho portu

[*] Stanislav Kolar <standa(zv)winroute(tec)cz> - 26.7.1999 10:11:55

At 07:44 26.7.1999 +0200, you wrote:

>nemate nekdo nahodou nejaky program ktery by monitoroval data ktera prave
>prichazeji-odchazeji ze serioveho portu ?

http://www.sysinternals.com/portmon.htm

S. Kolar (standa(zv)winroute.com)

Komprese .EXE (mirny offtopic)

[*] Iko <iko(zv)kamarad(tec)cz> - 26.7.1999 10:11:31

To ja som mal 11 megovy program z delphi. Ale nebol to len kod,
bol v nom 10 megovy exac dalsi zabaleny.

> Ty mas 9,2 MB EXE soubor z Delphi? Clovece, co tam mas? To se mi
> tedy jeste nepovedlo, jak to chodi? Jako myslim ten program, jak
> maka.
>
>
> S pozdravem
> Petr Zahradnik, pocitacovy expert

iko
iko(zv)kamarad(tec)cz


Trideni

[*] tomas.mazurek(zv)vitkovice(tec)cz - 26.7.1999 08:28:00

Hello,

pri vytvareni tabulky napr. v Databasovem Desktopu staci nastavit
prislusny jazykovy ovladac - Lang. driver. Pro cestinu si muzes
vybrat hned nekolik: 852, 867 a 1250. Vsechny tri existuji jeste ve
verzich s Ch. Osobne doporucuji Pdox Ansi Czech 1250.

TM


monitorovani serioveho portu

[*] sula milos <crkstrobe(zv)geocities(tec)com> - 26.7.1999 11:00:10

jo prave jsme ho stahl, ale zjistil jsem ze mi to nemonitoruje napr. mys,
ktera posila pres com data pri pohybu. Resp. nemonitoruje mi to nic. Nekde
bylo napsano ze to umi monitorovat jen zarizeni ktere na ten port pristupuji
neprimo tak nevim ??? Nevite nekdo jak to presne je? Bude mi to sniffovat
aspon DIAL UP (na to to potrebuji, ale nemma to tedka zrovna kde vyzkouset)
----- P�vodn� zpr�va -----
Od: <kelleon(zv)nnsk.sk>
Komu: <delphi-l(zv)fwd(tec)cz>
Odesl�no: 26. �ervence 1999 8:10
P�edm�t: RE: monitorovani serioveho portu


> > -----Original Message-----
> > Cau
> > nemate nekdo nahodou nejaky program ktery by monitoroval data
> > ktera prave
> > prichazeji-odchazeji ze serioveho portu ?
> > dik
>
> Ahoj,
> skus http://www.sysinternals.com/portmon.htm
>
> Ondrej Kelle


Vyhladanie spojenia

[*] TUNGLI Jan <tungli(zv)pvt.sk> - 26.7.1999 11:04:12

Metodou CPM 20

TUNGLI J�nos
email: tungli(zv)pvt.sk
emial: jan.tungli(zv)seznam(tec)cz

My Home Pages:
Hungary : http://www.nexus.hu/tungli
USA : http://www.freeyellow.com/members8/tungli
Czech : http://freeweb.coco(tec)cz/tungli

-----P�vodn� zpr�va-----
Od: Peter ROZIM <prozim(zv)pollux.sk>
Komu: DELPHI FORUM <delphi-l(zv)fwd(tec)cz>
Datum: 23. j�l 1999 15:56
P�edm�t: Vyhladanie spojenia


Pred casom to tu urcite bolo ale mi to uniklo
potreboval by som nejake nakopnutie ako najst najkratsiu cestu medzi dvoma miestami ak poznam spojenia medzi nimi a vzdialenosti
(nieco na sposob ROUTE66)

za kazdy prispevok vrela vdaka
prozim(zv)pollux.sk


Internet explorer a netscape navigator

[*] Radek Pospisil <radek.pospisil(zv)sprinx(tec)cz> - 26.7.1999 11:32:16

ahoj,

Zkus se podivat jestli existuji v registry klice
Software\Microsoft\Internet Explorer
popr
Software\Netscape\Netscape Navigator

vsechno v HKCU nebo HKLM.

Funguje to celkem spolehlive. 100% zpusob snad ani neexistuje.

R.Pospisil


-----Original Message-----
From: Miro Mrazik [mailto:miro_mr(zv)hotmail.com]
Sent: Sunday, July 25, 1999 1:44 AM
To: delphi-l(zv)fwd(tec)cz
Subject: Internet explorer a netscape navigator


Zdravim,

da sa niekde v registroch spolahlivo zistit, ktory (alebo oba) z tychto
programov je v PC nainstalovany ?


______________________________________________________
Get Your Private, Free Email at http://www.hotmail.com


Komprese .EXE (mirny offtopic)

[*] Ing. �ubom�r G�L - 26.7.1999 11:33:10

... napriklad WinCommander je nevhodny kandidat ;-( ...

Vo vseobecnosti su nevhodne programy, ktore si nieco zapisuju do svojho
tela, maju na konci datovu oblast alebo vykonavaju nejaku kontrolu svojho
tela (typicky CRC). Preto je vhodne si ponechat kopiu programu!

LuGa

******************************
Lubomir "Levec" GAL, -LuGa
IS, NUPSESO, a.s. Nitra, SK
mailto:lgal(zv)nupseso.sk
******************************

ListView

[*] Mal� Dobromil <dodo(zv)rak.pr.ds.mfcr(tec)cz> - 26.7.1999 12:18:38

Chtel jsem to zkusit, ale prekladac hlasi,
ze nevi, co je to TSHFileInfo. V helpu jsem
toto slovo nenasel, kterou Unit mam pouzit ?

> ----------
> procedure TForm1.Button1Click(Sender: TObject);
> var
> FileInfo : TSHFileInfo;
> FileName : String;
>

ShortPath -> LongPath

[*] Mal� Dobromil <dodo(zv)rak.pr.ds.mfcr(tec)cz> - 26.7.1999 12:44:57

Ahoj,
z UDDF jsem vytahnul tohle, snad Ti to pomuze

Function GetShortFileName(Const FileName : String) : String;
var
aTmp: array[0..255] of char;
begin
if GetShortPathName(PChar(FileName),aTmp,Sizeof(aTmp)-1)=0 then
Result:= FileName
else
Result:=StrPas(aTmp);
end;

Function GetLongFileName(Const FileName : String) : String;
var
aInfo: TSHFileInfo;
begin
if
SHGetFileInfo(PChar(FileName),0,aInfo,Sizeof(aInfo),SHGFI_DISPLAYNAME)<>
0 then
Result:= String(aInfo.szDisplayName)
else
Result:= FileName;
end;


Dobra.

> ----------
> zda sa mi to dost stupidna otazka, ale co som vsetko skusal, furt mi
> to vypluvne zase len ShortPath. Myslim, ze uz to tu raz bolo, ale za
> boha to neviem v archive najst. Ako ide teda prekonvertovat napriklad
> adresar:
> C:\Progra~1\Micros~2\Office\ ===> C:\Program Files\Microsoft
> Office\Office
>

ListView

[*] Jano <jj_delphi(zv)ke.ubp.sk> - 26.7.1999 11:59:19

-----Original Message-----
From: Mal� Dobromil <dodo(zv)rak.pr.ds.mfcr(tec)cz>
To: #Delphi-K <delphi-l(zv)fwd(tec)cz>
Date: 26. j�l 1999 9:51
Subject: ListView


>Ahoj,
> mel bych zase jeden dotaz, mam ListView, v nemz jednotlive
>Items zastupuji soubory a chtel bych u nich mit takove ikony,
>jake ma uzivatel v registrech nastavene...

Ahoj,
ak som to dobre pochopil, tak sa to tu uz pred nedavnom preberalo:

procedure TForm1.Button1Click(Sender: TObject);
var
FileInfo : TSHFileInfo;
FileName : String;
SearchRec: TSearchRec;
Error : Integer;
FileList : String;
ImageListHandle: THandle;
begin
FileList := 'c:\dokumenty\';
ListView1.Items.BeginUpdate;
try
ListView1.Items.Clear;
ImageListHandle := SHGetFileInfo('', 0, FileInfo, SizeOf(FileInfo), SHGFI_SYSICONINDEX or SHGFI_SMALLICON);
SendMessage(ListView1.Handle, LVM_SETIMAGELIST, LVSIL_SMALL, ImageListHandle);
ImageListHandle := SHGetFileInfo('', 0, FileInfo, SizeOf(FileInfo), SHGFI_SYSICONINDEX or SHGFI_LARGEICON);
SendMessage(ListView1.Handle, LVM_SETIMAGELIST, LVSIL_NORMAL, ImageListHandle);
Error := FindFirst(FileList + '*.*', faArchive, SearchRec);
while Error = 0 do
begin
FileName := FileList + SearchRec.Name;
SHGetFileInfo(PChar(FileName), 0, FileInfo, SizeOf(FileInfo), SHGFI_ICON);
with ListView1.Items.Add do
begin
Caption := ExtractFileName(SearchRec.FindData.cFileName);
ImageIndex := FileInfo.iIcon;
SubItems.Add(IntToStr(SearchRec.Size));
end;
Error := FindNext(SearchRec);
end;
FindClose(SearchRec); // !!!
finally
ListView1.Items.EndUpdate;
end;
end;

Jano
jj_delphi(zv)ke.ubp.sk


Funkce na vyhledavani podretezce s uzitim regular

[*] Petr Fejfar <callnet(zv)telecom(tec)cz> - 26.7.1999 13:28:26

Hi all,

nevite nekdo o funkci, ktera by byla obdobou systemove funkce pos(), ale
parametr Substr by mohl byt regular expression, nejlepe v UNIX stylu?

Thanx, pf


ShortPath -> LongPath

[*] Jano <jj_delphi(zv)ke.ubp.sk> - 26.7.1999 12:32:51

Ahojte,
zda sa mi to dost stupidna otazka, ale co som vsetko skusal, furt mi to vypluvne zase len ShortPath. Myslim, ze uz to tu raz bolo, ale za boha to neviem v archive najst. Ako ide teda prekonvertovat napriklad adresar:
C:\Progra~1\Micros~2\Office\ ===> C:\Program Files\Microsoft Office\Office
Diky,

Jano

Jmeno domeny

[*] Hojda Pavel <hojda(zv)mmp.plzen-city(tec)cz> - 26.7.1999 13:35:06

Dobry den,
nevite nekdo, jak zjistit jm�no NT domeny, do ktere se uzivatel prihlasuje?

Diky

Pavel


DCOM

[*] Pavel Cisar <pcisar(zv)aktis(tec)cz> - 26.7.1999 13:48:18

Haj hou!

Zadrhelu muze byt vice, ale sazel bych na security. Mas nastaveno Authentication level na NONE a Impersonation level na IMPERSONATE (v DCOMCFNG.EXE) ?
From: Ren� Otisk
Subject: DCOM

Skousim spoustet server aplikaci (NT Workstejsna) pres DCOM z klientske (W95) a dokud ji na te workstejsne nespustim, tak mi to hlasi "Neocekavane selhani". Z predchozich prispevku o DCOM jsem pochopil, ze by spousteni serveru melo fungovat automaticky. Co delam spatne?

Divne chovani FindFirst() pod W95CZ OEM (D4prof+U3

[*] Petr Fejfar <callnet(zv)telecom(tec)cz> - 26.7.1999 14:05:45

Hi all,

narazil jsem na pocitac se starsi OEM instalaci ceskych W95 (puvodni bez SP,
neni to OSR2), u ktereho funkce FindFirst(<path>+'*.',faANyFile,SR) a
FindNext(SR) vyhledavaji i soubory s priponou
(

Nesetkal se s tim taky nekdo?

Thanx, pf

Jmeno domeny

[*] Pavel Cisar <pcisar(zv)aktis(tec)cz> - 26.7.1999 14:05:07

Haj hou!

From: Hojda Pavel <hojda(zv)mmp.plzen-city(tec)cz>
Subject: Jmeno domeny


>Dobry den,
>nevite nekdo, jak zjistit jm�no NT domeny, do ktere se uzivatel prihlasuje?

Na Win95/98 je to v registry HKEY_LOCAL)MACHINE\Security\Provider hodnota
Container (hodnota Address_Server je jmeno serveru). Na NT muze byt
odlisnost, ale tu z hlavy neznam.

Hodne zdaru


Jmeno domeny

[*] Mal� Dobromil <dodo(zv)rak.pr.ds.mfcr(tec)cz> - 26.7.1999 14:27:04

Myslim, ze tim to zjistit nejde, protoze v siti muze byt vice PDC
(v jedne domene samozrejme jen jeden) a zalezi jen na tom, ktery
PDC (BDC) uzivatele overil, a pokud souhlasi udaje, je tomuto
uzivateli umoznen pristup i na prostredky v jine domene.
Uzivatel dokonce pri prihlasovani muze zmenit jmeno domeny,
kde chce byt overen (-a tim tak nepouzit tu, ktera je v registru
a da se zmenit ve vlastnostech klienty site Microsoft v ovladacich
panelech - Sit).

Zkus pouzit API funkci LookupAccountName, ktera by Ti mela rici,
jak jmeno uzivatele, tak i jmeno domeny (DC), ktera jej overila.
Blizsi info najdes ve Win32.hlp

Dobra.

> ----------
> >Dobry den,
> >nevite nekdo, jak zjistit jm�no NT domeny, do ktere se uzivatel
> prihlasuje?
>
> Na Win95/98 je to v registry HKEY_LOCAL)MACHINE\Security\Provider
> hodnota
> Container (hodnota Address_Server je jmeno serveru). Na NT muze byt
> odlisnost, ale tu z hlavy neznam.
>
> Hodne zdaru
>
>

ListView

[*] Mal� Dobromil <dodo(zv)rak.pr.ds.mfcr(tec)cz> - 26.7.1999 14:28:24

Jo, to je ono, tam to je, co ja se toho nahledal...

Diky.

> ----------
> >Chtel jsem to zkusit, ale prekladac hlasi,
> >ze nevi, co je to TSHFileInfo. V helpu jsem
> >toto slovo nenasel, kterou Unit mam pouzit ?
> >
> >> ----------
> >> procedure TForm1.Button1Click(Sender: TObject);
> >> var
> >> FileInfo : TSHFileInfo;
> >> FileName : String;
> >>
> >
>
> pouzi Unitu ShellApi
>

ListView

[*] Mal� Dobromil <dodo(zv)rak.pr.ds.mfcr(tec)cz> - 26.7.1999 14:32:03

Jeste neco...
...kde najdu konstantu LVM_SETIMAGELIST,
LVSIL_NORMAL a spol. ?

Dobra.

> ----------
> >pouzi Unitu ShellApi
>

ListView

[*] Jano <jj_delphi(zv)ke.ubp.sk> - 26.7.1999 13:53:21

-----Original Message-----
From: Mal� Dobromil <dodo(zv)rak.pr.ds.mfcr(tec)cz>
To: delphi-l(zv)fwd(tec)cz <delphi-l(zv)fwd(tec)cz>
Date: 26. j�l 1999 12:19
Subject: RE: ListView


>Chtel jsem to zkusit, ale prekladac hlasi,
>ze nevi, co je to TSHFileInfo. V helpu jsem
>toto slovo nenasel, kterou Unit mam pouzit ?
>
>> ----------
>> procedure TForm1.Button1Click(Sender: TObject);
>> var
>> FileInfo : TSHFileInfo;
>> FileName : String;
>>
>


Ahoj,

pouzi Unitu ShellApi

Jano


WinExec a �ek�n� na ukon�en� aplikace

[*] Miroslav Topol�� - 26.7.1999 14:55:19

Zdravim,
Spoustim dosovsky program pomoci WINEXEC. Potrebuji po dobu behu
dosovske aplikace pozastavit beh programu v Delphi.

S pozdravem Miroslav Topol��

Off topic

[*] Filip Uram <4uram(zv)gmet.schools.sk> - 26.7.1999 14:55:39




Kdyz sme u toho:
Jak udelam rezidentni program pro dos, ktery mi zapisuje vsechny zmacknute
klavesy do souboru?
MImochodem vysvetlujte podrobne, protoze rezident jsem nikdy nedelal.

Michal HAMPL


Odporucam robit v assembleri, pokial by bol zaujem mam jeden funkcny rezident doma (v pripade zaujmu msg me), poukazujem vsak na jeho neeticku stranku
S pozdravom
Filip Uram

ShortPath -> LongPath

[*] Mal� Dobromil <dodo(zv)rak.pr.ds.mfcr(tec)cz> - 26.7.1999 14:57:31

Jo, je to tak jak pises, dela to asi toto :

(proporcional font)
Necht X=C:\PROGRA~1\ALWILS~1\AVAST32

C:\PROGRA~1\ALWILS~1\AVAST32 ==> AVAST32
X:=X-'AVAST32'

C:\PROGRA~1\ALWILS~1 ==> ALWIL Software
X:=X-'ALWILS~1'

C:\PROGRA~1 ==> Program Files

a pointa ? ;-)

ExtractFileDrive(X)+'\'+
'Program Files'+'\'+
'ALWIL Software'+'\'+
'AVAST32'
se rovna
C:\Program Files\ALWIL Software\AVAST32


Vic toho ze mne nedostanes,
pac toho ve me vic neni :-)

Dobra.

> ----------
> > z UDDF jsem vytahnul tohle, snad Ti to pomuze
> >
> >Function GetLongFileName(Const FileName : String) : String;
> >var
> > aInfo: TSHFileInfo;
> >begin
> > if
> >SHGetFileInfo(PChar(FileName),0,aInfo,Sizeof(aInfo),SHGFI_DISPLAYNAME
> )<>
>
> diky, nemam moznost hned vyskusat, ale zda sa mi, ze mi to vrati len
> dlhe meno suboru,
> nie s jeho plnou cestou.
>

ShortPath -> LongPath

[*] Flaska Jakub <jakub.flaska(zv)zps.skoda-auto(tec)cz> - 26.7.1999 15:08:15

Ja pouzivam nasledujici:

----------------------------------------------------------------------
function __GetLongName(sShortName: string; var bError: boolean): string;
var bAddSlash : boolean;
SearchRec : TSearchRec;
nStrLen : integer;
begin
bError:=False;
Result:=sShortName;
nStrLen:=Length(sShortName);
bAddSlash:=False;

if sShortName[ nStrLen ]='\' then begin
bAddSlash:=True;
SetLength(sShortName,nStrLen-1);
dec(nStrLen);
end;

if (nStrLen-Length(ExtractFileDrive(sShortName)))>0 then begin
if FindFirst(sShortName,faAnyFile,SearchRec)=0 then begin
Result:=ExtractFilePath(sShortName)+SearchRec.Name;
if bAddSlash then Result:=Result+'\';
end
else bError:=True; // handle errors...
FindClose( SearchRec );
end;
end;


function GetLongName(sShortName:string): string;
var s: string;
p: integer;
bError: boolean;
begin
Result:=sShortName;

s:='';
p:=Pos('\',sShortName);
while p>0 do begin
s:=__GetLongName(s+Copy(sShortName,1,p),bError);
Delete(sShortName,1,p);
p:=Pos('\',sShortName);
if bError then Exit;
end;

if sShortName<>'' then begin
s:=__GetLongName(s+sShortName,bError);
if bError then Exit;
end;

Result:=s;
end;
----------------------------------------------------------------------

Volani je napr.
ShowMessage('ShortPath='+ShortPath+#13+'LongPath='+GetLongName(ShortPath
)).

F.

> -----P�vodn� zpr�va-----
> Od: Jano [SMTP:jj_delphi(zv)ke.ubp.sk]
> Odesl�no: 26. �ervence 1999 13:33
> Komu: DELPHI Konferencia
> P�edm�t: ShortPath -> LongPath
>
> Ahojte,
> zda sa mi to dost stupidna otazka, ale co som vsetko skusal, furt mi
> to vypluvne zase len ShortPath. Myslim, ze uz to tu raz bolo, ale za
> boha to neviem v archive najst. Ako ide teda prekonvertovat napriklad
> adresar:
> C:\Progra~1\Micros~2\Office\ ===> C:\Program Files\Microsoft
> Office\Office
> Diky,
>
> Jano
>

RX 2.60

[*] Zden�k B�hm - 26.7.1999 15:12:52

Zdar vsichni,

mam drobny dotaz na vsechny, co instalovali Rx Library verze 2.60.
Pred chvili jsem ji stahnul (pred casem se tu diskutovalo o tom, ze jejich stranka neni pristupna, tak uz je a sice na http://www2.crosswinds.net/~rxlib).
Pri instalaci se mi ale dely a staje deji jakesy nekalosti (Delphi 3 Prof).
Pri instalaci packages (jsou tri) hlasi rxdb.dpk pri kompilaci interni chybu (Internal error: URW376 (vserikajici zkratka)) , ktera celkem schopne sejme Delphi. No nic, zrovna tyhle komponenty me moc neberou, takze jsem nainstaloval zbyvajici dva (instaloval jsem v poradi, jak bylo v popisu, tzn. nejprve rxctl, pak rxdb a nakonec rxtools), coz proslo v pohode.
Nejprve jsem zjistil jednu malou neprijemnost. Na palete komponent se natahly zalozky, takze jedna byla pres celou sirku palety a muselo se v nich listovat. No nic, shodil jsem Delphi a Wokna. Po nabootovani spustim snovu Delphi a ty mi hlasi, ze nemuzou najit dclrxtls.dpl a plnou cestu k nemu. At koukam jak koukam, ten soubor tam proste je a presne v tom adresari, kde to hlasi ta errorova hlaska. Hlasku odklepnu a Rx komponenty v Delphi pochopitelne nejsou.
Vite nekdo co s tim, predpokladam, ze ten debil jsem u toho ja, ale fakt nevim, kde delam chybu.

Jeste jedna vec (a vlastne duvod proc instaluju Rx), hledam neco jako TBitBtn, kde by se dalo nastavit transparentni pozadi tlacitka, tzn ze by byla videt pouze ikonka a text, tlacitko ne. Nevite kde to vzit?

Diky Zdenek

Vsem, kdo maji zajem o mp3 komponentu

[*] Zden�k B�hm - 26.7.1999 15:20:07

Ahoj,

jelikoz jsem to byl ja, kdo tenhle dotaz vykopl v plen, citim povinnost to trochu urovnat. Dostal jsem nekolik komponent a odkazu a vpodstate vsechny byly totez, jen s ruznymi kosmetickymi upravami. Nejkompletnejsi jsem to asi nasel na http://sunsite.icm.edu.pl/delphi/ftp/d20free/mpegplay.zip (jak mi poradil Radek Docekal), kde je to opravdu kompletni i s popisem.
Neni to vizualni komponenta, ale to uz si sikovny programator spacha sam. Jinak to funguje spolehlive a muzu to doporucit. Jedina vec, opravdu kosmeticka, co by se tomu dala vytknout je, ze zavolate play a par sekund trva, nez se to rozjede. Nevim proc, ale me to az tak nevadi.
Tak si to uzijte.

Zdar Zdenek

Jmeno domeny

[*] Micka Daniel <Daniel.Micka(zv)rbg2.siemens.de> - 26.7.1999 15:33:48

Rek bych, ze ve WINNT je to v (
HKEY_LOCAL_MACHINE/SOFTWARE/MICROSOFT/WINDOWS
NT/CurrentVersion/Winlogon/DefaultDomainName ) bez zaruk :o)


-----Original Message-----
From: Pavel Cisar [mailto:pcisar(zv)aktis(tec)cz]
Sent: Monday, July 26, 1999 2:05 PM
To: delphi-l(zv)fwd(tec)cz
Subject: Re: Jmeno domeny


Haj hou!

From: Hojda Pavel <hojda(zv)mmp.plzen-city(tec)cz>
Subject: Jmeno domeny


>Dobry den,
>nevite nekdo, jak zjistit jm�no NT domeny, do ktere se uzivatel prihlasuje?

Na Win95/98 je to v registry HKEY_LOCAL)MACHINE\Security\Provider hodnota
Container (hodnota Address_Server je jmeno serveru). Na NT muze byt
odlisnost, ale tu z hlavy neznam.

Hodne zdaru



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