Archív konference Delphi
Zpět na výběr roku archívu nebo přejít na fulltextové vyhledávání v konferenci.
Proc nefunguje WININET v RunServices?
[*] voltrr1.epr(zv)mail.cez(tec)cz - 31.5.2001 07:11:02
> Potrebuji detekovat aktivni internetove pripojeni pomoci Api funkce ve
> WININET.DLL Moje aplikace je vsak servisni a zpousti se jeste p�ed
> prihlasenim do site (v registru polozka RunServices) a v tento okamzik mi
> fce InternetGetConnectedState vraci vzdycky TRUE
> Nev�te nekdo nejakou ucinouradu nebo jak to udelat jinak (lepe)?
Jsi pripojen dialupem nebo pres sit ?
Pokud pres sit tak je to spravne protoze v tom pripade mas aktivni
spojeni. Tato funkce totiz (podle mne) nevraci to zda opravdu na
to netu jsi nebo ne ,ale predpoklada ze pokud jsi nastaven na sit
tak se tam dostanes vzdy a pokud mas modem tak to vraci true
je kdyz jsi pripojen dialupem do site
Radek
Kompilace BPL
[*] Libor Filip <filip(zv)agrokonzulta(tec)cz> - 31.5.2001 08:33:28
Jedna se o chybu v komponente TDBGrid. Tato chyba se projevuje pokud sam
pripravuji Columns a posledni sloupec nastavim jako neviditelny. Dale je
nutne nastavit velikost DBGridu tak, ze jsou videt vsechny sloupce a
posledni viditelny sloupec je videt krome line za timto sloupcem. Pri
prekreslovani DBGridu dojde k prekresleni pouze prvniho sloupce, ale
nasledne sloupce se neprekresluji. Pokud se zmeni velikost pouze o jediny
bod, tak prekreslovani je korektni.
Pricinu chyby jsem nalezl v objektu TCustomGrid. V metod�
GridRectToScreenRect je procedura LinePos. Zde upravuji
if Result > GridExtent then
begin
Result := 0;
Exit;
end;
na podm�nku " if Result > GridExtent + EffectiveLineWidth then ". Pri
puvodni podmince dojde k vynulovani vypocitane sirky prekreslovaneho
pravouhelniku.
Svoji upravou v potomku eliminuji nastaveni kriticke velikosti, ale
neresim
pricinu chyby, protoze metoda je private a ja jsem nenasel jinou moznost jak
to upravit.
Libor
neni, smysl VCL runtime balicku je i v tom aby byly 'stabilni'. Pokud jsi to
resil odvozenim komponenty tak to neni problem. Mimochodem co to bylo za
chybu
?
Petr Vones, amatersky programator
deklarace a inicializace
[*] Petr <DelphiForum(zv)seznam(tec)cz> - 31.5.2001 08:43:52
A zkousel jste
var
x : integer = 20;
Petr Jurik, Spravce site, programator
COMET System s.r.o.
1.Maje 1220
756 61 Roznov pod Radhostem
tel. 0651/653990
fax. 0651/653993
www.cometsystem(tec)cz
> > Dobry vecer,
> > chci se zeptat, jestli je mozne po deklaraci udelat nejakym zpusobem
ihned
> > inicializaci. Myslim, ze jsem to nekde videl, ale nesem si tim jisty.
> Jedna
> > se o neco takoveho:
> >
> > var u: Integer [10]
> >
> > Dekuji za pomoc Pisingr
---
Odchoz� zpr�va neobsahuje viry.
COMET System Network Administrator.
Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.255 / Virov� b�ze: 128 - datum vyd�n�: 17.05.01
Nastavenie dlzky impulzu
[*] Jozef Cervenansky <dodosoft(zv)hotmail(tec)com> - 31.5.2001 08:56:24
Ahojte,
kto by mi vedel poradit, aky sposobom by som mohol poslat na paralelny port
impulz o dlzke, ktoru si zadam.
Priklad : PortSignal(1,2);
Vysle na port LPT1 - bit D0 impulz o dlzke 1,2 ms.
Mam to robit pomocou Timera ? (Bude to spolahlive?)
(idem robit programator pre Atmel 89c2051)
Dakujem za kazdu odpoved.
Jozo
_________________________________________________________________________
Get Your Private, Free E-mail from MSN Hotmail at http://www.hotmail.com.Tisk v Quickreportu
[*] Dalibor Falt�nek <dalibor.faltynek(zv)orgrez(tec)cz> - 31.5.2001 09:16:24
Vazne to funguje, dik.
> Ahoj,
> nevi prosim Vas nekdo jak v qreportu - pouzivam delphi 3 client server -
> vytisknout v sestave master detail po sekci subdetail s daty z vedlejsi
> tabulky jeste nejaka pole z toho sameho rekordu hlavni tabulky???
>
> ahoj, SubDetail ma property FooterBand. vytvoris Band (tvuj summary z
hlavni
> tabulky) a priradis ho tehle property. to by snad melo bejt ono.
Seriova komunikace v threadu
[*] Slavomir Skopalik <skopalik(zv)atlas(tec)cz> - 31.5.2001 09:24:10
fungovat to bude (tak jak jste popsal), ale ma to svoje nevyhody:
1. Nedovite se o tom, ze nastaly potize
2. Nedovite se o tom, ze byla prijmuta nova data
Neni nutne vzdy volat metodu synchronize, staci si poslat zpravu, pokud
chcete neblokovane, tak pres PostMessage.
Technologii jsem okoukal z TTimer componenty.
Jak na to:
1. vytvorit potomka TThread (rekneme TA)
2. vytvorit potomka TComponent (rekneme TB)
3. TB bude vytvaret a rusit TA
4. TB bude zapisovat do Thread safe fronty pozadavku na odvisilani TA
5. TA bude posilat message TB (viz TTimer napriklad), nebo pres synchronize
6. Pokud chcete pouzivat WaitForComEvent, tak musite otevirat porty overlapped.
Slavek
>
> Potreboval bych udelat seriovou komunikaci ve zvlastnim threadu a to tak:
> - pri vysilani bych z hlavniho threadu predal data
> - pri prijmu by thread nastavil globalni promenou.
> Takze podle me bych nepotreboval volat metodu Synchronize
> Chtel bych aby prijem a vysilani dat byl nezavisly na hlavnim threadu.
>
> Poradte jak to mam udelat, nevim jak mam vytvorit komponentu pro
> seriovou komunikaci v threadu. Nebo je to blbost ??
>
> Dik
> Edit IP Address
[*] Milan ��ek <Cizek.Milan(zv)seznam(tec)cz> - 31.5.2001 09:55:18
> je mozne nejakym sposobom dostat do aplikacie editor IP adresy, ktory je
> pouzity v dialogu "TCP/IP vlastnosti" na zadanie IP adresy. Resp. ako
> vytvorit ovladaci prvok existujucej triedy (IPAddress) vo vlastnej
> aplikacii?
>
ahoj,
na www.utilmind.com najdes komponentu TIPEdit. Free se zdroji.
S pozdravem Milan Cizek, D5 Ent
______________________________________________________________________
http://www.EVA(tec)cz - 2200 typu elektrospotrebicu za neuveritelne nizke
ceny! Senzacni letni slevy. Fotografie personalu - nakupy na splatky -
soutez o zbozi zadarmo - bonus za kazdy nakup - provize.Struktura tabulky
[*] <bejcek(zv)centrum(tec)cz> - 31.5.2001 10:08:12
Ahoj, mam takovej debilni dotaz, potreboval bych pri selectu z
query zjistit strukturu tabulky,vim ze kdyz udelam double klick
na query tak mohu nacist tyto hodnoty primo do query,Jde mi o to
ze bych chtel zobrazit strukturu tabulky v listboxu ci v necem
podobnem.Take bych potreboval tahat strukturu libovolneho *.xls
Jde mi totiz o export a import podle zvolenych sloupecku do/z XLS
do DB
Dekuji
asi takhle
DB
Jmeno
Prijmeni
RokNar
Xls
JMENO
PRIJMENI
ROKNAR
Aldik (amater ale snazivej na D5 Ent W98)
Hrajte on-line hry na http://herna.centrum(tec)cz
Zalo�te si sv�j mail na http://mail.centrum(tec)cz
IP adresa
[*] Skalka Jan <jskalka(zv)ukf.sk> - 31.5.2001 10:11:12
Zdravim,
neviete mi niekto poradit, ako zistim IP adresu pocitaca v D5 nezavisle na
tom, ci som na lokalnom pocitaci, ci je adresa zadana rucne automaticky
alebo ju prideluje server?
Totiz to: Internetove komponenty maju podla helpu vratit IP, ale na lokale
sa mi to rozchodit nepodarilo, vracali len prazdny string, automaticku
konfiguraciu som dokazal precitat z registrov, ale pokial IP prideloval
server, vratila len 0.0.0.0.
Srdecna vdaka
Jan Skalka
fce TRUNC hlasi division by zero ???
[*] Tom� Hol� - notebook <notebook(zv)thcom(tec)cz> - 31.5.2001 10:12:23
ahoj,
ja jsem si jen tak testoval, co se stane v tomto kodu:
A := 10;
B := 0;
C := 10 / 0;
hodnota pomenne C je nyni INF+ coj je predpokladam kladnenekonecno
takze delphi opravdu nezachycyji vyjimku deleni nulou ???
nemate nekdo zkusenosti s nastavenim Tools - Debbuger - OS exceptions ?
to je jedine, kde me napada, ze by se to dalo poresit
dik TH
> Podle mych zkusenosti je velmu nutne se vsemi moznymi zpusoby se vyhnout
> tomu, aby vznikla vyjimka deleni nulou kdekoliv v programu. Databaze + Thread
[*] Parizsky Ladislav <Ladislav.Parizsky(zv)access-it(tec)cz> - 31.5.2001 10:26:19
Cau,
mam thread ve kterym vytvorim TDatabase, navliknu ji na SQL databazy a priopojim na ni Query tvorene v tomto threadu. To vse je ok, do doby nez SQL padne, nebo proste nekomunikuje. Kdyz se na nej zkusim connectnout pak mi zamrzne cela aplikace a ceka na odezvu, daval sem to do threadu aby ta aplikace bezela i kdyz je zrovna tohle SQL dole. Nevite nekdo jak je mozne ze ta aplikace stoji cela ?
dik Ladap
IP adresa
[*] mstevlik(zv)gamo.sk - 31.5.2001 10:28:21
uses
Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
Winsock, StdCtrls, ExtCtrls, Menus, clipbrd;
function MojaIP: string;
type
TaPInAddr = array [0..10] of PInAddr;
PaPInAddr = ^TaPInAddr;
var
phe : PHostEnt;
pptr : PaPInAddr;
Buffer : array [0..63] of char;
I : Integer;
GInitData : TWSADATA;
begin
WSAStartup($101, GInitData);
Result := '';
GetHostName(Buffer, SizeOf(Buffer));
phe :=GetHostByName(buffer);
if phe = nil then Exit;
pptr := PaPInAddr(Phe^.h_addr_list);
I := 0;
while pptr^[I] <> nil do begin
Result:=StrPas(inet_ntoa(pptr^[I]^));
Inc(I);
end;
WSACleanup;
end;
Stevlik Marian
ISYS-KOM programator
GAMO a.s., Banska Bystrica
+421 88 413 7935, 413 2942
mstevlik(zv)gamo.sk
+421 905 462 010
ICQ: 38493645
Skalka Jan
<jskalka(zv)ukf.sk> To: "'delphi-l(zv)clexpert(tec)cz'"
Sent by: <delphi-l(zv)clexpert(tec)cz>
delphi-l-owner(zv)c cc:
lexpert(tec)cz Subject: IP adresa
31.05.2001 10:11
Please respond
to delphi-l
Zdravim,
neviete mi niekto poradit, ako zistim IP adresu pocitaca v D5 nezavisle na
tom, ci som na lokalnom pocitaci, ci je adresa zadana rucne automaticky
alebo ju prideluje server?
Totiz to: Internetove komponenty maju podla helpu vratit IP, ale na lokale
sa mi to rozchodit nepodarilo, vracali len prazdny string, automaticku
konfiguraciu som dokazal precitat z registrov, ale pokial IP prideloval
server, vratila len 0.0.0.0.
Srdecna vdaka
Jan Skalka
N�co jako TDBLookupComboBox
[*] Petr Kejval <petr.kejval(zv)worldonline(tec)cz> - 31.5.2001 11:11:14
> > nevite o nejake komponente, ktera by na rozdil o TDBLookupComboBoxu
> > dovolovala zapsat jakoukoliv hodnotu a z Lookup tabulky by pouze
> > inkrementalne prednabizela hodnoty v ni obsazene.
>
> V jednom programu jsem potreboval neco podobneho. Nakonec
> jsem to resil bez psani nove komponenty. Pouzil jsem normalni
> TComboBox, naplnil Items podle tabulky a dopsal trochu kodu do
> OnKeyPress a OnChange, aby se to chovalo podobne jako
> zadavani adresy do IE (sice bez rozbaleni nabidky, ale to je
> drobnost).
>
TDBComboBoxX pracujici nad Items jsem si udelal, ale aby pracoval nad
nejakou tabulkou misto nad Items jsem se neodvazil naprogramovat, protoze to
asi nebude tak jednoduche. Proto jsem se ptal neni-li jiz neco podobneho
hotove. Nemuzu prece kazdy TDBComboBoxX plnit zaznami z cele tabulky, ktera
nemusi byt vzdy zrovna mala.
Nicmene za odpoved dekuji.
Petr Kejval.
Nastavenie dlzky impulzu
[*] Zden�k Adler <zdeneka(zv)seznam(tec)cz> - 31.5.2001 11:20:33
Mno pomoci Timeru bych to asi kazdopadne nedelal - dokaze casovat pouze na
milisekundy a jeste k tomu mi neprijde prilis presny. Kdyz uz by jsi mohl
postradat ty dve setiny, pouzil bych spis zpusob kdy nastavis uroven na
portu, potom udelas sleep(1) a zase nastavis uroven na portu. Asi je to
hloupost, ale nic jineho mne nenapada - sam jsem potreboval v emulatoru
8-bitoveho mikropocitace SHARP MZ-800 dosahnout toho, aby mi emulace
procesoru bezela presne s periodou 1/3546895 a skoncilo to rozumnym
kompromisem....
Zdenek
----- Original Message -----
From: Jozef Cervenansky <dodosoft(zv)hotmail.com>
To: <delphi-l(zv)clexpert(tec)cz>
Sent: Thursday, May 31, 2001 8:56 AM
Subject: Nastavenie dlzky impulzu
> Ahojte,
>
> kto by mi vedel poradit, aky sposobom by som mohol poslat na paralelny
port
> impulz o dlzke, ktoru si zadam.
>
> Priklad : PortSignal(1,2);
>
> Vysle na port LPT1 - bit D0 impulz o dlzke 1,2 ms.
> Mam to robit pomocou Timera ? (Bude to spolahlive?)
> (idem robit programator pre Atmel 89c2051)
>
> Dakujem za kazdu odpoved.
> Jozo
> _________________________________________________________________________
> Get Your Private, Free E-mail from MSN Hotmail at http://www.hotmail.com.
>
>
---
Odchoz� zpr�va neobsahuje viry.
Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.255 / Virov� b�ze: 128 - datum vyd�n�: 17.5.2001
OT: Zadost o pomoc pri testovani
[*] Kralik Michal <xkrali07(zv)stud.fee.vutbr(tec)cz> - 31.5.2001 11:35:01
Zdravim,
kamarad me pozadal o pomoc pri testovani. Jedna se o sbirani informaci o
zakladni desce a SMBIOSu. Pokud mate chvilku cas a chteli byste pomoct,
stahnete si prosim http://www.volny(tec)cz/yzi/Test.zip, spustte to a vysledek
(debug.log) zaslete na adresu krpata(zv)wo(tec)cz
Mockrat dekuji.
Michal Kralik
PS: Pripadne dotazy smerujte na adresu krpata(zv)wo(tec)cz
Nastavenie dlzky impulzu
[*] Gebauer Lukas <gebylist(zv)mlp(tec)cz> - 31.5.2001 11:39:06
jen bych podotknul, ze vzhledem k technologii WIN32 prikaz SLEEP(1)
nedela to, co si zrejme myslite, tedy NEzajisti uspani procesu na 1ms!!!
vysvetlovani proc a jak neni zalezitost na jeden mail, v chytrych knihach
jsou tomuto tematu venovany cele kapitoly!
Obecne a zjednodusene lze rict, ze sleep zajisti uspani procesu
MINIMALNE na hodnotu danou jako parametr. Zalezi strasne moc na
ostatnich bezicich vlaknech jinych procesu, na prioritach, atd!
Strojovy cac je bezicim pridelovan v casovych kvantech, ktere se u
ruznych typu windows pohybuji radove od 20ms az po 120ms, ale muze
to byt i libovolne jinak. prikaz Seep zpusobi, ze se bezici vlakno vzda
zbytku sveho casovehio kvanta a system vesele zacne podle slozitych
pravidel pridelovat casova kvanta ostatnim vlaknum.
Tedy Sleep(1) typicky zpusobi, ze kdyz zadny jiny proces nema
pozadavek na strojovy cas, bude tvemu programu dan strojovy cas pri
dalsim kolecku pridelovani casovych kvant. Typicky tedy nejak kolem
tyech 20ms. Pracuji-li ale v ten okamzik zurive jine alikace, klidne k
opetovnemu probuzeni tveho programu muze dojit i vyrazne pozdeji!!!
Specialitkou je zanlive nesmyslny prikaz sleep(0), ktery zpusobi opet
okamzite vzdani-se prave prideleneho strojoveho casu, ale tve aplikaci
bude dan dalsi cas hned jak se obslouzi cekajici aplikace se STEJNOU
PRIORITOU.
Lukas.
> Mno pomoci Timeru bych to asi kazdopadne nedelal - dokaze casovat
> pouze na milisekundy a jeste k tomu mi neprijde prilis presny. Kdyz uz
> by jsi mohl postradat ty dve setiny, pouzil bych spis zpusob kdy
> nastavis uroven na portu, potom udelas sleep(1) a zase nastavis uroven
> na portu. Asi je to hloupost, ale nic jineho mne nenapada - sam jsem
> potreboval v emulatoru 8-bitoveho mikropocitace SHARP MZ-800 dosahnout
> toho, aby mi emulace procesoru bezela presne s periodou 1/3546895 a
> skoncilo to rozumnym kompromisem....
>
> Zdenek
>
> ----- Original Message -----
> From: Jozef Cervenansky <dodosoft(zv)hotmail.com>
> To: <delphi-l(zv)clexpert(tec)cz>
> Sent: Thursday, May 31, 2001 8:56 AM
> Subject: Nastavenie dlzky impulzu
>
>
> > Ahojte,
> >
> > kto by mi vedel poradit, aky sposobom by som mohol poslat na
> > paralelny
> port
> > impulz o dlzke, ktoru si zadam.
> >
> > Priklad : PortSignal(1,2);
> >
> > Vysle na port LPT1 - bit D0 impulz o dlzke 1,2 ms.
> > Mam to robit pomocou Timera ? (Bude to spolahlive?)
> > (idem robit programator pre Atmel 89c2051)
> >
> > Dakujem za kazdu odpoved.
> > Jozo
> > ____________________________________________________________________
> > _____ Get Your Private, Free E-mail from MSN Hotmail at
> > http://www.hotmail.com.
> >
> >
>
>
> ---
> Odchoz� zpr�va neobsahuje viry.
> Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
> Verze: 6.0.255 / Virov� b�ze: 128 - datum vyd�n�: 17.5.2001
>
Louci se Lukas Gebauer.
E-mail: gebauerl(zv)mlp(tec)cz
WEB: http://www.ararat(tec)cz/synapse - Synapse Delphi TCP/IP Library
realne cisla 2!
[*] ing. Jan Fiala <jan.fiala(zv)iol(tec)cz> - 31.5.2001 11:41:54
Jestli to nebude tim, ze prekrocis rozsah single typu. V tom pripade
prekladac opravnene vyhodi vyjimku. Je to jako bys chtel do string[10],
nacpat znaku 13.
Typ Rozsah platn�ch ��sel
Single 1.5 x 10^�45 .. 3.4 x 10^38 7�8
Double 5.0 x 10^�324 .. 1.7 x 10^308 15�16
------
ing. Jan Fiala
mailto:jan.fiala(zv)iol(tec)cz
31.5.2011 Delphi:
> To je pekne, ja viem ze klasicky mozem priradit double do single,
> ale pri ohromnych vypoctoch so single mi vzniknu cisla, ktore mozem vlozit
> len do double
> a pri pokuse vlozit ich do Single mi hodi exception. (vacsinou su to nejake
> hausnumera s E na konci)
> Potrebujem vysledok v Single. Vcera som myslel ze mi nefunguje newsgrupa,
> pretoze to trvalo 3 hodiny pokial
> to do nej prislo, tak som priklad zmazal :( Napisem to odznova a poslem,
> zatial nikto nevie ako to riesit?Parametr
[*] ing. Jan Fiala <jan.fiala(zv)iol(tec)cz> - 31.5.2001 11:46:56
A jak to ten program ma vytusit, ze zrovna ted to chci prevzit ?
Text prece oznacuji postupne. Tomu programu musis dat pokyn: ted si to
prevezmi.
V TMemo je to treba vlastnost SelText. Pokud si tedy neco oznacim, a
dam odeslat, program si vezme Memo1.SelText a neco s nim provede.
------
ing. Jan Fiala
mailto:jan.fiala(zv)iol(tec)cz
31.5.2001 Krayzel Libor:
>> Mohl bys presneji popsat jak si to predstavujes ?
>> Pochopil jsem to tak, ze si oznacim kus textu a ten program si jej
>> prevezme bez toho, ze bych jej zkopiroval do clipboardu.P�episov�n� aktivn�ho okna
[*] Libor V�trovec <libor(zv)wlw(tec)cz> - 31.5.2001 10:51:02
Zdrav�m v�s
M�m aplikaci kde se spou#t� asi 20 dotaz� a zapisuji tam jejich pr�b�h. Ale
kdy� spust�m jinou aplikaci tak se mi okno p�ep�#e a zobraz�mezobraz� se
pouze ��st kter� pr�v� zapsala jako p�idan� text do Mema. Jak to vy�e#it aby
se mi v�dy p�i aktivaci op�t zobrazilo formul߰ tak jako na po��tku?
---
Odchoz� zpr�va neobsahuje viry.
Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.252 / Virov� b�ze: 125 - datum vyd�n�: 9.5.2001
Rozdil predavani interfacu mezi "in-process" a "ou
[*] Pavel P�kn� - 31.5.2001 11:54:30
Zdravim vsechny,
mam nasledujici problem:
Proces A.exe vytvori "out of process" COM object B.exe -
IB : = CreateComObject(CLASS_B) as IBCom;
a zavola funkci z B, ktera vytvori jednoduchy objekt C a vrati IUnknown
IU : = IB.GetLocalCOM;
function IB.GetLocalCOM : IUnknown;
var locCCom : TCCom;
begin
locCCom : = TCCom.Create;
result : = locCCom;
locCCom : = nil;
end;
Objekt C je potomek InterfacedObject
ICCom = interface ....
TCCom = class ( TInterfacedObject, ICCom ) ....
Pak ve chvili, kdy v ramci A chci pretypovat IUnknown na interface objektu
C, se vyvola vyjimka " Interface not supported " .
IC : = IU as ICCom;
Pokud je B ve forme "in process", pak mi vse probehne OK.
Nevite nekdo jestli to vubec jde, pripadne kde delam chybu?
Diky Pavel Pekny
N�co jako TDBLookupComboBox
[*] David Lebeda <david.lebeda(zv)comarr(tec)cz> - 31.5.2001 11:57:57
> Nemuzu prece kazdy TDBComboBoxX plnit zaznami z
> cele tabulky, ktera nemusi byt vzdy zrovna mala.
Je pravda, ze u velke tabulky se daji cekat neprijemnosti, ale ty by
prece byly u TDBLookupComboBoxu taky. ListSource je opren o
nejaky dataset a k tomu, abys mohl videt posledni polozku v
seznamu, musi byt vsechny zaznamy dotazeny na klienta (a ten je
kesuje). Za techto okolnosti mi prijde celkem jedno, jestli jsou data
v Items nebo v kesi datasetu.
Otazka je, jestli se da dosahnout rozumne rychlosti pri tomto
zpusobu prace nad nejakou hodne velkou tabulkou.
Ale rozhodne se Ti nesnazim vnucovat reseni, ktere se Ti
nelibi. Jen pisu nazor.
David Lebeda
Rozdil predavani interfacu mezi "in-process" a "ou
[*] Ond�ej Male�ek <ondrej.malecek(zv)radom-cz(tec)cz> - 31.5.2001 12:14:46
Mam dojem ze lze takto predavat pouze rozhrani implementujici IDispatch.
Funguje mi predavani rozhrani deklarovaneho zhruba nasledovne:
TClientNotification = class( TAutoObject, IClientNotification)
public
procedure CallBackNumberChanged(extNum: Integer); safecall;
end;
Ondrej
> TCCom = class ( TInterfacedObject, ICCom ) ....
> Pak ve chvili, kdy v ramci A chci pretypovat IUnknown na interface objektu
> C, se vyvola vyjimka " Interface not supported " .
> IC : = IU as ICCom;
>
> Pokud je B ve forme "in process", pak mi vse probehne OK.
>
> Nevite nekdo jestli to vubec jde, pripadne kde delam chybu?
>
> Diky Pavel Pekny
>
>
>
Monitorovani zmen v EXCELu
[*] David Majda <david.majda(zv)seznam(tec)cz> - 31.5.2001 12:19:38
Pisu to uz u podobnych dotazu po nekolikate: Zkus si totez udelat ve
VBA. Ten danou proceduru deklaruje takhle:
Private Sub Worksheet_Change(ByVal Target As Excel.Range)
Tzn. jako parametr se predava objekt Range, s tim by melo jit dal
normalne pres OLE pracovat.
Du#an Sedl��ek wrote:
> 2} Zkusil jsem i OLE propojeni pomoci TExcelApplication a
TExcelWorkSheet.
> Podarilose mi konektovat Excel a prislusny
> worksheet. Udalost OnChange mi take nastava, ale nevim jaka je struktura
> promenne do obsluhy udalosti zasilane, ktera je typu OleVariant o niz
> predpokladam, ze nese informaci o tom, ktera bunka/y se zmenila/y.
Muzete mi
> nekdo poradit, pripadne ma nekdo zkusenost s porovnanim
'propustnosti' DDE x
> OLE v obdobne situaci ?
--
--------------------------------------------------
E-mail: david.majda(zv)seznam(tec)cz
WWW: http://dmajda.hyperlink(tec)cz
Live long and prosper!
--------------------------------------------------
WMWARE kto ma???
[*] cis <cis(zv)atlas(tec)cz> - 31.5.2001 12:23:28
Trial si stahni z jejich serveru.
alda
----- Original Message -----
From: Robert Suska <robert(zv)korak.sk>
To: Delphi konfera <delphi-l(zv)clexpert(tec)cz>
Sent: Wednesday, May 30, 2001 5:29 PM
Subject: WMWARE kto ma???> Zdravim prosim Vas potrebujem nejaku FREE vezriu WMWARE for W32 aj pre
> LINUX. Moze byt aj Trial. Prosim kto ma ozvite sa mi na moj sukromny mail.
>
> Dakujem
>
> S pozdravom
>
> -----------------------------------------------------
> Robert Suska, IT specialista, amatersky programator
> KORAK SLOVAKIA
> Horna 52
> Banska Bystrica
> e-mail: sefino(zv)pobox.sk -> sms notifikacia,
> robert(zv)korak.sk
> WEB: http://www.korak.sk, http://www.6bone.sk
> tel. +42188 415 14 02
> -----------------------------------------------------
>
>
---
Odchoz� zpr�va neobsahuje viry.
Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.252 / Virov� b�ze: 125 - datum vyd�n�: 9.5.2001
Databaze + Thread
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 31.5.2001 12:54:23
From: "Parizsky Ladislav" <Ladislav.Parizsky(zv)access-it(tec)cz>
> mam thread ve kterym vytvorim TDatabase, navliknu ji na SQL databazy a
> priopojim na ni Query tvorene v tomto threadu. To vse je ok, do doby nez SQL
Ahoj,
pokud pouzivas BDE tak musis pro kazdy thread vytvorit zvlast session. Podivej
se na priklad Demos\Db\BkQuery.
Petr Vones, amatersky programator
Delphi IDE and packages - Internal error U704, Bad
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 31.5.2001 12:58:59
From: "likeapear" <likeapear(zv)centrum(tec)cz>
> pouzivaji spolecny balicek (nami vytvoreny). Ale dost casto se stava, ze
> prostredi pada nebo vypisuje hlasky typu:
> Internal error U704, Bad packaged unit format..., apod
Ahoj,
nemate nahodou v Search Path vicekrat unit se stejnym jmenem ? Jak je
nastaveno 'Build Control' v tom balicku ?
Petr Vones, amatersky programator
IBSQL - SELECT - transakce
[*] Radek KALA <Kala(zv)Atlas(tec)cz> - 31.5.2001 13:17:01
V dokumentaci je zcela jednoznacne, ze v pripade ze chci ukoncit
transakci a jsem si jisty, ze jsem neprovedl zadne zmeny je
vyrazne rychlejsi a doporuceny commit.
> Tazatel tady jasne pise PRES IBSQL ! Bez transakce to nejde.
>
> Jinak pokud se jedna jen o select, lze bez problemu pouzit Rollback a bude
> to i o neco rychlejsi (zalezi na slozitosti selectu).
>
> Petr Jurik, Spravce site, programator
> COMET System s.r.o.
> 1.Maje 1220
> 756 61 Roznov pod Radhostem
> tel. 0651/653990
> fax. 0651/653993
> www.cometsystem(tec)cz
>
>
> > Pokial robis len Select tak nezahajuj transakciu.
> > Roland.
>
>
> ---
> Odchoz� zpr�va neobsahuje viry.
> COMET System Network Administrator.
> Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
> Verze: 6.0.255 / Virov� b�ze: 128 - datum vyd�n�: 17.05.01
>
>
S pozdravem Radek KALA
BetaControl, s.r.o.
Cerneho 58/60, 635 00
tlf. : + 420 5 4622 3491
fax : + 420 5 4622 3470
GSM : + 420 603 85 75 15
Pristup do MainMenu
[*] Zden�k Adler <zdeneka(zv)seznam(tec)cz> - 31.5.2001 13:47:47
Ahoj,
mel bych tu jednu zacatecnickou: potreboval bych zachytit udalost, kdy
uzivatel vstoupi do MainMenu (at uz mysi, nebo pomoci zkratkovych klaves)
ale schazi mi u nej v Events vlastnost OnEnter nebo podobne.... Asi to bude
hloupost, ale poradi mi nekdo? Dekuji
Zdenek Adler
---
Odchoz� zpr�va neobsahuje viry.
Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.255 / Virov� b�ze: 128 - datum vyd�n�: 17.5.2001
IBSQL - SELECT - transakce
[*] David Lebeda <david.lebeda(zv)comarr(tec)cz> - 31.5.2001 13:56:04
> Pokud si muzes dovolit vyhradit transakci na vsechny SELECT
> operace, pak si ji klidne drz otevrenou. Pokud ji chces ukoncit, tak
> rozhodne pouzij COMMIT, pripadne COMMIT RETAINING (pokud budou
> nasledovat dalsi cteci operace).
Znamena to, ze read transakce neni nejstarsi otevrena transakce,
takze casem nehrozi sweep, i kdyz bude trvale otevrena?
A vytvorim read transakci tak, ze poklepu na komponentu
TIBTransaction, vyberu ReadCommited a k parametrum pripisu na
konec slovo read? Nebo je to jinak?
David Lebeda
Pristup do MainMenu
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 31.5.2001 14:06:31
From: "Zden�k Adler" <zdeneka(zv)seznam(tec)cz>
> mel bych tu jednu zacatecnickou: potreboval bych zachytit udalost, kdy
> uzivatel vstoupi do MainMenu (at uz mysi, nebo pomoci zkratkovych klaves)
> ale schazi mi u nej v Events vlastnost OnEnter nebo podobne.... Asi to bude
Ahoj,
napriklad takhle:
type
TForm1 = class(TForm)
MainMenu1: TMainMenu;
[...]
private
procedure WMEnterMenuLoop(var Message: TWMEnterMenuLoop); message
WM_ENTERMENULOOP;
procedure WMExitMenuLoop(var Message: TWMExitMenuLoop); message
WM_EXITMENULOOP;
public
{ Public declarations }
end;
var
Form1: TForm1;
implementation
{$R *.DFM}
{ TForm1 }
procedure TForm1.WMEnterMenuLoop(var Message: TWMEnterMenuLoop);
begin
inherited;
OutputDebugString('Menu entered');
end;
procedure TForm1.WMExitMenuLoop(var Message: TWMExitMenuLoop);
begin
inherited;
OutputDebugString('Menu left');
end;
Petr Vones, amatersky programator
Mount
[*] Miroslav Ondrisek <ondrisek(zv)atlas(tec)cz> - 31.5.2001 14:06:19
viz v textu:
> -----Original Message-----
> > Dobry den
> > Nevi nekdo jak Namountovat disk ve windows - Nemyslim sitovej. Myslim
> > nejaky soubor dat (v souboru na siti) ktery by se tvaril jako disk.
>
> ... ale v klasickyx windowsox taku aplikaciu nepoznam,
> aj ked podla mna to mohol M$ dokodit ay tam.
... Napr. PGPdisk a E4M (Encryption For the Masses) funguji presne takto a
samozrejme jak v NTs tak v 9x
Potrebujes to nutne napsat nebo Ti staci takova aplikace? Pokud aplikace,
tak E4M (www.e4m.net) je free pro vsechny Win.
Cau Mira
QR a QRImage
[*] Vlastimil Zden�k <gestore(zv)wo(tec)cz> - 31.5.2001 13:07:27
Ahoj,
V Quick Report tiskneme sestavu vcetne loga firmy. Pokud toto logo je natvrdo naloudovano do Image,
tiskne se vzdy.
Pokud tiskneme logo z databaze pres QRDBImage, na obrazovce pri Preview je logo vzdy, po odeslani na
tiskarnu nekdy ano, nekdy ne.
Zkusili jsme plnit QRImage na BeforePrint Bandu pomoci QRImage1.Picture.LoadFromFile dopada to
uplne stejne.
Jak donutit QR, aby obsah Image neztracel pri tisku.
Hilfe !!
( jak se norsky rekne pomoc ? )
( mame D5 Prof., QR 3.0.7 Stand., SQL 7.0 )
Vlasta Zdenek
Lokalizace v Linuxu (was: Nova cena pro Kylix)
[*] Hurricane <hurricane(zv)quick(tec)cz> - 31.5.2001 14:42:38
Zdravim
No, zrejme jsem spatne pochopil, co vlastne lokalizator dela. Ja myslel, ze
je to od zakladu delane na tahani textu z PE souboru a udelat to jinak by
znamenalo napsani noveho pogramu. Pokud by to sel napsat modul, ktery bude
tahat texty z includovych souboru nebo z definic menu (to uz je vicemene
jedno), tak by to bylo vyborne.
WinCommander nepouzivam, ale mas na mysli neco takoveho?:
[MainRadioForm]
MainRadioForm.TuneUpBtn.Hint=Ladit v�#e
MainRadioForm.TuneSmallUpBtn.Hint=Jemn� ladit v�#e
MainRadioForm.SaveBtn.Hint=Ulo�it frekvenci
MainRadioForm.TuneSmallDownBtn.Hint=Jemn� ladit nݿe
MainRadioForm.TuneDownBtn.Hint=Ladit nݿe
MainRadioForm.CloseBtn.Hint=Vypnout
MainRadioForm.ScanUpBtn.Hint=Hledat v�#e
MainRadioForm.UpBtn.Hint=Zv�#it hlasitost
MainRadioForm.DownBtn.Hint=Snݿit hlasitost
MainRadioForm.ScanDownBtn.Hint=Hledat nݿe
Pokud by slo lokalizatorem lokalizovat tohle, bylo by to fakt super.
Hurricane
-------------------
> Pokud jsou citelne texty ulozeny ve zvlastnim souboru nebo v includu
> ke zdrojakum (texty primo ve zdrojaku se nepouzivaji, Linuxovi
> programatori mnohem vice dbaji na cistotu kodu), tak to lokalizovat
> nemuzes. Na to by sel pouzit prekladac textu, ale ne Lokalizator. Leda
> ze bys takovou funkci do nej zabudoval. V takovem pripade je ale
> urcite lepsi takovy soubor vzit, texty v nem prepsat rucne a pripadne
> zkompilovat. Stejne jako se pocestuje RxLib apod.
Lokalizator 5 muze lokalizovat v principu ledacos, pokud umis
danou strukturu rozebrat, vybrat z ni texty ktere nabidnes
slovnikum k prekladu, a zase to cele spravne poskladat zpet. Neni
zadny problem dopsat jakykoliv modul na jakekoliv urovni.
Rucni prepisovani je dobre, pokud vis, ze to budes delat jednou a
nikdy vice. Automaticky preklad je lepsi v pripade, ze se tam
vyskytuji texty, ktere jsi uz nekdy drive prekladal, nebo se ten
soubor cas od casu ponekud zmeni.
Takze muze byt vyhodne pouzit lokalizator i v pripade, ze nekdo
vyviji program, texty si udrzuje ve zvlastnim souboru, ale obcas
nejaky text prida nebo ubere. Zejmena je-li takova struktura pouzita
ve vice programech.
Lze si tedy predstavit lokalizacni modulek i pro takove struktury,
jako jsou lokalizovane soubory pro Windows Commander
(wcmd_xx.lng a wcmd_xx.mnu).
Kopie doslych zprav
[*] Tomas Vladik <tom.vladik(zv)swadvice(tec)cz> - 31.5.2001 14:46:56
> delat takovehle blbosti. Je ale dulezite, abys pravidelne (podle uvazeni,
> cca jednou do mesice a pri neobvyklem chovani widli) spoustel kontrolu. A
> samozrejme manualne zkontrolovat diskety.
>
A pokud browsis na internetu a pouzivas MS IE, tak si v nem zakazat ActiveX, zalatal vsechny diry v nem a pouzivat
postovniho klienta, ktery ti nespusti kdo vi co ...
Proste chovat se maximalne obezretne, protoze nebezpeci ciha za kazdym rohem :-O
T.
Delphi IDE and packages - Internal error U704, Bad
[*] likeapear <likeapear(zv)centrum(tec)cz> - 31.5.2001 15:13:18
Search Path zkontroluju, BuildControl je nastaveno na "Rebuild as needed".
Jeste jsem zapomnel dodat, ze vsechny projekty (hlavni aplikaci, dlls i bpl
mam v grupe).
Kazdopadne dik za odpoved
LikeAPear
----- Original Message -----
From: "Petr Vones" <pvones(zv)mbox.vol(tec)cz>
To: <delphi-l(zv)clexpert(tec)cz>
Sent: Thursday, May 31, 2001 12:58 PM
Subject: Re: Delphi IDE and packages - Internal error U704, Bad packaged
unit format...> From: "likeapear" <likeapear(zv)centrum(tec)cz>
> > pouzivaji spolecny balicek (nami vytvoreny). Ale dost casto se stava, ze
> > prostredi pada nebo vypisuje hlasky typu:
> > Internal error U704, Bad packaged unit format..., apod
>
> Ahoj,
>
> nemate nahodou v Search Path vicekrat unit se stejnym jmenem ? Jak je
> nastaveno 'Build Control' v tom balicku ?
>
> Petr Vones, amatersky programator
>
>
IBSQL - SELECT - transakce
[*] Pavel Cisar <pcb(zv)atlas(tec)cz> - 31.5.2001 15:29:31
Haj hou!
On 31 May 2001,, David Lebeda wrote:
> Znamena to, ze read transakce neni nejstarsi otevrena transakce,
> takze casem nehrozi sweep, i kdyz bude trvale otevrena?
U bezne aplikace kdy je uzivatel pripojen pres den na tom tolik
nezalezi. Odstup mezi transakcemi a sweep neni tak straslivy
problem jak se to casto maluje, obvzlaste u IB6 kde je uklid delan
na pozadi a nahly naval prace server neodstavi (alespon ne
razantne). Prirozene, ze pokud aplikace bude nejaky serverovy
demon/sluzba ktera bezi cele dny bez preruseni, tak je lepsi ten
COMMIT (RETAINING) delat.
> A vytvorim read transakci tak, ze poklepu na komponentu
> TIBTransaction, vyberu ReadCommited a k parametrum pripisu na
> konec slovo read? Nebo je to jinak?
read_committed
rec_version
nowait
cili standardni Read Committed. Klicove slovo read (+consistency)
slouzi k snapshot transakcim ktere jsou zcela izolovane od zbytku
transakci (vidi vlastni snapshot databaze z okamziku startu).
Nepredpokladam, ze by to bylo v tomto pripade zadouci chovani.
Hodne zdaru
Pavel Cisar <pcisar(zv)borland(tec)cz>
Borland s.r.o.P�episov�n� aktivn�ho okna
[*] brant(zv)dcomm(tec)cz - 31.5.2001 15:47:22
Jestli jsem to dobre pochopil, prekresluje se pouze cast okna. To je
zpusobene tim, ze aplikace dela neco jineho a nezpracovava napr. WM_PAINT.
Dej do kazde takove casove narocne operace prikaz
Application.ProcessMessages a melo by to pomoci.
RNDr. Petr Brant [brant(zv)dcomm(tec)cz]
ICQ #68652380
D&COMM s.r.o.
Korunova�n� 6
170 00 Praha 7
Tel. 0724/007234
Zdrav�m v�s
M�m aplikaci kde se spou#t� asi 20 dotaz� a zapisuji tam jejich pr�b�h. Ale
kdy� spust�m jinou aplikaci tak se mi okno p�ep�#e a zobraz�mezobraz� se
pouze ��st kter� pr�v� zapsala jako p�idan� text do Mema. Jak to vy�e#it aby
se mi v�dy p�i aktivaci op�t zobrazilo formul߰ tak jako na po��tku?Crypto API
[*] David Kallab <kallab(zv)seznam(tec)cz> - 31.5.2001 16:08:37
Vezeni,
nema nekdo zkusenosti s programovani v D3,4,5 spolu s CryptoAPI? Cokoliv mi
pomuze. Veskere priklady na serverech MS jsou v C.
Cokoliv mi muzete poslat i na privatni mail: kallab(zv)seznam(tec)cz
Diky D. Kallab
---
Odchoz� zpr�va obsahuje viry.
Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.255 / Virov� b�ze: 128 - datum vyd�n�: 17.5.2001
realne cisla 2!
[*] Kalhous Zdenek <zdenek.kalhous(zv)comarr(tec)cz> - 31.5.2001 16:16:36
Po tomto vysvetleni mam pocit, ze chcete mermomoci nacpat do
single cisla neco, co se tam proste nemuze vejit. Trochu mi to
pripomina slavne tvrzeni, ze uvnitr zemekoule je jeste jedna
mnohem vetsi :-)
On 31 May 2011, at 8:17, Delphi wrote:
> To je pekne, ja viem ze klasicky mozem priradit double do single, ale
> pri ohromnych vypoctoch so single mi vzniknu cisla, ktore mozem vlozit
> len do double a pri pokuse vlozit ich do Single mi hodi exception.
> (vacsinou su to nejake hausnumera s E na konci) Potrebujem vysledok v
> Single.
Z.Kalhous
dbgo a delphi 6
[*] Bohdan Voska <bohdan(zv)softok(tec)cz> - 31.5.2001 16:35:29
Ahoj,
dostal se mi ruky papir "10 duvodu proc koupit delphi 6" od Borlandu a
nerozumim jedne veci. Pise se tam, ze se dostaneme na data se zdrojem
Microsoft ADO pres "dbGo". To je neco noveho, nebo je ADOEXPRES z delphi 5.
Vite nekdo jak to je?
Bohdan Voska
bohdan(zv)softok(tec)cz
IB: secondary files, vice souboru databaze, defini
[*] Michal Tiller <Michal.Tiller(zv)oskarmobil(tec)cz> - 31.5.2001 16:53:23
Dobry den,
// Delphi 5 Ent., IB 6, IB Express
Mam databazi na IB6. Kdyz soubor databaze prerostl 4GB db se zhroutila.
Pridal jsem dalsi soubory po 200.000 strankach (velikost stranky 8kb). Kdyz
db zacala pouzivat dalsi stranky zacaly velke problemy. Log je plny zaznamu
o duplicite stranek. Ten log ma po tydnu 1.5GB :)
Ja pouzil sql:
ALTER DATABASE 'db_0.gdb'
ADD FILE 'db_1.gdb' STARTING AT PAGE 200.001 LENGTH 200.000
ADD FILE 'db_2.gdb' STARTING AT PAGE 400.001 LENGTH 200.000
ADD FILE 'db_3.gdb' STARTING AT PAGE 600.001 LENGTH 200.000;
a vse probehlo ok. Ale moc to pak nefungovalo. Napada me, ze jsem sice
nadefinoval, kde zacina druhy soubor, ale ne jak je prvni veliky.
Ptam se tedy, jak pridat do db dalsi soubory tak, aby je dokazala korektne a
bez problemu pouzit.
Michal Tiller
(poukaz na vyvojare)
Michal.Tiller(zv)OskarMobil.Cz
dbgo a delphi 6
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 31.5.2001 17:10:53
From: "Bohdan Voska" <bohdan(zv)softok(tec)cz>
> nerozumim jedne veci. Pise se tam, ze se dostaneme na data se zdrojem
> Microsoft ADO pres "dbGo". To je neco noveho, nebo je ADOEXPRES z delphi 5.
Ahoj,
dbGo je novy nazev pro ADOExpress, navic by melo byt soucasti i Professional
baleni, viz D6 Chat (http://groups.google.com/groups?ic=1&th=a9bf1641283fb2a7)
Petr Vones, amatersky programator
QR a QRImage
[*] Martin Macko, M-PRO s.r.o. <martinm(zv)m-pro(tec)cz> - 31.5.2001 16:15:15
pokud je to pres BDE zkus zaexperimentovat s BLOB SIZE - v helpu se sice
pise ze to ovlivnuje jen datasety s requestlive=false ale mam opacnou
zkusenost ...
Martin MACKO,
M-PRO s.r.o.
U m�sta Chersonu 1595/1
tel.: +420 (35) 610 79 48,
610 72 31 a� 33
martinm(zv)m-pro(tec)cz
+420 (603) 48 39 40
-----Original Message-----
From: delphi-l-owner(zv)clexpert(tec)cz [mailto:delphi-l-owner(zv)clexpert(tec)cz]On
Behalf Of Vlastimil Zden�k
Sent: Thursday, May 31, 2001 1:07 PM
To: Delphi
Subject: QR a QRImage
Ahoj,
V Quick Report tiskneme sestavu vcetne loga firmy. Pokud toto logo je
natvrdo naloudovano do Image,
tiskne se vzdy.
Pokud tiskneme logo z databaze pres QRDBImage, na obrazovce pri Preview je
logo vzdy, po odeslani na
tiskarnu nekdy ano, nekdy ne.
Zkusili jsme plnit QRImage na BeforePrint Bandu pomoci
QRImage1.Picture.LoadFromFile dopada to
uplne stejne.
Jak donutit QR, aby obsah Image neztracel pri tisku.
Hilfe !!
( jak se norsky rekne pomoc ? )
( mame D5 Prof., QR 3.0.7 Stand., SQL 7.0 )
Vlasta Zdenek
Crypto API
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 31.5.2001 17:16:41
From: "David Kallab" <kallab(zv)seznam(tec)cz>
> nema nekdo zkusenosti s programovani v D3,4,5 spolu s CryptoAPI? Cokoliv mi
> pomuze. Veskere priklady na serverech MS jsou v C.
Ahoj,
neco najdes tady: http://delphi-jedi.org/Jedi:APILIBRARY
Petr Vones, amatersky programator
Adonis a default hodnoty u MS-SQL
[*] Lstiburek Pavel <Lstiburek(zv)ceb(tec)cz> - 31.5.2001 17:21:23
Zdravim,
zkousim pracovat s trial verzi komponent Adonis, celkem vsechno pracuje dle
ocekavani, ale narazil jsem na problem u default hodnot. Pokud je default
hodnota funkci napr. GETDATE(), ohlasi komponenta TADOQuery pri Insert chybu
"Chyba pri vice krokove operaci" a nedotahne z databaze hodnoty default
poli. V DB je ale vsechno v poradku radek je vlozen a default hodnoty jsou
doplneny.
Co delam spatne, je treba nastavit nejakou vlastnost ?
Pavel L.
D5Ent, SQL 7.0, Adonis Component Suite 4.0
Pristup do MainMenu
[*] Kuba <jarda(zv)tresoft(tec)cz> - 31.5.2001 18:29:40
From: "Zden�k Adler" <zdeneka(zv)seznam(tec)cz>
> mel bych tu jednu zacatecnickou: potreboval bych zachytit udalost, kdy
> uzivatel vstoupi do MainMenu (at uz mysi, nebo pomoci zkratkovych klaves)
> ale schazi mi u nej v Events vlastnost OnEnter nebo podobne.... Asi to
bude
Ahoj,
napriklad takhle:
Nemusis to delat tak slozite, kazda polozka menu ma OnClick,
k vyvolani obsluhy dojde i hlavnim radku nab�dky pri rozbaleni prvni urovne
menu,
Zachycuje i pristup pres klavesnici.
Ja takle testuji nastavovani CheckBoxu v menu, v obsluze OnClick hlavniho
meny testuji
visibilitu jednotlivych prvku a podle toho nahazuju vlastnost Checked
polozek menu.
CAU Jarda
---
Odchoz� zpr�va neobsahuje viry.
Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.237 / Virov� b�ze: 115 - datum vyd�n�: 7.3.2001
Delpi5 > Delphi6
[*] Zaplik <zaplik(zv)volny(tec)cz> - 31.5.2001 19:18:36
Pratele:
Urcite jiz nekdo mate Delphi6 a radi se podelite o poznatky. Zajimalo by
mne, zda moje aplikace vytvorena pod D5-profi s pouzitim BDE pujde jednoduse
prelozit i pod D6, nebo ji budu muset prepsat(doufam jen castecne) Jak je to
s dbExpress-em. Zase se bude muset dodavat halda veci jako BDE, nebo veskera
obsluha databazi bude prilinkovana do exe. Pokud ano, o kolik se zvetsi kod?
Co komponenty z D5. Pujdou nainstalovat do D6 nebo ne. Predpokladam, ze asi
ne nebot zde neni VCL ale CLX. Urcite existuje spousta popisu D6, ale mne by
zajimaly realne zkusenosti.
Dik, Zaplik
zaplik(zv)volny(tec)cz
Pouzivani souboru
[*] Petr Reichl <p.reichl(zv)gmc(tec)net> - 31.5.2001 19:49:00
Dobry den,
zajimalo by me jest-li existuje nejaka API funkce, ktera mi rekne, ze dany
soubor je pouzivan. Nechci to zjistovat tak, ze si ho otevru a ve vyjimce
zpracuju chybovy stav, ale potreboval bych to zjistil nejak na urovni
systemu. Nevite o necem?
S pozdravem,
Petr
deklarace a inicializace
[*] Ota Maly <ota.maly(zv)volny(tec)cz> - 31.5.2001 19:53:33
Ahoj,
no, jde to, ale nikoli u lokalnich promennych, takze je to IMHO celkem k
nicemu.
Ota Maly
> to jde v Delphi?
>
> Sroub
>
>
> > A zkousel jste
> >
> > var
> > x : integer = 20;
> >
>
Delpi5 > Delphi6
[*] ing. Jan Fiala <jan.fiala(zv)iol(tec)cz> - 31.5.2001 20:12:13
31.5.2001 Zaplik:
> Pratele:
> Urcite jiz nekdo mate Delphi6 a radi se podelite o poznatky. Zajimalo by
> mne, zda moje aplikace vytvorena pod D5-profi s pouzitim BDE pujde jednoduse
> prelozit i pod D6, nebo ji budu muset prepsat(doufam jen castecne) Jak je to
Pokud budes mit zdroje vsech pouzitych komponent, tak prelozit pujde.
Pokud budou vizualni komponenty regulerne napsane - oddelena
designtime a runtime cast a zvlast registrace. D6 to tusim vyzaduje.
> s dbExpress-em. Zase se bude muset dodavat halda veci jako BDE, nebo veskera
> obsluha databazi bude prilinkovana do exe. Pokud ano, o kolik se zvetsi kod?
dbExpress je nativni pripojeni, nejsou tedy treba zadne dalsi
knihovny. O kolik se zvetsi kod to netusim. Ale, dbExpress je pouze
pro jednosmerne kurzory, takze nelze pouzit pro cashovane update
(editace v gridu, db aware komponenty atd.)
> Co komponenty z D5. Pujdou nainstalovat do D6 nebo ne. Predpokladam, ze asi
> ne nebot zde neni VCL ale CLX. Urcite existuje spousta popisu D6, ale mne by
> zajimaly realne zkusenosti.
D6 obsahuje jak VCL, tak i CLX. Pokud nebudes vyv�jet kod pro Unix,
pouzij VCL, bude to rychlejsi. Co se tyka pouziti komponent, viz vyse.
------
ing. Jan Fiala
mailto:jan.fiala(zv)iol(tec)cz
realne cisla
[*] Delphi <delphi(zv)minv.sk> - 30.5.2011 11:31:50
Ahoj lidicky,
Mam problem, potrebujem dostat cislo z Double do Single....
nema niekto nejaky prikladik? Zatial sa mi to nijako nedari :(
Dik
Werki
Double->Single
[*] Delphi <delphi(zv)minv.sk> - 30.5.2011 12:38:51
Ahoj,
Nevie niekto ako skonvertovat Double to Single?
Werki
(neviem preco predchadzajuci posting pred par hodinami nepresiel....dufam ze
teraz pride 2x :))nastaveni BDE
[*] Delphi <delphi(zv)minv.sk> - 30.5.2011 12:39:35
> From: "Mirek Drej�ek" <drejcek(zv)schkocr(tec)cz>
> > zkousim nastavovat BDE za behu programu. Ale moc se mi nedari. V cem
prosim
> > delam chybu:
>
> Ahoj,
>
> LANGDRIVER je globalni nastaveni BDE, nelze jej pokud vim menit per
session.
>
> Petr Vones, amatersky programator
Skus disconnect-connect
Werki
DIRECTX a scanlines
[*] Delphi <delphi(zv)minv.sk> - 30.5.2011 12:41:34
> Ahojte,
> potreboval bych pomoci s nasledujicim problemem: v celoobrazovkovem rezimu
> (fullscreen) bych potreboval vykreslit bitmapu s prokladanym radkovanim
> (kazdy sudy radek by byl volny). Existuje na to nejaka finta nebo je treba
> otrocky brat bitmapu radek po radku a vykreslovat ji na surface? Diky za
> pripadne nakopnuti
>
> Zdenek
Ahoj Zdenek
Tet se mne to vybavilo :). Co tak mat kazdy druhy riadok transparentny?
Werki
realne cisla 2!
[*] Delphi <delphi(zv)minv.sk> - 31.5.2011 08:17:44
To je pekne, ja viem ze klasicky mozem priradit double do single,
ale pri ohromnych vypoctoch so single mi vzniknu cisla, ktore mozem vlozit
len do double
a pri pokuse vlozit ich do Single mi hodi exception. (vacsinou su to nejake
hausnumera s E na konci)
Potrebujem vysledok v Single. Vcera som myslel ze mi nefunguje newsgrupa,
pretoze to trvalo 3 hodiny pokial
to do nej prislo, tak som priklad zmazal :( Napisem to odznova a poslem,
zatial nikto nevie ako to riesit?
Werki
> From: "Delphi" <delphi(zv)minv.sk>
> > Mam problem, potrebujem dostat cislo z Double do Single....
> > nema niekto nejaky prikladik? Zatial sa mi to nijako nedari :(
>
> Ahoj,
>
> procedure TForm1.Button1Click(Sender: TObject);
> var
> S: Single;
> D: Double;
> begin
> D := 123.456;
> S := D;
> ShowMessageFmt('%g %g', [S, D]);
> end;
>
> Petr Vones, amatersky programator
>
>Mount
[*] Delphi <delphi(zv)minv.sk> - 31.5.2011 08:21:14
> Dobry den
> Nevi nekdo jak Namountovat disk ve windows - Nemyslim sitovej. Myslim
> nejaky soubor dat (v souboru na siti) ktery by se tvaril jako disk.
> Staci mi zdrojak nebo odkaz.
Na NTckax nemas problem, urcis adresar ako Disk, ale v klasickyx windowsox
taku aplikaciu nepoznam,
aj ked podla mna to mohol M$ dokodit ay tam.
Werki
znulovanie premennej
[*] Delphi <delphi(zv)minv.sk> - 1.6.2011 12:49:53
Ahoj, mam taku myslim zaujimavu otazku
Pouziva niekto nejaky krajsi zapis nasledujuceho prikladu?
a:=0;b:=0;c:=0;
??
Paci sa mi napr. Cckovske a=b=c=0;
Werki
DbRichEdit
[*] surfman <surfman(zv)volny(tec)cz> - 2.4.2000 16:57:07 -0700
Ahoj,
potreboval bych poradu s nasledujicim:
Mam DbRichEdit napojeny pres ADO na memopole accessovske tabulky.
Pokud je toto memopole prazdne, dam do nej nejaky defaultni text a
DbRichEdit
zobrazim.
Problem nastava v okamziku, kdy text obsahuje nektere ceske znaky. to se
potom
zmeni font u techto casti textu a nelze jej zadnym zpusobem prepnout (treba
ze bych
cely text vybral a font mu nastavil).
Neresil jste to nekdo?
D5 SP1, W2000 CZ
Diky
Surfman
Real time design
[*] Milan Kotaska <mkotaska(zv)atlas(tec)cz> - 27.6.2000 14:26:57
Prosim o pomoc s nasledujicim problemem.
Na formulari mam umisteno nekolik ovladacich prvku (TButton, TEdit, TLabel).
Pro jejich premistovani a zmenu velikosti pri behu programu pouzivam
komponentu RTDesigner. Ta mi plne vyhovuje, avsak potreboval bych zajistit,
aby nebylo mozne vybrany ovladaci prvek presunout nebo premistit nad jiny,
tj., aby nedoslo k jejich kolizi. Pokud by mel nekdo nejaky napad, budu
velice rad, kdyz mi poradi.
Dekuji.
mkotaska(zv)atlas(tec)cz
Systemove prostredky
[*] Danny <delphiforum(zv)atlas(tec)cz> - 13.3.2001 12:00:36
> > > mam aplikaci, ktera doposud behala uplne normalne. Pridal jsem
> > > dalsi Form a
> > > > najednou klesly systemove a uzivatelske prostredky o 30% na
> 1 - 7% !!!
> > >
>
> zkus odstranit vsechny ostatni formulare, at zjistis, jestli ti
> to dela ten
> novy formular
> nebo kombinace formularu mezi sebou
> potrebny formular vytvaris za behu aplikace, nebo jsou vytvoreny vsechny a
> zobrazujes jen jeden ?
>
> asi jsem moc nepomohl
>
> pavel
Hlavni formular a jeste jeden se vytvari na zacatku automaticky. A pak ja
programove vytvarim formular, ktery je potreba (pouze jeden). Potize dela az
ten posledne pridany, pritom je temer shodny s ostatnimi.
Jediny na co jsem zatim prisel:
Na tom novem formulari mam jakesi 4 mrizky, ktery jsou tvoreny comp. TPanel
(5*8 "bunek"), tedy na formulari mam 160 Panelu. Kdyz jsem je vyhodil, tak
jsem usetril asi 10% sys. prostredku. Zkusil jsem vsechny Panely nahradit
komponentou TStaticText, ale sys. prostredky zase spadly tak kde byly
puvodne.
Podotykam, ze musim dodrzet jisty vzhled z jine aplikace, takze potrebuju
nutne aby ta moje mrizka byla slozena z neceho, co se Panelu podoba. Tim je
asi vyloucene pouziti Gridu ???
Muze to souviset z W98 SE? Na W2k jsem to zatim nezkousel.
Danny
Systemove prostredky
[*] Danny <delphiforum(zv)atlas(tec)cz> - 13.3.2001 12:27:25
> > Na tom novem formulari mam jakesi 4 mrizky, ktery jsou tvoreny comp.
> TPanel
> > (5*8 "bunek"), tedy na formulari mam 160 Panelu. Kdyz jsem je
> vyhodil, tak
> > jsem usetril asi 10% sys. prostredku. Zkusil jsem vsechny
> Panely nahradit
> > komponentou TStaticText, ale sys. prostredky zase spadly tak kde byly
> > puvodne.
>
> TStaticText zerie handly ako divy :-(
>
> > Podotykam, ze musim dodrzet jisty vzhled z jine aplikace, takze
> potrebuju
> > nutne aby ta moje mrizka byla slozena z neceho, co se Panelu podoba. Tim
> je
> > asi vyloucene pouziti Gridu ???
> > Muze to souviset z W98 SE? Na W2k jsem to zatim nezkousel.
>
> Jedine ze by si si to vykresloval sam? Preco to musi byt ako TPanel,
> predpokladam ze Ti ide o ramceky, alebo nie?
>
O ramecky mi jde, to ano. Delam ale jakousi zjednodusenou verzi jine uz
delsi dobu existujici aplikace a jednim z pozadavku je totozny vzhled. A jak
si asi uz domyslis, tak v te puvodni aplikaci jsou pouzity Panely. Nemam na
vybranou. Stejny vzhled je podminkou. StaticText mi prisel celkem stejnej,
ale kdyz rikas, ze moc vhodny neni, tak uz nevim, co pouzit. Mozna bunky
udelat plochou komponenty Tlabel a ohranicit to pouzitim TBevel, co?
Dal potrebuju reagovat na udalost OnClick kazde bunky. Vykreslovat se s tim
nechci.
Diky za pomoc.
Danny
posilani SMS
[*] Danny <delphiforum(zv)atlas(tec)cz> - 13.3.2001 13:03:34
Ahoj lidi,
chtel jsem si napsat program, ktery by mi umoznil vytvaret si skupiny lidi a
tem pak hromadne zasilat SMSky (nejlepe pres brany operatoru).
Pak me ale napadlo, ze se mezi vami urcite najde nekdo, kdo si s tim uz
davno poradil. Jestli ano a dotycny bude ochoten poskytnout vysledek sve
prace, budu mu velmi zavazan.
Mel jsem kdysi nejaky produkt Kubik SMS DreamCom v.2 a tam to bylo dobre
reseny. Bohuzel jsem si to preinstaloval verzi 3 a ta mi nechodi :-(
Diky.
Danny
IniFile - Sections
[*] Ing. Jozef Baranec <joba(zv)digitaldocuments.org> - 1.6.2001 00:26:23
Zdravim
Mam takyto problem: Poterbujem prepisat nazov sekcie v iniFile resp.
prehodit jednu sekciu do druhej.
[FIELD1]
Name=tester
Caption=tester
Primary=0
[FIELD2]
Name=date
Caption=date
Primary=0
aby bol vysledok:
[FIELD1]
Name=date
Caption=date
Primary=0
[FIELD2]
Name=tester
Caption=tester
Primary=0
Mam nejake napady (zapisat hodnoty FIELD1 do mema, prepisat FIELD2 do FIELD1
a z mema zapisat FIELD1), ale zda sa mi to dost neohrabane...
S pozdravom
Ing. Jozef Baranec
Normex spol. s r.o.
www.digitaldocuments.org
joba(zv)digitaldocuments.org
IniFile - Sections
[*] ing. Jan Fiala <jan.fiala(zv)iol(tec)cz> - 1.6.2001 04:58:34
Pokud to chces delat jednorazove, udelej si to rucne. Pokud to mas
treba na vice mistech, natahni si to do stringlistu, tam si to prepis
a uloz na disk. dale uz s tim pracuj jako s IniFile.
------
ing. Jan Fiala
mailto:jan.fiala(zv)iol(tec)cz
1.6.2001 Ing. Jozef Baranec:
> Zdravim
> Mam takyto problem: Poterbujem prepisat nazov sekcie v iniFile resp.
> prehodit jednu sekciu do druhej.
> [FIELD1]
> Name=tester
> Caption=tester
> Primary=0
> [FIELD2]
> Name=date
> Caption=date
> Primary=0
> aby bol vysledok:
> [FIELD1]
> Name=date
> Caption=date
> Primary=0
> [FIELD2]
> Name=tester
> Caption=tester
> Primary=0
Struktura tabulky
[*] ing. Jan Fiala <jan.fiala(zv)iol(tec)cz> - 1.6.2001 05:01:06
K jednotlivym polim muzes pristupovat pomoci indexu. Nemusis pouzivat
FieldByName(), ale take Field[].
V cyklu by nemel byt problem si to zpracovat. Tazde pole je potomek
TField, z jeho vlastnosti zjistis vse potrebne.
------
ing. Jan Fiala
mailto:jan.fiala(zv)iol(tec)cz
31.5.2001 bejcek(zv)centrum(tec)cz:
> Ahoj, mam takovej debilni dotaz, potreboval bych pri selectu z
> query zjistit strukturu tabulky,vim ze kdyz udelam double klick
> na query tak mohu nacist tyto hodnoty primo do query,Jde mi o to
> ze bych chtel zobrazit strukturu tabulky v listboxu ci v necem
> podobnem.Take bych potreboval tahat strukturu libovolneho *.xls
> Jde mi totiz o export a import podle zvolenych sloupecku do/z XLS
> do DB
> Dekuji
IniFile - Sections
[*] Petr Palicka <petr.palicka(zv)atlas(tec)cz> - 1.6.2001 07:16:43
znas TIniFile?
var
SavedIni: TIniFile;
s1, s2: string;
begin
try
s1:=ChangeFileExt(Application.ExeName, '.INI');
SavedIni:=TIniFile.Create(s1);
s1:=SavedIni.ReadString('FIELD1', 'Name', '');
s2:=SavedIni.ReadString('FIELD2', 'Name', '');
SavedIni.WriteString('FIELD2', 'Name', s1);
SavedIni.WriteString('FIELD1', 'Name', s2); finally
s1:=SavedIni.ReadString('FIELD1', 'Caption', '');
s2:=SavedIni.ReadString('FIELD2', 'Caption', '');
SavedIni.WriteString('FIELD2', 'Caption', s1);
SavedIni.WriteString('FIELD1', 'Caption', s2);
finally
SavedIni.Free;
end;
end;
vysledek je presne jaxi prejes, pisu to z ruky, muzpu tam bejt preklepy
;).
dekuji PeC(zv)
CU onTheFutureOfMatrix
MatriX.CyberSpace.Cz
temporarily still off line
/~~~~~~~~~~~~~~~~~~~~~~~~~~~~\
|[smtp:petr.palicka(zv)atlas(tec)cz]|
|[smtp:peca(zv)email(tec)cz] |
\~~~~~~~~~~~~~~~~~~~~~~~~~~~~/Autosize TreeView
[*] Da�a Petr <Petr.Dana(zv)pvt(tec)cz> - 1.6.2001 07:54:54
Zdravim,
potreboval bych, aby se mi TreeView, ktera je na formu a ma alClient,
nejakym zpusobem prispusoboval nejsirsi polozce ve stromu. I pri
rozbalovani. Proste aby tam nebyl horizontalni scroll a aby bylo vsechno
videt. Nevite nekdo, jak na to?
Diky Petr
Nastavenie dlzky impulzu
[*] Milan Tome� <Milan.Tomes(zv)haida(tec)cz> - 1.6.2001 07:55:49
Podivej se na multimedia timers, konkretne funkce TimeSetEvent a timeKillEvent.
Problem s TTimerem je v tom, ze jeho rozliseni je na W9x systemech pouze 55ms a
funguje na principu zasilani zprav aplikaci (WM_TIMER). Zatimco timeSetEvent
pracuje s callback procedurou a rozliseni je opravdu vysoke (ja jsem zkousel i
1ms). Dalsi problem bude v tom, ze to asi nebude umet desetiny.
S pozdravem
Milan Tome#
Vedouc� v�vojov�ho t�mu Windows
Softwarehouse HAiDA s.r.o.
Nov� Bor
tel: 0424/722291, 0424/222284
email: Milan.Tomes(zv)haida(tec)cz
> kto by mi vedel poradit, aky sposobom by som mohol poslat na paralelny port
> impulz o dlzke, ktoru si zadam.IBSQL - SELECT - transakce
[*] David Lebeda <david.lebeda(zv)comarr(tec)cz> - 1.6.2001 08:01:11
> > A vytvorim read transakci tak, ze poklepu na komponentu
> > TIBTransaction, vyberu ReadCommited a k parametrum pripisu na
> > konec slovo read? Nebo je to jinak?
>
> read_committed
> rec_version
> nowait
>
> cili standardni Read Committed. Klicove slovo read (+consistency)
> slouzi k snapshot transakcim ktere jsou zcela izolovane od zbytku
> transakci.
V dokumentaci se pise o isc_tpb_read parametru, ktery zjevne lze
pouzit i s read_commited transakci. Takova transakce nemuze byt
nikdy v konfliktu s jinou transakci (Api Guide, strana 67). Mne jde o
to, jestli kdyz do parametru transakce pripisu slovo read, pochopi
to IBX jako pozadavek na transakci s parametrem isc_tpb_read.
David Lebeda
Struktura tabulky
[*] David Lebeda <david.lebeda(zv)comarr(tec)cz> - 1.6.2001 08:21:24
> podobnem.Take bych potreboval tahat strukturu libovolneho *.xls Jde mi
> totiz o export a import podle zvolenych sloupecku do/z XLS do DB
Pokud opravdu plati slovo _libovolneho_, tak je to z principu
nemozne. V xls prece nemusi byt vubec tabulka, ale temer cokoli.
David Lebeda
Kompilace pod WinNT
[*] daniel.hrna(zv)sme(tec)cz - 1.6.2001 08:25:11
Mam maly problem a nevim jak se to stalo:
Pokud doma na Win98SE, D5Pro zkompiluji projekt - vsude to chodi (pouzivam
PDF, WebBrowser komponenty).
Pokud tento samy projekt zkompiluji na WinNT4, D5Pro (komponenty jsou stejne
nainstalovane), kompilace bez chyby - nejde ten EXE spustit a napise mi to:"Soubor xxxx.exe je propojen na chybejici export SHELL32.DLL: 523"
Nevim co to je a jak to vyresit.
Dik za pomoc.
Dan
OT: problem s PS2 mysou
[*] Jozef Cervenansky <dodosoft(zv)hotmail(tec)com> - 01.6.2001 08:40:43
Ahojte,
sorry za tuto otazku, ale mam taky jeden problem s mysou :
v minulosti som si kupil PS2 mys Genius NetMousePro + redukciu z PS2 na COM
a v pohode mi isla . Vcera som si kupil mys Genius NetScroll+, napojil som
ju na redukciu a nic, system mi vypisal, ze nemoze najst ziadnu PS2 mys!!!
Neviem si to vysvetlit, ako je to mozne ?
Mohol by mi niekto poradit, prosim?
Tu mys som skusal na druhej masine, dal som ju do PS2 konektora a isla (doma
zial nemam PS2 konektor :o) ) Mam staru dosku M726.
Jozo
_________________________________________________________________________
Get Your Private, Free E-mail from MSN Hotmail at http://www.hotmail.com.problem s PS2 mysou
[*] Ji�� Foldyna <jiri.f(zv)avizo(tec)cz> - 1.6.2001 09:01:51
> Ahojte,
>
> sorry za tuto otazku, ale mam taky jeden problem s mysou :
>
> v minulosti som si kupil PS2 mys Genius NetMousePro +
> redukciu z PS2 na COM
> a v pohode mi isla . Vcera som si kupil mys Genius
> NetScroll+, napojil som
> ju na redukciu a nic, system mi vypisal, ze nemoze najst
> ziadnu PS2 mys!!!
> Neviem si to vysvetlit, ako je to mozne ?
> Mohol by mi niekto poradit, prosim?
> Tu mys som skusal na druhej masine, dal som ju do PS2
> konektora a isla (doma
> zial nemam PS2 konektor :o) ) Mam staru dosku M726.
>
> Jozo
Ahoj,
neni mys jako mys. Aby bylo mozne PS/2 mys pripojit na COM port, musi to
umet jeji elektronika. Redukce umoznuje pouze zastrceni do DB9/25 (to je 9
nebo 25-pin CANON), neni tam zadny prevodnik. Nektere mysi umeji jen RS-232,
nektere umeji jen PS/2, nektere umeji oboje. Pokud to neni uvedene v
dokumentaci, je treba to zkusit.
Jestli mas na MOBO PS/2 port, ale chybi ti konektor na case, je mozne
pokusit se pripojit PS/2 konektor umisteny na plechove krytce slotu (takove
to plechove L-ko, co se musi oddelat, kdyz chces do pixly nacpat nejakou
desku). Zapojeni pinu PS/2 konektoru je bezne na netu (hledej treba PS/2
connector wiring), zapojeni vyvodu na MOBO se da zjistit z manualu nebo na
netu u vyrobce.
Ing. Jiri Foldyna
mailto:jiri.f(zv)avizo(tec)cz
Parametr
[*] Krayzel Libor <Libor.Krayzel(zv)czech-tv(tec)cz> - 1.6.2001 09:08:49
> A jak to ten program ma vytusit, ze zrovna ted to chci prevzit ?
> Text prece oznacuji postupne. Tomu programu musis dat pokyn: ted si to
> prevezmi.
Samozrejme, ten program pobezi v tray a impulsem bude stisk dewfinovane
hotkey. Takze oznacim text napr. v mejlu, stisknu nejakou kombinaci klaves a
ten bezici program si ten oznaceny text prevezme a zpracuje.problem s PS2 mysou
[*] Lstiburek Pavel <Lstiburek(zv)ceb(tec)cz> - 1.6.2001 09:43:30
Ahoj,
redukce PS/2 na COM (a ani zadna jina mysi redukce) neprovadi konverzi
protokolu. Je to pouze prizpusobeni dvou konekturu na sebe (aby pasoval
kolik do ty diry).
Konverze protokolu je realizovana vlastni mysi. Ta v okamziku resetu
(samozrejme sveho) testuje, na ktery typ rozhrani je pripojena a prestavi se
interne. Redukci je nutno pouzit pouze k mysi, kter� je PS/2 - COM - USB
kompatibilni. Konvertor protokolu je ponekud drazsi cca 3.000,-.
Toto nejsou asi dobre zpravy, ale takovy je zivot.
Zdravy Pavel L.
> -----P�vodn� zpr�va-----
> Od: Jozef Cervenansky [mailto:dodosoft(zv)hotmail.com]
> Odesl�no: 1. �ervna 2001 8:41
> Komu: delphi-l(zv)clexpert(tec)cz
> P�edm�t: OT: problem s PS2 mysou
>
>
> Ahojte,
>
> sorry za tuto otazku, ale mam taky jeden problem s mysou :
>
> v minulosti som si kupil PS2 mys Genius NetMousePro +
> redukciu z PS2 na COM
> a v pohode mi isla . Vcera som si kupil mys Genius
> NetScroll+, napojil som
> ju na redukciu a nic, system mi vypisal, ze nemoze najst
> ziadnu PS2 mys!!!
> Neviem si to vysvetlit, ako je to mozne ?
> Mohol by mi niekto poradit, prosim?
> Tu mys som skusal na druhej masine, dal som ju do PS2
> konektora a isla (doma
> zial nemam PS2 konektor :o) ) Mam staru dosku M726.
>
> Jozo
>
>
>
>
>
>
>
>
> ______________________________________________________________
> ___________
> Get Your Private, Free E-mail from MSN Hotmail at
http://www.hotmail.com.VAX D-Float - jak na to?
[*] r.holovsky(zv)volny(tec)cz - 1.6.2001 09:53:20
Ahoj delphini,
pisu nejakou aplikaci v Delphi, a potrebuji nacitat binarni soubor,
ktery obsahuje Floating-point hodnoty, ktere jsou zde ulozeny v
VAX D-Float formatu.
Potreboval bych vedet jak tento format prevest na realne cislo.
Jestli mi muze nekdo poradit,
predem dekuji
S pozdravem
Robert
robert.holovsky(zv)gefos(tec)cz
r.holovsky(zv)volny(tec)cz Rozdil predavani interfacu mezi "in-process" a "ou
[*] Alexandr #tefek <alex(zv)scova.vabo(tec)cz> - 1.6.2001 09:53:33
Jak by rekl Microsoft to neni chyba, to je rys.
Jedna se o problem zprostredkovani, ktery u inprocess
neni treba resit (vse se deje v ramci procesu), zatimco
u outofprocess se musi vytvorit prostrednik. Muzete
ovlivnit vytvoreni tohoto prostrednika. Pokud to nechate
default, tak je temer vzdy nutne (az na vyjimky) odvozovat
interface z IDispatch.
K tomu pretypovani.
Ve skutecnosti se vola QueryInterface.
Alexandr STEFEK
> Zdravim vsechny,
> mam nasledujici problem:
>
> Proces A.exe vytvori "out of process" COM object B.exe -
> IB : = CreateComObject(CLASS_B) as IBCom;
> a zavola funkci z B, ktera vytvori jednoduchy objekt C a vrati IUnknown
> IU : = IB.GetLocalCOM;
>
> function IB.GetLocalCOM : IUnknown;
> var locCCom : TCCom;
> begin
> locCCom : = TCCom.Create;
> result : = locCCom;
> locCCom : = nil;
> end;
> Objekt C je potomek InterfacedObject
> ICCom = interface ....
> TCCom = class ( TInterfacedObject, ICCom ) ....
> Pak ve chvili, kdy v ramci A chci pretypovat IUnknown na interface objektu
> C, se vyvola vyjimka " Interface not supported " .
> IC : = IU as ICCom;
>
> Pokud je B ve forme "in process", pak mi vse probehne OK.
>
> Nevite nekdo jestli to vubec jde, pripadne kde delam chybu?
>
> Diky Pavel Pekny
>
>
>OT: Informix + ROM
[*] Martin Bab�k <M.Babik(zv)mus(tec)cz> - 01.6.2001 09:55:49
Zdravim programatory/ky!
Muj problem je sice trosku OT, ale informix potrebuji pro praci s Delphi.
Driv jsem pouzival na upravu databazi (i zivych), Store Procedure a SQL dotazu super software "Realation Object Manager 2.1", ale s novou verzi Informixu (7) mi prestal fungovat. Nevite nekdo jak z toho ven, nebo kde se da sehnat nova verze? Na Inetu jsem neuspesny. :-( Nebo nejaky podobny spolehlivy nastroj?
Diky.
M&B
Lokalizace v Linuxu (was: Nova cena pro Kylix)
[*] Zbysek Hlinka <hlinka(zv)hlinka(tec)cz> - 1.6.2001 10:02:37
On 31 May 2001, at 14:42, Hurricane wrote:
> No, zrejme jsem spatne pochopil, co vlastne lokalizator dela. Ja
> myslel, ze je to od zakladu delane na tahani textu z PE souboru a
> udelat to jinak by znamenalo napsani noveho pogramu. Pokud by to sel
Takto to dela verze 4, proto jsem to napsal uplne cele znovu a
jinak. Nyni je mozne dopsat modul treba na lokalizaci kroniky
klubu pratel destiveho pocasi vedenou v Excelu a vyuzivat sluzeb
slovniku a dalsich modulu, nebo naopak je tu moznost napsat si
jiny a lepsi slovnik pro lokalizaci PE souboru.
> napsat modul, ktery bude tahat texty z includovych souboru nebo z
> definic menu (to uz je vicemene jedno), tak by to bylo vyborne.
Jde to.
> WinCommander nepouzivam, ale mas na mysli neco takoveho?:
>
> [MainRadioForm]
> MainRadioForm.TuneUpBtn.Hint=Ladit v�#e
> MainRadioForm.TuneSmallUpBtn.Hint=Jemn� ladit v�#e
> MainRadioForm.SaveBtn.Hint=Ulo�it frekvenci
> MainRadioForm.TuneSmallDownBtn.Hint=Jemn� ladit nݿe
> MainRadioForm.TuneDownBtn.Hint=Ladit nݿe
> MainRadioForm.CloseBtn.Hint=Vypnout
> MainRadioForm.ScanUpBtn.Hint=Hledat v�#e
> MainRadioForm.UpBtn.Hint=Zv�#it hlasitost
> MainRadioForm.DownBtn.Hint=Snݿit hlasitost
> MainRadioForm.ScanDownBtn.Hint=Hledat nݿe
>
> Pokud by slo lokalizatorem lokalizovat tohle, bylo by to fakt super.
To je naprosta trivialita (proti PE), prvni modul na zpracovani
takoveho formatu zvladnu za nekolik malo dni, dalsi podobne za
den. Pokud tam nebudou nejake neprijemne nepravidelnosti.
Drobny problem muze byt pouze s urcenim zdrojoveho a ciloveho
jazyka (je nutno udelat rucne a nesmi se na to zapomenout), pri
spatnem "zachazeni" muze dojit k problemum.
S pozdravem
Zbysek Hlinka
http://www.hlinka(tec)cz http://www.slhaters(tec)cz
Phones: 02/795 29 56; GSM: 0603 551 282
Krystofova 1016, 149 00 Praha 4
CZ
Primary key
[*] Milos Komurka <komurka(zv)myto(tec)cz> - 1.6.2001 10:06:45
Zdravim,
lze nejak odstranit nebo zmenit primarni klic v IB6 (dialect 1), nemam ho
jako constraint.
Diky za radu
Commanche
Nastavenie dlzky impulzu
[*] Vaclav Sazima <vaclav.sazima(zv)utilia(tec)cz> - 01.6.2001 10:19:11
Ahoj,
na timer klidne zapomen. Kratky a pomerne presny interval se da vyrobit
pres QueryPerformanceCounter, ale je to pro Pentium.
Vaclav Sazima
Jozef Cervenansky wrote:
>
> Ahojte,
>
> kto by mi vedel poradit, aky sposobom by som mohol poslat na paralelny port
> impulz o dlzke, ktoru si zadam.
>
> Priklad : PortSignal(1,2);
>
> Vysle na port LPT1 - bit D0 impulz o dlzke 1,2 ms.
> Mam to robit pomocou Timera ? (Bude to spolahlive?)
> (idem robit programator pre Atmel 89c2051)
>
> Dakujem za kazdu odpoved.
> Jozo
> _________________________________________________________________________
> Get Your Private, Free E-mail from MSN Hotmail at http://www.hotmail.com.Kloik barev je nastaveno ve Windows
[*] Bednar��k Dalibor <dalibor(zv)torola(tec)cz> - 1.6.2001 10:19:32
Ahoj potrebuji zjisti kolik maj Windowsy nastavene barev.
16,256 atd..
Dik
Dalibor
Kompilace pod WinNT
[*] Slavomir Skopalik <skopalik(zv)atlas(tec)cz> - 1.6.2001 10:38:15
Hlasi to pod WinNT, nebo pod Win98SE ?
Jaky mas service pack pod WinNT ?
Jakou verzi Expoloreru mas nainstalovanou ?
Zkus dat posledni servis pack a posledniho explorera.
Slavek
PS: Pocitej s tim, ze u zakazniku se to urcite stane taky.
> Pokud doma na Win98SE, D5Pro zkompiluji projekt - vsude to chodi (pouzivam
> PDF, WebBrowser komponenty).
>
> Pokud tento samy projekt zkompiluji na WinNT4, D5Pro (komponenty jsou stejne
> nainstalovane), kompilace bez chyby - nejde ten EXE spustit a napise mi to:
>
>
> "Soubor xxxx.exe je propojen na chybejici export SHELL32.DLL: 523"
>
> Nevim co to je a jak to vyresit.
> Dik za pomoc.
>
> Dan
Kloik barev je nastaveno ve Windows
[*] Pavel CAB�K <delphikonf(zv)cross(tec)cz> - 1.6.2001 10:39:11
GetDeviceCaps(xxx.Canvas.Handle, BitsPixel)
vrati barevnou hloubku (pocet bitu na barvu)
Pavel CAB#K
cabak(zv)cross(tec)cz
> Ahoj potrebuji zjisti kolik maj Windowsy nastavene barev.
> 16,256 atd..
>
> Dik
>
> Dalibor
>
>Parametr
[*] ing. Jan Fiala <jan.fiala(zv)iol(tec)cz> - 1.6.2001 10:44:51
Kdybys tohle napsal hned do puvodni otazky, mohlo byt vse veselejsi.
Budes muset vyresit problem s nalezenim handlu ovladaciho prvku
aktualni aplikace.
Podle me by bylo mnohem jednodussi mit v tray programek, ktery si
hlida schranku a jakmile neco zkopiruji do schranky, zareaguje.
------
ing. Jan Fiala
mailto:jan.fiala(zv)iol(tec)cz
1.6.2001 Krayzel Libor:
> Samozrejme, ten program pobezi v tray a impulsem bude stisk dewfinovane
> hotkey. Takze oznacim text napr. v mejlu, stisknu nejakou kombinaci klaves a
> ten bezici program si ten oznaceny text prevezme a zpracuje.IBSQL - SELECT - transakce
[*] Pavel Cisar <pcb(zv)atlas(tec)cz> - 1.6.2001 12:11:32
Haj hou!
On 1 Jun 2001,, David Lebeda wrote:
> V dokumentaci se pise o isc_tpb_read parametru, ktery zjevne lze
> pouzit i s read_commited transakci. Takova transakce nemuze byt
> nikdy v konfliktu s jinou transakci (Api Guide, strana 67). Mne jde o
> to, jestli kdyz do parametru transakce pripisu slovo read, pochopi
> to IBX jako pozadavek na transakci s parametrem isc_tpb_read.
Naposledy kdyz jsem koukal do zdroju IBX, byly tyto parametry
totozne s isc_tpb_* parametry. IBX pouze umoznuje zkraceny
zapis nazvu parametru bez "isc_tpb_".
Hodne zdaru
Pavel Cisar <pcisar(zv)borland(tec)cz>
Borland s.r.o.Kompilace pod WinNT
[*] brant(zv)dcomm(tec)cz - 1.6.2001 12:16:01
Patrne pouzivas (ty anebo nektera z komponent) nejakou funkci z SHELL32.DLL,
ktera je ve W98, ale v NT neni podporovana.
RNDr. Petr Brant [brant(zv)dcomm(tec)cz]
ICQ #68652380
D&COMM s.r.o.
Korunova�n� 6
170 00 Praha 7
Tel. 0724/007234
Pokud doma na Win98SE, D5Pro zkompiluji projekt - vsude to chodi (pouzivam
PDF, WebBrowser komponenty).
Pokud tento samy projekt zkompiluji na WinNT4, D5Pro (komponenty jsou stejne
nainstalovane), kompilace bez chyby - nejde ten EXE spustit a napise mi to:
"Soubor xxxx.exe je propojen na chybejici export SHELL32.DLL: 523"TQRGroup v QuickReport 2.0g na kazde strane sestav
[*] Skokosek <skokosek(zv)seznam(tec)cz> - 1.6.2001 12:23:30
Ahoj ,
nevite nekdo, jak docilit toho, aby se mi v QR ( v D3) tiskl
TQRGroup na kazde strane sestavy (neco jako Column header) ?
Diky Lada
Novinky v D6 was: Navrh tykajici se konference
[*] Pavel Cisar <pcb(zv)atlas(tec)cz> - 1.6.2001 12:23:55
Haj hou!
On 1 Jun 2001,, Dalibor Toman wrote:
> kez by to mu tak bylo. Spis mam pocit, ze je tomu naopak. Delphi se postupne
> zameruji vice a vice na polohotova reseni pro databazisty a vyvojare
> webovych aplikaci. D6 jsou toho podle informacnich letaku prikladem. Take
> jste dostali letacek "10 duvodu proc koupit D6" ? Po precteni
> http://www.borland.com/delphi/del6/featurematrix/featurematrix.pdf jsem z
> tech 10 bodu vetsinu vyskrtal (D6 Professional je neobsahuje), takze mi
> zbyly jen 4 (slovy 4) body (4,5,6,9) z nich z nejzajimavejsi je zminka o CLX
> a Kylixu, ostatni mi jsou k nicemu). Ani v tom letaku ani v podrobnejsim
> PDFku neni nic co by me vyrazne zaujalo - zadne zminky o novinkach v IDE
> (class insight me nesanuje), kompilatoru, Object Pascalu. Ze by se zde nic
> nezlepsilo? Pak je to ale smutne.
10 duvodu a ostatni marketingove materialy se vzdy zameruji na
"velke" novinky a/nebo lakadla. Samozrejme, ze existuje "365
dalsich drobnych duvodu proc koupit D6". Vylepseni v IDE, v
kompilatoru a predevsim ve VCL. Spousta novych komponent, trid,
funkci, vlastnosti atd. Prijdte se podivat na Delphi 6 Xtreme Tour
ktere bude na sesti mistech v CR a na dvou v SK.
Blize viz.
http://www.borland(tec)cz/a_udalosti_seminare.html
> Rozhodne nepropadnu vabeni Borlandu a neobjednam D6 dokud si nevyzkousim
> nejakou tu Trial verzi. Mam obavu, ze jedine co mi D6 prinese bude zase
> delsi kod aplikaci. Mozna, ze D6 jsou jen dalsi verzi, kterou se vyplati
> nekoupit a pockat na D7 (podobne to bylo s moc nepovedenou D4). Tenkrat ale
> mel Borland ponekud kratsi obdobi mezi verzemi...
D6 *rozhodne* neni D4, a to nepisu proto ze ted kopu za Borland.
Pokud chcete byt opatrny, nic proti tomu, ale komentare tohoto
typu nejsou prilis fer.
Hodne zdaru
Pavel Cisar <pcisar(zv)borland(tec)cz>
Borland s.r.o.dbgo a delphi 6
[*] Bohdan Voska <bohdan(zv)softok(tec)cz> - 1.6.2001 12:35:57
> dbGo je novy nazev pro ADOExpress, navic by melo byt soucasti i
Professional
> baleni, viz D6 Chat
(http://groups.google.com/groups?ic=1&th=a9bf1641283fb2a7)
Ahoj,
podle http://www.borland(tec)cz/pr_delphi_box.html by dbGo nemelo byt soucasti
Profesional baleni.
Bohdan Voska
bohdan(zv)softok(tec)cz
IB: secondary files, vice souboru databaze, defini
[*] Pavel Cisar <pcb(zv)atlas(tec)cz> - 1.6.2001 12:53:32
Haj hou!
On 31 May 2001,, Michal Tiller wrote:
> Mam databazi na IB6. Kdyz soubor databaze prerostl 4GB db se zhroutila.
To se dalo cekat :)
> Kdyz db zacala pouzivat dalsi stranky zacaly velke problemy. Log je
> plny zaznamu o duplicite stranek. Ten log ma po tydnu 1.5GB :)
Spravny postup v teto situaci je nasledovny:
1) Vzit posledni zalohu (<4GB) nebo se pokusit zazalohovat trosky
databaze.
2) Obnovit ze zalohy do vice souboru. Jak IBConsole tak GBAK
toto umoznuje.
Nejlepsi je samozrejme prevence. KAZDA DATABAZE by mela byt
vytvarena nasledovne:
CREATE DATABASE <name> <parametry jako CHARSET atd.>
PAGESIZE <size>
LENGTH <(limit OS - 10 MB) / pagesize>
FILE <name2> ;
Jakmile zacnou data pretekat do druheho souboru, pridat treti
soubor:
ALTER DATABASE
ADD FILE <name3>
STARTING AT <((limit OS - par MB) / pagesize) *
pocet_predchozich_souboru> ;
A tak stale dokola, tak jak data bobtnaji.
Hodne zdaru
Pavel Cisar <pcisar(zv)borland(tec)cz>
Borland s.r.o.Novinky v D6 was: Navrh tykajici se konference
[*] Slavomir Skopalik <skopalik(zv)atlas(tec)cz> - 1.6.2001 13:15:25
Mne by spise zajimalo, jak to bude s ochranou CD a jestli opravdu
bude nutne neustale vkladat pri stratu Delphi CD.
Napriklad pokud kolega pracujici na stejnem projektu
mneni datamodul, tak nejrychlejsi je provest restart delphi
(delphi jej nedokaze nacist, protoze tam jsou nejake zavislosti).
To jako budu jako porad prohazovat CD ?
Dale, programuji velmi casto ve vyrobnich halach,
tam maji CD zivotnost par mesicu, jak bude resena moznost
zalozni kopie ?
Tyto informace pochazeji z clanku z chipu, pokud se nazakladaji na pravde,
berte to jako bezpredmetne.
Slavek
> 10 duvodu a ostatni marketingove materialy se vzdy zameruji na
> "velke" novinky a/nebo lakadla. Samozrejme, ze existuje "365
> dalsich drobnych duvodu proc koupit D6". Vylepseni v IDE, v
> kompilatoru a predevsim ve VCL. Spousta novych komponent, trid,
> funkci, vlastnosti atd. Prijdte se podivat na Delphi 6 Xtreme Tour
> ktere bude na sesti mistech v CR a na dvou v SK.Pristup do MainMenu
[*] Jaroslav Nadhera <nadhera(zv)csh(tec)cz> - 1.6.2001 13:18:28
> mel bych tu jednu zacatecnickou: potreboval bych zachytit udalost, kdy
> uzivatel vstoupi do MainMenu (at uz mysi, nebo pomoci zkratkovych klaves)
> ale schazi mi u nej v Events vlastnost OnEnter nebo podobne.... Asi to
bude
> hloupost, ale poradi mi nekdo? Dekuji
Nestacilo by On Activate?
J. N�dhera
CSH spol. s r.o.
Velflikova 10, 160 00 Praha 6
tel: 02/2431 2344-5, fax: 02/652 28 92
Nedbalova 14, 701 00 Ostrava
tel: 069/663 56 87
e-mail: nadhera(zv)csh(tec)cz WWW: http://www.csh(tec)cz
FindFirstChangeNotification a novell
[*] EFG developer <developer(zv)efg(tec)cz> - 1.6.2001 13:54:46
DDVV, muze mi nekdo vysvetlit, proc nasledujici funkce nefunguje na novellu?
FNotifyHandle := FindFirstChangeNotification(PChar('u:\'),
Bool(0), FILE_NOTIFY_CHANGE_LAST_WRITE);
V pripade, ze disk u:\ je novell, je FNotifyHandle vzdy = -1 .... proc ?
dekuji
---
Ing. Petr �ikola
EFG CZ spol. s r.o.
sikola(zv)efg(tec)cz
www.efg(tec)cz
www.aktion(tec)cz
Nastavenie dlzky impulzu
[*] Ing. Stefunko Julius <Stefunko(zv)vuje.sk> - 1.6.2001 07:30:01 met-1mest
Neviem ci je take nieco mozne vo Win a Delphi, ale ja som za davnych cias
pod TP 6.0 siahal priamo na registre casovaca a odpocital som si periodu s
presnostou na desiatky mikrosekund. Samozrejme pocas impulzov bolo treba
zakazat prerusenie. Kedze bolo pocitac v danom case len pre impulzy tak to
nevadilo.
>
> kto by mi vedel poradit, aky sposobom by som mohol poslat na paralelny port
> impulz o dlzke, ktoru si zadam.
>
> Priklad : PortSignal(1,2);
>
> Vysle na port LPT1 - bit D0 impulz o dlzke 1,2 ms.
> Mam to robit pomocou Timera ? (Bude to spolahlive?)
> (idem robit programator pre Atmel 89c2051)
>
> Dakujem za kazdu odpoved.
> Jozo
> _________________________________________________________________________
> Get Your Private, Free E-mail from MSN Hotmail at http://www.hotmail.com.
>
>
Ing. Julius Stefunko
spravca siete
skoliace stredisko
VUJE Trnava a.s.Uvaznuti v tempdb u MS SQL 7.0
[*] Tomas Bradle <t.bradle(zv)pvtnet(tec)cz> - 1.6.2001 14:39:30
Zdravim vsechny,
Stala se mi takova vec: mam dve aplikace pouzivajici stejnou databazi a
ulozene procedury na MS SQL 7.0. Ty ulozene procedury pouzivaji docasne
tabulky typu #tabulka - cili lokalni pro kazdy connection. Obcas dochazi k
uvaznuti prave pres tyto docasne tabulky, cca 20 radku v Current
Activity/Locks. Je mozne, ze by zamky na ruzne tabulky v tempdb navzajem
zpusbily uvaznuti ?
diky predem
Tomas Bradle
t.bradle(zv)pvtnet(tec)cz
(Delphi 5 SP1, ADOExpress)
znulovanie premennej
[*] Tomas Vladik <tom.vladik(zv)swadvice(tec)cz> - 1.6.2001 14:54:47
> Pouziva niekto nejaky krajsi zapis nasledujuceho prikladu?
> a:=0;b:=0;c:=0;
Pokud programuje v Pascalu, tak asi ne :)
(Musis se s tim naucit zit)
T.OT: Prevod z VC++ do Delphi4
[*] Ing. Vladim�r R��i�ka���#��rF#v("#�� - 1.6.2001 14:59:11
Ahojte fsici,
existuje nejaky soft, ktery dela to co je v %subj ?
Potrebuju prekopat jednu aplikaci - pracuje i s DLL-kama. Nejsem dobry v
C++.
Diky
Ing. Vladimir Ruzicka
Digitus s.r.o. Prerov
FindFirstChangeNotification a novell
[*] Dalibor Toman <dtoman(zv)fortech(tec)cz> - 1.6.2001 15:03:21
> DDVV, muze mi nekdo vysvetlit, proc nasledujici funkce nefunguje na
novellu?
>
> FNotifyHandle := FindFirstChangeNotification(PChar('u:\'),
> Bool(0), FILE_NOTIFY_CHANGE_LAST_WRITE);
>
> V pripade, ze disk u:\ je novell, je FNotifyHandle vzdy = -1 .... proc ?
>
Tezko ocekavat, ze Novell server bude tuto funkci podporovat. Pokud ji neumi
je jedine dobre, ze Windows nepovoli sledovani novellskych disku sledovat.
Zdravi
D. Toman
znulovanie premennej
[*] Dalibor Toman <dtoman(zv)fortech(tec)cz> - 1.6.2001 15:06:21
> Ahoj, mam taku myslim zaujimavu otazku
>
> Pouziva niekto nejaky krajsi zapis nasledujuceho prikladu?
>
> a:=0;b:=0;c:=0;
>
> ??
v pripade, ze a,b,c nejsou lokalni promenne a jsou deklarovany za sebou
muses pouzit :
FillChar(A,0,SizeOf(A)+SizeOf(B)+SizeOf(C)) pripadne jine cunarny
ale nemyslim, ze je to hezci [:-)
>
> Paci sa mi napr. Cckovske a=b=c=0;
Uz se tady o tom diskutovalo. Taky by se mi to libilo.
D> Toman
Kompilace pod WinNT
[*] Dalibor Toman <dtoman(zv)fortech(tec)cz> - 1.6.2001 15:18:34
>Patrne pouzivas (ty anebo nektera z komponent) nejakou funkci z
SHELL32.DLL,
>ktera je ve W98, ale v NT neni podporovana.
SHELL32.DLL je podle mne ve vsech 32bitovych verzich Windows (9x, WinME,
WinNT4, Win2000,...) krome Win NT 3.5x
>"Soubor xxxx.exe je propojen na chybejici export SHELL32.DLL: 523"
spise bude problem s verzi te knihovny. Nektere relativne bezne pouzivane
funkce jsou az v novejsich verzich SHELL32.DLL. Cili jak uz nekdo psal -
nainstalovat posledni service pack (SP6a ??).
D. Toman
Novinky v D6
[*] Pavel Cisar <pcb(zv)atlas(tec)cz> - 1.6.2001 16:03:37
Haj hou!
On 1 Jun 2001,, Slavomir Skopalik wrote:
> Mne by spise zajimalo, jak to bude s ochranou CD a jestli opravdu
> bude nutne neustale vkladat pri stratu Delphi CD.
Ne, Borland nakonec od zameru pouzit ochranu CD ustoupil.
Hodne zdaru
Pavel Cisar <pcisar(zv)borland(tec)cz>
Borland s.r.o.Novinky v D6 was: Navrh tykajici se konference
[*] Dalibor Toman <dtoman(zv)fortech(tec)cz> - 1.6.2001 16:09:43
> 10 duvodu a ostatni marketingove materialy se vzdy zameruji na
> "velke" novinky a/nebo lakadla.
spis to vypada, ze se zameruji na "velke" penize
>Samozrejme, ze existuje "365
> dalsich drobnych duvodu proc koupit D6".
sem s nima - kde je najdu?
>Vylepseni v IDE, v
> kompilatoru a predevsim ve VCL. Spousta novych komponent, trid,
> funkci, vlastnosti atd. Prijdte se podivat na Delphi 6 Xtreme Tour
> ktere bude na sesti mistech v CR a na dvou v SK.
>
radsi si pockam na tu trial verzi (bude-li ??)...
> > Rozhodne nepropadnu vabeni Borlandu a neobjednam D6 dokud si nevyzkousim
> > nejakou tu Trial verzi. Mam obavu, ze jedine co mi D6 prinese bude zase
> > delsi kod aplikaci. Mozna, ze D6 jsou jen dalsi verzi, kterou se vyplati
> > nekoupit a pockat na D7 (podobne to bylo s moc nepovedenou D4). Tenkrat
ale
> > mel Borland ponekud kratsi obdobi mezi verzemi...
>
> D6 *rozhodne* neni D4, a to nepisu proto ze ted kopu za Borland.
> Pokud chcete byt opatrny, nic proti tomu, ale komentare tohoto
> typu nejsou prilis fer.
zridte u Borlandu zed narku a ja tam budu chodit brecet. Pak treba nebudu
mit potrebu ventilovat sve pocity jinde :-)
D. Toman
dbgo a delphi 6
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 1.6.2001 17:29:51
From: "Bohdan Voska" <bohdan(zv)softok(tec)cz>
> podle http://www.borland(tec)cz/pr_delphi_box.html by dbGo nemelo byt soucasti
> Profesional baleni.
Ahoj,
patrne je tam chyba protoze na puvodni strance to tak je:
http://www.borland.com/delphi/del6/featurematrix/database.html
Petr Vones, amatersky programator
systemove adresare
[*] Hurricane <hurricane(zv)quick(tec)cz> - 1.6.2001 17:47:20
Zdravim
Muzete me nekdo nakopnout jake jsou funkce na ziskani systemovach adresaru?
(C:\windows,...) Kdysi jsem radil,. ze je to v registru, ale za to jste me
roznesli na kopytech, tak bych rad vedel, jake to jsou funkce. Uplne idealni
by bylo, kdybych mohl zjistit cestu k EXEacum office (c:\nekde\winword.exe).
Diky.
Hurricane
pruhledny TEdit
[*] Hurricane <hurricane(zv)quick(tec)cz> - 1.6.2001 17:54:16
Zdravim
Mam na formu TDock97 (komplet ToolBar97) s bitmapou na pozadi. Na Docku mam
Toolbar97 a v nem TEdit. Potreboval bych, aby ten Edit byl pruhledny pro
bitmapu. Edit97 pouzit nechci, protoze nema border. Nemate nekdo takovou
komponentu?
Diky.
Hurricane
znulovanie premennej
[*] ing. Jan Fiala <jan.fiala(zv)iol(tec)cz> - 1.6.2001 21:11:21
Ano :-)
a:=0;
b:=0;
c:=0;
Takovy ty zvyky, jaky jsou ve VB psat nekolik prikazu na jeden
radek na citelnosti kodu moc nepridaji. Vsak od toho MS v .NET taky
ustoupil. A ze by citelnost pri a=b=c=0; byla nejak lepsi...
------
ing. Jan Fiala
mailto:jan.fiala(zv)iol(tec)cz
1.6.2011 Delphi:
> Pouziva niekto nejaky krajsi zapis nasledujuceho prikladu?
> a:=0;b:=0;c:=0;
> Paci sa mi napr. Cckovske a=b=c=0;Nastavenie dlzky impulzu
[*] Jarek Kr�ek <fdp(zv)atlas(tec)cz> - 1.6.2001 22:43:27
Zkuste vyuzit funkci Now, kter� by mela byt presnejsi nez Timer.
Jarek Krcek
jarek_krcek(zv)yahoo.co.uk
ICQ: 72650360
----- Original Message -----
From: "Jozef Cervenansky" <dodosoft(zv)hotmail.com>
To: <delphi-l(zv)clexpert(tec)cz>
Sent: Thursday, May 31, 2001 8:56 AM
Subject: Nastavenie dlzky impulzu
> Ahojte,
>
> kto by mi vedel poradit, aky sposobom by som mohol poslat na paralelny
port
> impulz o dlzke, ktoru si zadam.
>
> Priklad : PortSignal(1,2);
>
> Vysle na port LPT1 - bit D0 impulz o dlzke 1,2 ms.
> Mam to robit pomocou Timera ? (Bude to spolahlive?)
> (idem robit programator pre Atmel 89c2051)
>
> Dakujem za kazdu odpoved.
> Jozo
OT: Re: Novinky v D6 was: Navrh tykajici se konfer
[*] Erik Salaj <winsoft(zv)stonline.sk> - 1.6.2001 22:54:00
> 10 duvodu a ostatni marketingove materialy se vzdy zameruji na
> "velke" novinky a/nebo lakadla. Samozrejme, ze existuje "365
Jednou z najvecsich "lakadiel" je nova cenova politika.
Erik
pozice kursoru mysi
[*] Johnboy <bachor(zv)iol(tec)cz> - 2.6.2001 00:18:03
Zdravim
mam takovej dotaz
mam form a kdyz po nem jezdim mysi, tak to si pres GetCursorPos zjistim pozici kurzoru
ale ja bych potreboval aby se mi na to formu zobrazovala pozice kurzoru i kdyz s nim jezdim mimo formular
de to nejak udelat?
a jestli jo.. tak bych jeste potreboval jestli by slo zjistit na jakou barvu odkazuje? aby mi to vratilo nakou hodnotu TColor
predem dik moc
s pozdravem Johnboy
--------------------------------------------------------------------------------
[ http://john.boy(tec)cz ]=[ john(zv)boy(tec)cz ]=[ icq uin: 31198330 ]
-------------------------------------------------------------------------------- problem s PS2 mysou
[*] Hurricane <hurricane(zv)quick(tec)cz> - 2.6.2001 00:39:36
Zdravim
Zrejme ta nova mys neni obojetna. COM a PS2 jsou absolutne nekompatibilni.
Zadna redukce to nevyresi. Jen velmi male procento mysi je obojetnych a ty
se dokazi sami prepnout mezi COM a PS2 modem. Pokud to ta nova PS2 neumi a
pripojil si ji na COM, dost mozna jsi ji uz odpalil. Na PS2 je 0/5V, ale na
COMu-12/+12V.
Hurricane
----- Original Message -----
> v minulosti som si kupil PS2 mys Genius NetMousePro + redukciu z PS2 na
COM
> a v pohode mi isla . Vcera som si kupil mys Genius NetScroll+, napojil som
> ju na redukciu a nic, system mi vypisal, ze nemoze najst ziadnu PS2 mys!!!
> Neviem si to vysvetlit, ako je to mozne ?
> Mohol by mi niekto poradit, prosim?
> Tu mys som skusal na druhej masine, dal som ju do PS2 konektora a isla
(doma
> zial nemam PS2 konektor :o) ) Mam staru dosku M726.systemove adresare
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 2.6.2001 01:27:32
From: "Hurricane" <hurricane(zv)quick(tec)cz>
> Muzete me nekdo nakopnout jake jsou funkce na ziskani systemovach adresaru?
Ahoj,
muzes pouzit funkce GetWindowsFolder a dalsi v unitu JclSysInfo z JCL
(http://delphi-jedi.org/Jedi:JCLDOWNLOADS)
> roznesli na kopytech, tak bych rad vedel, jake to jsou funkce. Uplne idealni
> by bylo, kdybych mohl zjistit cestu k EXEacum office (c:\nekde\winword.exe).
Office uz neni prilis 'systemovy', tam bude potreba asi hledat dle nejake
polozky v registru vytvorene pri jeho instalaci.
Petr Vones, amatersky programator
Delphi IDE and packages - Internal error U704, Bad
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 2.6.2001 01:48:51
From: "likeapear" <likeapear(zv)centrum(tec)cz>
> Search Path zkontroluju, BuildControl je nastaveno na "Rebuild as needed".
> Jeste jsem zapomnel dodat, ze vsechny projekty (hlavni aplikaci, dlls i bpl
> mam v grupe).
Ahoj,
zkus BPL vyradit z te grupy.
Petr Vones, amatersky programator
Skryti v seznamu uloh
[*] DarkLogic <engine(zv)ropacek(tec)cz> - 2.6.2001 02:05:02
Dobry den!
Po zmacknuti CTRL+ALT+DELETE se ve Windows 9x zobrazi seznam aktualne
spustenych programu. Nevi nekdo, jak v tomhle seznamu skryt muj program, aby
ho nikdo nemohl timto zpusobem ukoncit?
dekuji
Vasek Navrat
Edit IP Address
[*] Pavol Stolc <pstolc(zv)sc.sknet.sk> - 2.6.2001 02:15:11
Ahoj,
vytvoril som komponentu (Delphi wrapper) na zadavanie IP adresy IPEdit
(zdrojaky pozri dalej). Takto definovanu komponentu potom vytvorim v
programe. Komponenta IPEdit sa korektne zobrazi na formulari, ale iba vtedy
ak predtym otvorim dialog "Siet" ("Network" na US verzii Windows) - zrejme
tento dialog registruje triedu IPADDRESS v systeme a preto ju mozem
vytvorit.
Moja otazka: ako mozem dosiahnut aby sa ovladaci prvok triedy IPADDRESS
vytvoril aj bez predchadzajuceho otvorenia dialogu Siet? Chcem mat na
formulari komponentu s rovnakym vzhladom a ovladanim, ako je komponenta z
Windows => uzivatel sa nemusi nic nove ucit a ja nemusim programovat uz raz
naprogramovane.
{-------------------------------------------}
unit IPEdit;
interface
uses
Classes, Controls;
type
TIPEdit = class(TWinControl)
protected
procedure CreateParams(var Params: TCreateParams); override;
public
constructor Create(AOwner: TComponent); override;
end;
implementation
constructor TIPEdit.Create(AOwner: TComponent);
begin
inherited Create(AOwner);
Parent := TWinControl(AOwner);
Width := 135;
Height := 21;
TabStop := True;
end;
procedure TIPEdit.CreateParams(var Params: TCreateParams);
begin
inherited CreateParams(Params);
CreateSubClass(Params, 'IPADDRESS');
end;
end.
Uryvok z aplikacie: vytvorenie komponenty
...
with TIPEdit.Create(Self) do begin
Left := 20;
Top := 20;
end;
...
Zdravim, Pavol Stolc
pstolc(zv)sc.sknet.sk
OT: Re: Novinky v D6 was: Navrh tykajici se konfer
[*] ing. Jan Fiala <jan.fiala(zv)iol(tec)cz> - 2.6.2001 14:40:18
Tou myslis upgrade D5 Ent na D6 Ent za 90 000,- ?
Zase az tolik novinek tam neni :-(
------
ing. Jan Fiala
mailto:jan.fiala(zv)iol(tec)cz
1.6.2001 Erik Salaj:
>> 10 duvodu a ostatni marketingove materialy se vzdy zameruji na
>> "velke" novinky a/nebo lakadla. Samozrejme, ze existuje "365
> Jednou z najvecsich "lakadiel" je nova cenova politika.
> Erik
systemove adresare
[*] ing. Jan Fiala <jan.fiala(zv)iol(tec)cz> - 2.6.2001 14:51:56
Pro verzi Office2000 je to v registru:
HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Office\9.0\Word\InstallRoot
Path=cesta_k_exaci
Ale drivejsi verze to budou mit jinak. Misto 9.0 tam bude asi jine
cislo :-(
Dalsi moznosti je zjistit v HKEY_CLASSES_ROOT\.DOC zjistit typ
dokumenty (opet pro Office2000 je to Word.Document.8)
Pak Zjistit v klici
HKEY_CLASSES_ROOT\Word.Document.8\shell\Open\command
vychozi hodnota je cesta vcetne jmena programu (WinWord.EXE)
------
ing. Jan Fiala
mailto:jan.fiala(zv)iol(tec)cz
1.6.2001 Hurricane:
> Zdravim
> Muzete me nekdo nakopnout jake jsou funkce na ziskani systemovach adresaru?
> (C:\windows,...) Kdysi jsem radil,. ze je to v registru, ale za to jste me
> roznesli na kopytech, tak bych rad vedel, jake to jsou funkce. Uplne idealni
> by bylo, kdybych mohl zjistit cestu k EXEacum office (c:\nekde\winword.exe).jak na GETPIXEL
[*] Johnboy <bachor(zv)iol(tec)cz> - 2.6.2001 17:15:09
Zdrawim
poradte mi please co mam napsat jako prvni paramtr
a funkce getpixel (neco,x,y) aby mi to bralo pixely z cely orbazovky
predem diky
s pozdravem Johnboy
--------------------------------------------------------------------------------
[ http://john.boy(tec)cz ]=[ john(zv)boy(tec)cz ]=[ icq uin: 31198330 ]
-------------------------------------------------------------------------------- Prevod z VC++ do Delphi4
[*] Milan Blazek <mbsint(zv)telecom(tec)cz> - 2.6.2001 17:20:22
Tez zdravim vsechny
a pripojuji se k pozadavku nize uvedenemu, zda je mozne nejak prevest kod v
C++
do Delphi, aniz se stanu odbornikem na C++.
Diky
M.Blazek
----- Original Message -----
From: "Ing. Vladim�r R��i�ka" <ruzicka(zv)digitus(tec)cz>
To: "Delphi konference" <delphi-l(zv)clexpert(tec)cz>
Sent: Friday, June 01, 2001 2:59 PM
Subject: OT: Prevod z VC++ do Delphi4
> Ahojte fsici,
>
> existuje nejaky soft, ktery dela to co je v %subj ?
> Potrebuju prekopat jednu aplikaci - pracuje i s DLL-kama. Nejsem dobry v
> C++.
>
> Diky
>
> Ing. Vladimir Ruzicka
> Digitus s.r.o. Prerov
>
>Wrap u DBRadioGroup
[*] sorbo <sorbo(zv)centrum(tec)cz> - 2.6.2001 16:49:31
nevite jak realizovat zalamovani dlouheho textu
jednotlivych Items u DBRadioGroup?
Diky
Ondra Sorb
Skryti v seznamu uloh
[*] Dalibor Toman <dtoman(zv)fortech(tec)cz> - 2.6.2001 20:12:29
----- Original Message -----
From: "DarkLogic" <engine(zv)ropacek(tec)cz>
To: "Delphi konference" <delphi-l(zv)clexpert(tec)cz>
Sent: Saturday, June 02, 2001 2:05 AM
Subject: Skryti v seznamu uloh
> Dobry den!
>
> Po zmacknuti CTRL+ALT+DELETE se ve Windows 9x zobrazi seznam aktualne
> spustenych programu. Nevi nekdo, jak v tomhle seznamu skryt muj program, aby
> ho nikdo nemohl timto zpusobem ukoncit?
Programy ktere volaji funkci RegisterServiceProcess nejsou na Win9X/Me videt v seznamu uloh a navic nejsou ukonceny po odhlaseni uzivatele.
D> Toman
Prevod z VC++ do Delphi4
[*] Dalibor Toman <dtoman(zv)fortech(tec)cz> - 2.6.2001 20:35:07
> Tez zdravim vsechny
>
> a pripojuji se k pozadavku nize uvedenemu, zda je mozne nejak prevest kod v
> C++
> do Delphi, aniz se stanu odbornikem na C++.
>
Tusim, ze existuji nejake utlity, ktere to lepe ci hure svedou. Ale mam pocit, ze je mozne uspesne prevest pouze hlavickou soubory (deklarace exportovanych funkci DLLka napriklad).
Jinak vetsinu kodu z CCka lze do Pascalu prevest s minimem znalosti CCka - ja sam jsem toho dukazem. Pokud si clovek alespon trochu zvykne na zakladni veci nemel by s tim prevodem byt problem (pokud kod neni prilis obsahly nebo priliz prasacky zapsany). Rozhodne bych daval vetsi sance "zivemu" konvertoru nez automatu. Nektere CCkovske konstrukce nelze totiz otrocky prepsat do Pascalu a je podle mne vetsi sance odladit Pascalsky preklad pokud jej vyrobim z Ccka sam nez honit nejaky problem v prekladu porizenem strojem.
V nekterych pripadech je mozne CCkovsky kod prelozit do OBJ a tyto prilinkovat primo k Pascalskemu kodu - pak neni potreba (krome hlavicek volanych funkci) nic prekladat.
D. Toman
ulozeni textu do schranky
[*] Johnboy <bachor(zv)iol(tec)cz> - 2.6.2001 22:47:49
Zdrawim
chci se zeptat jak se da pomoci delphi udelat
kdyz stisknu nejakou klavesu tak se mi treba text v editu ulozi do schranky
a pak ho muzu nekam vlozit pomoc ctrl+v
predem diky
s pozdravem Johnboy
--------------------------------------------------------------------------------
[ http://john.boy(tec)cz ]=[ john(zv)boy(tec)cz ]=[ icq uin: 31198330 ]
-------------------------------------------------------------------------------- Zmena FormStyle za behu
[*] Milan ��ek - 3.6.2001 00:16:48
ahoj, zkousim jeste jednou...> ahoj,
> narazil jsem na zajmavy problem, ktery se mi nedari odstranit. Uzivatel ma
> moznost v programu zvolit (checkboxem v menu), zda bude hlavni okno vzdy
> navrchu. if MM_TopWindow.Checked then FormStyle:=fsStayOnTop else
> FormStyle:=fsNormal;
> Na hlavnim formu mam PageControl a unej nastaveno TabStop=false a
> HotTrack=true. Pokud uzivatel za behu zmeni vlastnost formu FormStyle, pak
> se mi dostane focus na Prvni zalozku PageControlu (uzivatel se pak muze
> sipkama pohybovat na dalsi zalozky) - TO NECHCI. Chtel bych, aby po zmene
> FormStyle se fokus nastavil na prvni prvek v poradi, ktery ma
TabStop=true.
>
> Diky za odpovedi
>
> S pozdravem Milan Cizek, amatersky programator, D5 Ent (SP1)
> Win2k (SP1) a Win98, cizek.milan(zv)seznam(tec)cz, ICQ: 59826637
RichEdit - tisk
[*] Hazuka Filip <filip.hazuka(zv)multivac(tec)cz> - 3.6.2001 13:18:05
Ahoj, zdravim vsechny. Potreboval bych upravit nasledujici kod tak, aby mi
to tisklo vice stranek, podel toho kolik jich je v tom RichEditu ? Ted to
tiskne pouze jednu. Nevite nekdo jak na to ?
procedure TForm1.Button2Click(Sender: TObject);
var
printarea: TRect;
x, y: Integer;
richedit_outputarea: TRect;
printresX, printresY: Integer;
fmtRange: TFormatRange;
begin
Printer.beginDoc;
try
with Printer.Canvas do begin
printresX := GetDeviceCaps( handle, LOGPIXELSX );
printresY := GetDeviceCaps( handle, LOGPIXELSY );
Font.Name := 'Arial';
Font.Size := 14;
Font.Style := [fsBold];
printarea :=
Rect( printresX, {1 inch left margin}
printresY * 3 div 2, {1.5 inch top margin}
Printer.PageWidth - printresX, {1 inch right margin}
Printer.PageHeight - printresY * 3 div 2 {1.5 inch bottom margin}
);
x := printarea.left;
y := printarea.top;
TextOut( x, y, 'A TRichEdit print example' );
y := y + TextHeight('Ag');
Moveto( x, y );
Pen.Width := printresY div 72; {1 point}
Pen.Style := psSolid;
Pen.Color := clBlack;
LineTo( printarea.Right, y );
Inc( y, printresY * 5 div 72 );
{Define a rectangle for the rich edit text. The height is set to the
maximum. But
we need to convert from device units to twips, 1 twip = 1/1440 inch or
1/20 point.}
richedit_outputarea := Rect( (printarea.left+2) * 1440 div printresX,
y * 1440 div printresY,
(printarea.right-4) * 1440 div printresX,
(printarea.bottom)* 1440
div printresY );
{Tell rich edit to format its text to the printer. First set up data
record for message:}
fmtRange.hDC := Handle; {printer handle}
fmtRange.hdcTarget := Handle; {ditto}
fmtRange.rc := richedit_outputarea;
fmtRange.rcPage := Rect( 0, 0, Printer.PageWidth * 1440 div printresX,
Printer.PageHeight * 1440 div
printresY );
fmtRange.chrg.cpMin := 0;
fmtRange.chrg.cpMax := richedit1.GetTextLen - 1;
{first measure the text, to find out how high the format rectangle
will be. The call sets
fmtrange.rc.bottom to the actual height required, if all characters in
the selected range
will fit into a smaller rectangle}
richedit1.Perform( EM_FORMATRANGE, 0, Longint((zv)fmtRange));
{Draw a rectangle around the format rectangle}
Pen.Width := printresY div 144; {0.5 points}
Brush.Style := bsClear;
Rectangle( printarea.Left, y - 2, printarea.right, fmtrange.rc.bottom
* printresY div 1440 + 2 );
{Now render the text}
richedit1.Perform( EM_FORMATRANGE, 1, Longint((zv)fmtRange));
y := fmtrange.rc.bottom * printresY div 1440 + printresY * 5 div 72;
{Free cached information}
richedit1.Perform( EM_FORMATRANGE, 0, 0);
TextOut( x, y, 'End of example.' );
end;
finally
Printer.EndDoc;
end;
end;
Diky za pomoc. Filip.systemove adresare
[*] Hurricane <hurricane(zv)quick(tec)cz> - 3.6.2001 16:19:38
Zdravim
Objevil jsem tam takovou polozku, ale tezko rict, jak je to u jinych verzi
office. Mas celkem 4 a pochybuju, ze to MS neudelal v kazde verzi jinak.
Hurricane
----- Original Message -----
> Office uz neni prilis 'systemovy', tam bude potreba asi hledat dle nejake
> polozky v registru vytvorene pri jeho instalaci.pozice kursoru mysi
[*] Tom� Janta����##��{�#��Y��̿ - 4.6.2001 02:37:00
Ahoj,
tady je priklad jak zjistit barvu na pazici kurzoru mysi :
Function getDesktopPixelColor : TColor ;
Var TP : TPoint ;
c:TCanvas;
begin
c:=TCanvas.create;
c.handle:=GetWindowDC(GetDesktopWindow);
GetCursorPos(TP);
Result := IntToStr( getpixel(c.handle,TP.x,TP.y));
c.free;
end;
Tomas Jantac
PaPouch elektronika
www.papouch.com
---
Odchoz� zpr�va neobsahuje viry.
Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.255 / Virov� b�ze: 128 - datum vyd�n�: 17.5.2001
Skryti v seznamu uloh
[*] Tom� Janta����##��{�#��Y��̿ - 4.6.2001 02:57:04
Ahoj,
koukni na :
http://www.swissdelphicenter.ch/en/showcode.php?id=106
Tomas Jantac
PaPouch elektronika
www.papouch.com
-----Original Message-----
From: delphi-l-owner(zv)clexpert(tec)cz [mailto:delphi-l-owner(zv)clexpert(tec)cz]On
Behalf Of DarkLogic
Sent: Saturday, June 02, 2001 2:05 AM
To: Delphi konference
Subject: Skryti v seznamu uloh
Dobry den!
Po zmacknuti CTRL+ALT+DELETE se ve Windows 9x zobrazi seznam aktualne
spustenych programu. Nevi nekdo, jak v tomhle seznamu skryt muj program, aby
ho nikdo nemohl timto zpusobem ukoncit?
dekuji
Vasek Navrat
---
P��choz� zpr�va neobsahuje viry.
Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.255 / Virov� b�ze: 128 - datum vyd�n�: 17.5.2001
---
Odchoz� zpr�va neobsahuje viry.
Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.255 / Virov� b�ze: 128 - datum vyd�n�: 17.5.2001
ulozeni textu do schranky
[*] Tom� Janta����##��{�#��Y��̿ - 4.6.2001 03:14:27
Ahoj,
funkce pro praci s ClipBoardem jsou ulozeny v unite : Clipbrd
uses Clipbrd ;
....
ClipBoard.Open;
Clipboard.SetTextBuf ('Tady ten text co chci do ClipBoardu') ;
Clipboard.Close;
....
Tomas Jantac
PaPouch elektronika
www.papouch.com
---
Odchoz� zpr�va neobsahuje viry.
Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.255 / Virov� b�ze: 128 - datum vyd�n�: 17.5.2001
TQRGroup v QuickReport 2.0g na kazde strane sestav
[*] V�t Kr�ka����+?#�$g�^#�3 - 4.6.2001 06:46:14
TQRGroup ma vlastnost "ReprintOnNewPage" a tu staci nastavit na true.
vitek
> -----Original Message-----
> From: delphi-l-owner(zv)clexpert(tec)cz [mailto:delphi-l-owner(zv)clexpert(tec)cz]On
> Behalf Of Skokosek
> Sent: Friday, June 01, 2001 12:24 PM
> To: delphi-l(zv)clexpert(tec)cz
> Subject: TQRGroup v QuickReport 2.0g na kazde strane sestavy
>
>
> Ahoj ,
>
> nevite nekdo, jak docilit toho, aby se mi v QR ( v D3) tiskl
> TQRGroup na kazde strane sestavy (neco jako Column header) ?
>
> Diky Lada
> TChart
[*] Lauko #tefan <laukosw(zv)naex.sk> - 4.6.2001 08:14:54
Ahoj,
potreboval, by som za behu programu vyvolat dialog - Edit Chart. V helpe som
nic nenasiel. Je to vobec mozne alebo som hladal na zlom mieste?
Dakujem, Lauko.
systemove adresare
[*] Milan Tome� <Milan.Tomes(zv)haida(tec)cz> - 4.6.2001 08:38:47
Zkus se podivat do HKLM\Software\Microsoft\CurrentVersion\App Paths\
Tam jsou jako klice nazvy instalovanych programu. Pro WinWord je to Winword.exe
a pak te bude zajimat hodnota Path. Tahle polozka se tam vyskytuje uz od verze
6.
S pozdravem
Milan Tome#
Vedouc� v�vojov�ho t�mu Windows
Softwarehouse HAiDA s.r.o.
Nov� Bor
tel: 0424/722291, 0424/222284
email: Milan.Tomes(zv)haida(tec)cz
> by bylo, kdybych mohl zjistit cestu k EXEacum office (c:\nekde\winword.exe).
>
> Diky.
> Hurricane
systemove adresare
[*] Tom� Janta����##��{�#��Y��̿ - 4.6.2001 09:24:00
Ahoj,
zase tak moc nepomuzu, ale aspon neco...
co funkce GetWindowsDirectory a GetSystemDirectory...
Var S : array[0..MAX_PATH] of char ;
....
GetWindowsDirectory ( S, SizeOf(S) ) ;
....
Ale s tema Officema to bude problem, u tech bych se asi obratil na ty
registry
Tomas Jantac
PaPouch elektronika
www.papouch.com
MAPI a LOTUS NOTES
[*] Pavel Gazda <Pavel.Gazda(zv)seznam(tec)cz> - 4.6.2001 09:53:27
Zdravim vsechny.
Pro odeslani posty z aplikace a zobrazeni adresare jsem pouzil funkce MAPI.
Tento postup mi funguje pro MS OUTLOOK i OUTLOOK EXPRESS.
Nyni chci pro jednoho zakaznika pouzit stejne postupy i pro napojeni na
LOTUS NOTES (5.0.5).
Prosim, nevite nekdo proc mi pri pokusu o odeslani posty nelze vyplnit
adresu prijemce?
( Telo zpravy, predmet zpravy i prilohu mi to vezme)
Hledal jsem vsude mozne, ale nic jsem nenasel.
Chci pouzivat pristup pomoci MAPI.
Zkousel jsem i priklad z JCL se stejnym vysledkem.
Diky za kazdy nazor ci nasmerovani.
P.S. LOTUS NOTES vubec neznam, vidim ho poprve a tezko se v nem orientuji.znulovanie premennej
[*] Pavol Kaka�ka <paka(zv)aktis(tec)cz> - 4.6.2001 10:21:38
Alebo si mozes urobit proceduru typu
procedure Clear(AVariables: array of Integer);
var
I: Integer;
begin
for I := Low(AVariables) to High(AVariables) do
AVariables[I] := 0;
end;
---
a potom
begin
Clear([a, b, c, d, ...]);
...
end;
*** Pisem to len z hlavy tak to treba vyskusat.
Pavol Kaka�ka
kasix(zv)atlas(tec)cz
> Ahoj, mam taku myslim zaujimavu otazku
>
> Pouziva niekto nejaky krajsi zapis nasledujuceho prikladu?
>
> a:=0;b:=0;c:=0;
OT: Zapis do registru ve VB for Application
[*] Ales Vasicek <vasicek(zv)ecommerce(tec)cz> - 4.6.2001 10:22:05
Dobry den,
potreboval bych ukladat nastaveni programu napsanem ve VBA do registru
do klice HKEY_LOCAL_MACHINE. Nevite nekdo jak na to?
fce SaveSetting mi dovoli zapsat jen do klice
HKEY_CURRENT_USER\software\VB and VBA Program Setings.
Diky, Ales
Databaze + Thread
[*] Pavol Kakacka <paka(zv)aktis(tec)cz> - 4.6.2001 10:29:42
Mno, problem je pravdepodobne v tom ze TDatabase komponenty vytvaras v tom
threadu. Myslim, ze by sa tie objekty mali threadu predavat uz vytvorene v
hlavnom vlakane aplikacie.
Neviem ale ci to je presne Tvoj pripad. Nam sa toto stavalo pri vytvarani
viacerych conectionu klientov naraz.
Pavol Kakacka
kasix(zv)atlas(tec)cz
----- Original Message -----
From: "Parizsky Ladislav" <Ladislav.Parizsky(zv)access-it(tec)cz>
mam thread ve kterym vytvorim TDatabase, navliknu ji na SQL databazy a
priopojim na ni Query tvorene v tomto threadu. To vse je ok, do doby nez SQL
padne, nebo proste nekomunikuje. Kdyz se na nej zkusim connectnout pak mi
zamrzne cela aplikace a ceka na odezvu, daval sem to do threadu aby ta
aplikace bezela i kdyz je zrovna tohle SQL dole. Nevite nekdo jak je mozne
ze ta aplikace stoji cela ?
D5 Stan. & DB ;)))))))
[*] M�ra Tom� <tmara(zv)itsys(tec)cz> - 4.6.2001 10:32:03
Dobry den,
koupil jsem si D5 Stan., ale k memu prekvapeni jsem zjistil, ze neobsahuje
Database Desktop, InstallShield, dale jsem nenasel TTable, TQuery ...etc.
Priste se budu zajiste lepe informovat, co ktera verze obsahuje ;)))). Ono
co take za tech par kacek cekat. ;))) Ted bych se chtel zeptat, zda
existuji na iNetu nejake free komponenty podobne TTable a TQuery. Take by se
mi hodil free produkt podobny Database Desktop.
Dekuji moc. ;))))
-TMa-
Informace o objektu
[*] L. Filip <lfilip(zv)lekis(tec)cz> - 4.6.2001 10:41:53
Zdravim.
Mam kod ktery mi zjistuje ruzne vlastnosti urciteho objektu. Zatim mi fungovalo vse v pohode, ale ted jsem chtel zjistovat jestli objekt obsahuje vlastnost "Modified". Prestoze tuto vlastnost evidentne ma tak mi funkce GetPropInfo vraci nil.
Muzete mi nekdo poradit proc nebo kde delam chybu.
Muj testovaci kod:
Edit1: TEdit;
procedure TForm1.Button1Click(Sender: TObject);
var tp: PPropInfo;
begin
tp := GetPropInfo(Edit1.ClassInfo ,'Modified');
if tp <> nil then ShowMessage('ano');
end;
Dik za kazdou pomoc.Informace o objektu
[*] Pavol Kaka�ka <paka(zv)aktis(tec)cz> - 4.6.2001 10:46:45
Je ta property published?
Pavol Kaka�ka
kasix(zv)atlas(tec)cz
----- Original Message -----
From: L. Filip
Zdravim.
Mam kod ktery mi zjistuje ruzne vlastnosti urciteho objektu. Zatim mi
fungovalo vse v pohode, ale ted jsem chtel zjistovat jestli objekt obsahuje
vlastnost "Modified". Prestoze tuto vlastnost evidentne ma tak mi funkce
GetPropInfo vraci nil.
Muzete mi nekdo poradit proc nebo kde delam chybu.
Zapis do registru ve VB for Application
[*] brant(zv)dcomm(tec)cz - 4.6.2001 10:50:14
Tohle jsem nasel ve zdrojaku viru Homepage:
Set WS = CreateObject("WScript.Shell")
...
WS.regwrite "HKCU\software\An\mailed", "1"
Sice to nezapisuje do HKLM, ale treba to bude aspon inspirace.
RNDr. Petr Brant [brant(zv)dcomm(tec)cz]
ICQ #68652380
D&COMM s.r.o.
Korunova�n� 6
170 00 Praha 7
-----Original Message-----
From: Ales Vasicek [mailto:vasicek(zv)ecommerce(tec)cz]
Sent: Monday, June 04, 2001 10:22 AM
To: delphi-l(zv)clexpert(tec)cz
Subject: OT: Zapis do registru ve VB for Application
Dobry den,
potreboval bych ukladat nastaveni programu napsanem ve VBA do registru
do klice HKEY_LOCAL_MACHINE. Nevite nekdo jak na to?
fce SaveSetting mi dovoli zapsat jen do klice
HKEY_CURRENT_USER\software\VB and VBA Program Setings.
Diky, Ales
OT: Linuxovsky disk ve Win
[*] Petr E�ner <petr.esner(zv)atlas(tec)cz> - 4.6.2001 11:18:13
Ahoj,
omlouvam se za OT
nevi nekdo o nejakem (free) programku ci driveru, pomoci ktereho bych mohl
pouzivat ve win disk, naformatovany na Ext2? Melo by to fungovat na W2K a
staci mi pristup pro cteni...
Predem diky za nasmerovani
Petr E#ner
petr.esner(zv)atlas(tec)cz
ICQ# 105826792
Informace o objektu
[*] Libor Filip <filip(zv)agrokonzulta(tec)cz> - 4.6.2001 12:08:04
Timto zpusobem lze ziskat informace pouze pro published vlastnosti.
Mam pocit, ze vlastnost Modified neni published.
S pozdravem
Libor Filip
-----P�vodn� zpr�va-----
Od: delphi-l-owner(zv)clexpert(tec)cz [mailto:delphi-l-owner(zv)clexpert(tec)cz]za
u�ivatele L. Filip
Odesl�no: 4. �ervna 2001 10:42
Komu: delphi-l(zv)clexpert(tec)cz
P�edm�t: Informace o objektu
Zdravim.
Mam kod ktery mi zjistuje ruzne vlastnosti urciteho objektu. Zatim mi
fungovalo vse v pohode, ale ted jsem chtel zjistovat jestli objekt obsahuje
vlastnost "Modified". Prestoze tuto vlastnost evidentne ma tak mi funkce
GetPropInfo vraci nil.
Muzete mi nekdo poradit proc nebo kde delam chybu.
Muj testovaci kod:
Edit1: TEdit;
procedure TForm1.Button1Click(Sender: TObject);
var tp: PPropInfo;
begin
tp := GetPropInfo(Edit1.ClassInfo ,'Modified');
if tp <> nil then ShowMessage('ano');
end;
Dik za kazdou pomoc.Printer index out of range
[*] Skokosek <skokosek(zv)seznam(tec)cz> - 4.6.2001 12:55:14
Ahoj,
mam takovy problem. Program vytvoreny v D3 bez problemu
tisknul ve W98 Se. Nyni jsem ho spustil pod W2000 a program
pri pokusu o tisk hlasi
Printer index out of range
Nevim , jak to upravit nebo kde je vlastne chyba. Poradi mi nekdo zkusenejsi
?
Dik Lada
znulovanie premennej
[*] Dalibor Toman <dtoman(zv)fortech(tec)cz> - 4.6.2001 12:58:47
> procedure Clear(AVariables: array of Integer);
1) v Deklaraci chybi VAR
2) bude-li tam VAR nelze volat proceduru s konstatnim parametrem
D. Toman
znulovanie premennej
[*] Pavol Kaka�ka <paka(zv)aktis(tec)cz> - 4.6.2001 13:18:17
Spravne, bohuzial >;-)
Pavol Kaka�ka
kasix(zv)atlas(tec)cz
----- Original Message -----
From: "Dalibor Toman" <dtoman(zv)fortech(tec)cz>
> > procedure Clear(AVariables: array of Integer);
>
> 1) v Deklaraci chybi VAR
> 2) bude-li tam VAR nelze volat proceduru s konstatnim parametrem
>
> D. Toman
Dock a undock toolbaru
[*] Milan Tome� <Milan.Tomes(zv)haida(tec)cz> - 4.6.2001 13:30:22
Zdravim vsechny,
chtel bych do aplikace zabudovat toolbary. To bych jeste dokazal, ale chtel bych
aby se chovali tak jako v Delphi tj. aby se misto obdelniku zobrazoval jejich
obsah a zaroven to okamzite reagovalo na undock i dock aniz bych musel poustet
tlacitko mysi. Muze mi nekdo poradit ???
A jeste jedna vec: Mate nekdo reseni jak na toolbar umistit menu ? Videl jsem
tady nekolik reseni napr. tlacitka, ktera oteviraji popupmenu atp... Muzete mi
pripadne poslat kousek zdrojaku.
Diky
S pozdravem
Milan Tome#
Vedouc� v�vojov�ho t�mu Windows
Softwarehouse HAiDA s.r.o.
Nov� Bor
tel: 0424/722291, 0424/222284
email: Milan.Tomes(zv)haida(tec)cz
D5 Stan. & DB ;)))))))
[*] Zbysek Hlinka <hlinka(zv)hlinka(tec)cz> - 4.6.2001 14:08:07
On 4 Jun 2001, at 10:32, M�ra Tom�# wrote:
> koupil jsem si D5 Stan., ale k memu prekvapeni jsem zjistil, ze
> neobsahuje Database Desktop, InstallShield, dale jsem nenasel TTable,
> TQuery ...etc. Priste se budu zajiste lepe informovat, co ktera verze
> obsahuje ;)))). Ono co take za tech par kacek cekat. ;))) Ted bych se
> chtel zeptat, zda existuji na iNetu nejake free komponenty podobne
> TTable a TQuery. Take by se mi hodil free produkt podobny Database
> Desktop.
V teto konfiguraci funguje Delphree OLE DB
http://delphree.clexpert.com/pages/projects/oledb/default.htm
Je to odladene proti MS SQL Serveru, ale vzhledem k TTable nebo
TQuery je to filosoficky hodne vzdalene.
S pozdravem
Zbysek Hlinka
http://www.hlinka(tec)cz http://www.slhaters(tec)cz
Phones: 02/795 29 56; GSM: 0603 551 282
Krystofova 1016, 149 00 Praha 4
CZ
OT: W2k - active directory
[*] EFG developer <developer(zv)efg(tec)cz> - 4.6.2001 14:17:56
DDVV,
omlouvam se za silny OT, vi, ze to s delphi nema naprosto nic spolecneho,
ale problemy me nuti to udelat.
Neznate nekdo nejakou konferenci o _subj_ (pokud ceskou), nebo muzete mi
nekdo ohledne _subj_ poradit ?
PROBLEM: w2k server, bezi na nem active directory, a server se porad snazi
updatovat dns server poskytovatele nasledujicima hruzama (toto je z
eventlogu):
Registrace z�znamu DNS
_kerberos._tcp.Vychozi-nazev-prvni-site._sites.dc._msdcs.xxx.xxx.xxx. 600 IN
SRV 0 100 88 XXX.xxx.xxx.xxx. se nezda�ila z d�vodu chyby:
Serveru DNS se nepoda�ilo p�ev�st form�t.
misto tech xxx je samozdrejme neco jineho :)
nevite nekdo jak se tohoto chovani zbavit? tyto zaznamy generuje service
netlogon.exe (bohuzel ho nemuzu vypnout :))
Jeste jednou se omlouvam za silne OT. Snad mi admin promine.
---
Ing. Petr �ikola
EFG CZ spol. s r.o.
sikola(zv)efg(tec)cz
www.efg(tec)cz
www.aktion(tec)cz
Prepsani disku
[*] Krayzel Libor <Libor.Krayzel(zv)czech-tv(tec)cz> - 4.6.2001 14:26:16
Nemate nekdo programek, ktery prepise prazdny disk nejakymi nesmyslnymi
daty?