Archív konference Delphi
Zpět na výběr roku archívu nebo přejít na fulltextové vyhledávání v konferenci.
Delphi 6 a 7: Open path
[*] Ing. Jan Dubsk� - Stroj�rna P�lava <dubsky(zv)s-palava(tec)cz> - 2.6.2003 14:15:26
Nepouzivej OPEN ale REOPEN (najdes v menu o dva radky nize)
Honza
kde sa nastavuje cesta, ktora sa objavi po stlaceni "Open" v
prostredi Delphi 6, 7?
Stale to otvara $Delphi\Projects a uz ma nebavi sa stale
preklikavat do konkretneho adresara.
TAPI a LINEERR_NOTOWNER
[*] Petr Brant <brant(zv)dcomm(tec)cz> - 2.6.2003 14:45:56
Ne ze bych byl na to nejaky odbornik, ale nahodou jsem mel otevrene =
MSDN pro
NET a v nem je:
LINEERR_NOTOWNER=20
The application does not have owner privilege to the specified call.
v msdn=20
nemuzu najit co znamena LINEERR_NOTOWNER=20
popripade radu co vlastne prijde do lineregirect
(do druhe pozice) chapal jsem to jak cislo=20
telefonu a vono nic, nebo ze by to nebyla=20
podporovana fce vod aspi ci jak se to zove...??
Zdravim
RNDr. Petr Brant [brant(zv)dcomm(tec)cz]=20
http://web.redbox(tec)cz/petr.brant
D&COMM s.r.o.
Korunova=E8n=ED 6
Praha 7
tel. +420724007234
Delphi 6 a 7: Open path
[*] Tom Beran <tfuzzy(zv)atlas(tec)cz> - 2.6.2003 14:28:34
> > kde sa nastavuje cesta, ktora sa objavi po stlaceni "Open" v
> > prostredi Delphi 6, 7?
> Ja jsem to vyresil tak, ze v adresari $Delphi\Projects mam
> linky do adresaru se skutecnymi projekty: prave tlacitko
Me se osvedcil expert "Open/save dialogs with favorite folders combobox
for Delphi IDE"
koukni tady
http://codecentral.borland.com/codecentral/ccweb.exe/listing?id=14732
...
T.string + '
[*] Ivan Virag <lgcvirag(zv)iol(tec)cz> - 2.6.2003 15:23:58
pokud x ma byt - a'b'c
potom
x := 'a''b''c';
Ivan Virag
> Behalf Of n7110(zv)centrum(tec)cz
>
Jak dostanu do stringu apostrof? Jde to i
> n�jak jinak, ne� x := 'blabla'+chr(39)+....? D�ky
TopRow a DBGrid
[*] Lebeda David <david.lebeda(zv)comarr(tec)cz> - 02.6.2003 14:28:43
Ahoj,
nezabyvali jste se nekdo timhle? Mam DBGrid, v nem jsem nekde
nastaveny. Potrebuji udelat refresh, ale tak, aby vybrany radek
zustal stale treba "paty shora" (mluvime o situaci, kdy to jde, tj. napr.
nedoslo k zadne zmene obsahu tabulky. Pouzitim RecNo, Locate
apod. se aktivni radek octne bud na okraji gridu nebo uprostred.
Pujdu ted zkusit najit reseni, jde mi jen o to, jestli jste po tom nekdo
uz nepidil.
Diky
David Lebeda
Aplikacna vrstva nad Firebird
[*] Martin Schayna <mschayna(zv)aktis(tec)cz> - 2.6.2003 13:59:41
----- Original Message -----
From: "radeq" <radeq(zv)centrum.sk>
> > Ano, pro aplikacni server G3 pouzivame Delphi a Kylix. Protoze nemame
> > zadne vizualni rozhrani na aplikacnim serveru, nemusime pouzivat CLX,
> > cili na Linuxu je to daemon, na Windows NT/2000/XP je to service a na
> > starych Windows 9x/ME prosta aplikace.
>
> Ak som to spravne pochopil, tak to programujete 3krat? Pre kazdu
> platformu zvlast? Neda sa to naprogramovat vo Win ako service a potom
> uz len prekompilovat v Kylixe?
> Dakujem za postrehy.
Ne :-), zdrojaky jsou stejne z 99%. Pro service i pro daemona jsou takove
docela male obalky (kazda uuuuplne jina) kolem spolecnych sdilenych
zdrojaku aplikacniho serveru.
Martin Schayna
Aplikacna vrstva nad Firebird
[*] radeq <radeq(zv)centrum.sk> - 02.6.2003 11:28:45
> Ano, pro aplikacni server G3 pouzivame Delphi a Kylix. Protoze nemame
> zadne vizualni rozhrani na aplikacnim serveru, nemusime pouzivat CLX,
> cili na Linuxu je to daemon, na Windows NT/2000/XP je to service a na
> starych Windows 9x/ME prosta aplikace.
Ak som to spravne pochopil, tak to programujete 3krat? Pre kazdu
platformu zvlast? Neda sa to naprogramovat vo Win ako service a potom
uz len prekompilovat v Kylixe?
Dakujem za postrehy.
radeq
Aplikacna vrstva nad Firebird
[*] Lukas Gebauer <gebylist(zv)mlp(tec)cz> - 02.6.2003 13:45:14
> > Ano, pro aplikacni server G3 pouzivame Delphi a Kylix. Protoze
> > nemame zadne vizualni rozhrani na aplikacnim serveru, nemusime
> > pouzivat CLX, cili na Linuxu je to daemon, na Windows NT/2000/XP je
> > to service a na starych Windows 9x/ME prosta aplikace.
> Ak som to spravne pochopil, tak to programujete 3krat? Pre kazdu
> platformu zvlast? Neda sa to naprogramovat vo Win ako service a potom
> uz len prekompilovat v Kylixe? Dakujem za postrehy.
To by asi nebylo moc efektivni.. ale existuji zdrojacky na delani
servicu, ktere muzes pustit i jako normani aplikaci.. a zaroven kdyz
je prekompilujes pod Kylixem, tak ti z tve aplikace udelaji
linuxoveho daemonka. ;-) takze to programujes jen jednou, ale
prekompilujes totez dvakrat...v delphi a v kylixu.
--
Lukas Gebauer.
E-mail: gebauerl(zv)mlp(tec)cz
http://www.ararat(tec)cz/synapse/ - Ararat Synapse - TCP/IP Lib.
Prevod vyctu z C do Pascal
[*] Blazek Jaroslav <Jaroslav.Blazek(zv)access-it(tec)cz> - 02.6.2003 12:40:06
Ahoj,
> djvar(zv)post(tec)cz 06/02 11:27 dop. >>>
<C>
typedef enum _WTS_CONNECTSTATE_CLASS
{
WTSActive,
WTSConnected,
WTSConnectQuery,
WTSShadow,
WTSDisconnected,
WTSIdle,
WTSListen,
WTSReset,
WTSDown,
WTSInit
} WTS_CONNECTSTATE_CLASS;
typedef struct _WTS_SESSION_INFO {
DWORD SessionId;
LPTSTR pWinStationName;
WTS_CONNECTSTATE_CLASS State;
} WTS_SESSION_INFO, *PWTS_SESSION_INFO;
</C>
<P>
type
_WTS_CONNECTSTATE_CLASS = (
WTSActive,
WTSConnected,
WTSConnectQuery,
WTSShadow,
WTSDisconnected,
WTSIdle,
WTSListen,
WTSReset,
WTSDown,
WTSInit
);
TWTSConnectStateClass = _WTS_CONNECTSTATE_CLASS;
PWTSSessionInfo = ^TWTSSessionInfo;
_WTS_SESSION_INFO = packed record
SessionId:DWORD;
pWinStationName:LPTSTR;
State:TWTSConnectStateClass;
end;
TWTSSessionInfo = _WTS_SESSION_INFO;
</P>
S pozdravem
Bc. Jaroslav Blazek
Access-IT Ceska Lipa
mailto:jaroslav.blazek(zv)access-it(tec)cz
http://www.access-it(tec)cz
ICQ# : 133673990
+420605/813644
Can't load package (JCL)
[*] Vaclav Sazima <vaclav.sazima(zv)utilia(tec)cz> - 02.6.2003 12:32:21
Ahoj,
minuly tyden se mi prestaly natahovat JCL packages (a taky DS Pack) s
hlaskou :
Nelze nal�zt jeden z knihovn�ch soubor� pot�ebn�ch pro spu�t�n� t�to
aplikace.
Jeste pridavam vypis z IDE Errors :
exception class : EPackageError
exception message : Can't load package C:\Program
Files\Borland\Delphi7\Projects\Bpl\JclDebugIde70.bpl.
Nelze nal�zt jeden z knihovn�ch soubor� pot�ebn�ch pro spu�t�n� t�to
aplikace.
Delphi 7 Pro.
Nevite,prosim, nekdo co s tim?
Vaclav Sazima
Chyba v D6 - svazane COM (Was: OT Vyvojove nastroj
[*] Zbysek Hlinka <hlinka(zv)hlinka(tec)cz> - 02.6.2003 12:34:50
On 2 Jun 2003 at 12:11, Karel Klimes wrote:
> Tak proto sem zacal plesatet :))). Mne tohle dela hlavne kdyz vytvarim
> instanci COM CoClass v extra threadu a postavim tam breakpoint. Cely
> to ztuhne, moje XPusky sice "nezahodi" zadnou Windows Message, ale
> reakcni doba je radove v minutach. Vetsinou sem to resil TVRDYM
> resetem (nerad cekam :-o ).
Uznej sam - da se v tomhle programovat? Muj verdikt zni: NEDA. Delphi
6 a 7 jsou pro tento typ uloh naprosto nepouzitelne. V D5 to jeste
funguje.
S pozdravem
Zbysek Hlinka
ISAPI a COM
[*] Vymazal Milan <vymazal.milan(zv)seznam(tec)cz> - 2.6.2003 12:08:17
Zdravim konferenci
naprogrmoval jsem v delphi ISAPI knihovnu ktera podle "host:"
parametru presmeruje URL do urcite slozky. Konfiguraci si to nacita z
setup.ini.Ale problem je v tom ze to IIS potrebuje vzdy znovu
restartovat aby se ta konfigurace nacetla znovu. Ona ta ISAPI knihovna
nacita konfiguraci pouze pri startu. No a problem je vtom ze to
potrebuji udelat tak aby to slo obsluhovat pres nejaky COM objekt v
ramci ASP. COM komponenty umim naprogramvat ale jak to udelat aby ta
ISAPI sla ovladat pres COM objekty v ASP ?
--
Best regards,
Milan Vymazal
Delphi 7 Enterprise, Windows 2000 SP3 Proff, IE 6.0sp1 with all sp
Chyba v D6 - svazane COM (Was: OT Vyvojove nastroj
[*] Karel Klimes <klimes(zv)unicontrols-tramex(tec)cz> - 2.6.2003 12:11:35
> > Ja jsem narazil na chybu, ktera ve svem dusledku znemoznuje=0D
> > porgramovani=0D
> urciteho druhu aplikaci -=0D
> > konkretne programovani projektu s vice svazanymi COM objekty v D6 a=0D
> > D7. Tato chyba je natolik tristni, ze me odradila od Delphi a=0D
> > prinutila me prejit rychleji na C# =0D
> =0D
> Mohl bys byt konkretnejsi? Ja v D6 hodne pracuju s COM a nerad bych se=0D
> dostal do problemu.=0D
=0D
> Uz jsem to tu psal mnohokrat. Mam otevreny projekt s vice COM. Kdyz =0D
> chci ladit, pustim program, a krokuji uvnitr objektu. OK. Najdu chybu =0D
> v nejakem objektu, opravim, prekompiluji, a s dalsim krokovanim jsem =0D
> v p.... Nezbyva nez zavrit Delphi, otevrit, a krokovat az do dalsi =0D
> opravy. Malem jsem z toho vyplesatel. :-)=0D
=0D
Tak proto sem zacal plesatet :))). Mne tohle dela hlavne kdyz vytvarim
instanci COM CoClass v extra threadu a postavim tam breakpoint. Cely to
ztuhne, moje XPusky sice "nezahodi" zadnou Windows Message, ale reakcni d=
oba
je radove v minutach. Vetsinou sem to resil TVRDYM resetem (nerad cekam :=
-o
).=0D
=0D
Abych nezapomnel, existuje nekde neco jako kucharka pro tvorbu IS, ted
nemyslim popis typu ted udelej to a ted zas tohle. Spis obecnou analyzu
moznych modelu. Jaky a kolik zvolit vrstev - vyhody, nevyhody. Co do kter=
e
patri a co uz ne atd. (klidne i v EN).=0D
=0D
dik=0D
=0D
Karel Klimes
Prevod vyctu z C do Pascal
[*] Martin Schayna <mschayna(zv)aktis(tec)cz> - 2.6.2003 11:41:04
----- Original Message -----
From: "Petr Varga" <djvar(zv)post(tec)cz>
> Potreboval bych poradit jak prevest nasledujici vycet z C do
> Pascal synstaxe.
>
> typedef enum _WTS_CONNECTSTATE_CLASS
> typedef struct _WTS_SESSION_INFO {
Odhaduji ze problem bude spise v tom structu, tedy po
pascalsku recordu. Pouzil jste "packed record" ?
Martin Schayna
Prevod vyctu z C do Pascal
[*] Petr Varga <djvar(zv)post(tec)cz> - 02.6.2003 11:27:33
Ahoj konference.
Potreboval bych poradit jak prevest nasledujici vycet z C do
Pascal synstaxe.
typedef enum _WTS_CONNECTSTATE_CLASS
{
WTSActive,=20
WTSConnected,=20
WTSConnectQuery,=20
WTSShadow,=20
WTSDisconnected,=20
WTSIdle,=20
WTSListen,=20
WTSReset,=20
WTSDown,=20
WTSInit
} WTS_CONNECTSTATE_CLASS;
typedef struct _WTS_SESSION_INFO { =20
DWORD SessionId; =20
LPTSTR pWinStationName; =20
WTS_CONNECTSTATE_CLASS State;
} WTS_SESSION_INFO, *PWTS_SESSION_INFO;
Bohuzel se mi to nejak nedari. Funkce do kter=E9 jak o parametr
predavam promenou typu PWTS_SESSION_INFO mi vraci chybu .. Spatny
Buffer pro zadanou operaci.
Dekuji predem za pomoc.. Petr Varga
--=20
Ziskejte kvalitu, kterou si zasluhujete. Za minimalni mesicni
poplatek vam nabizime Antivir, Antispam nebo dalsi kapacitu pro
vas Mailbox. Vice na: http://sluzby.volny(tec)cz/product/postpaid/
Aplikacna vrstva nad Firebird
[*] Martin Schayna <mschayna(zv)aktis(tec)cz> - 2.6.2003 11:10:46
----- Original Message -----
From: "radeq" <radeq(zv)centrum.sk>
> Chcem aby ta aplikacna vrstva bola naprogramovana 1x a mohla bezat aj
> na Linuxe alebo na Windowse - podobne ako to ma riesene ABRA G3.
> Takze asi Delphi a Kylix s pouzitim CLX ...ok?
Ano, pro aplikacni server G3 pouzivame Delphi a Kylix. Protoze nemame
zadne vizualni rozhrani na aplikacnim serveru, nemusime pouzivat CLX,
cili na Linuxu je to daemon, na Windows NT/2000/XP je to service a na
starych Windows 9x/ME prosta aplikace.
> Ako vyriesit komunikaciu medzi Klientom (Win) a aplikacnou vrstvou
> (Win/Linux) ? Sockety ? Komponenty INDY? Alebo ake ? Najlepsie ak by
> boli OpenSource ...
Pouzivame klasiku - blokovane sokety, komponenty Indy. Mame nad nimi takovou
nadstavbu postavenou na ideovych zakladech DCOM, takze se server ovlada
jednoduse z klienta jako objekt.
> Ake pouzivate komponenty alebo nastroje pre porgramovanie aplikacnej
> vrstvy ktora by mala bezat na Linuxe aj na Windowse (OpenSource)?
Prilis pozadavku na aplikacni server nemame, takze pouzivame bezne
technologie,
samozrejme nejlepe opensource: pro databazi IBX, pro xml XDOM,
pro komprimaci ZLib.
Hodne stesti.
Martin Schayna
www.abrag3.com
OT: Visual Studio .NET - trial verze
[*] JiriKrakora(zv)skh(tec)cz - 2.6.2003 10:59:30
http://www.microsoft.com/downloads/details.aspx?familyid=3Dd7158dee-a83f-4e=
21-b05a-009d06457787&displaylang=3Den
Tady se da stahnout .Net Framework zdarma. Jeho soucasti je i C#=20
prekladac.
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D
Ji=F8=ED Kr=E1kora
Pylonware Praha s.r.o.
Vlkova 24
130 00 Praha 3
Tel.: 267 195 303
Email: jkrakora(zv)skh(tec)cz
Web: www.pylonware.com
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D
Zdravim,
da se u nas (treba u nejakeho distributora) objednat trial verze %subj%?
Nasel jsem jen moznost objednani odnekud z Ameriky za $. Chtel bych si
vyzkouset hlavne o cem je jazyk C#...
Jakub Dusek
------------------------------------
Web : http://www.corexpert.com
Phone : +420 604 615 795
Icq : 86063232
------------------------------------
Sms GateKeeper - komfortni odesilani
sms zprav pro platformu Windows
------------------------------------
Jak na ADO?
[*] Ing. Igor Vodi�ka <vodicka(zv)sagit(tec)cz> - 2.6.2003 10:40:57
Ahoj vsem!
V oblasti pouziti ADO k pripojeni k MS SQL jsem naprosty zacatecnik. Mame MS
SQL 7.0, na serveru jsou nejak� databaze. Pres demonstracni program na ADO z
Delphi 5 se na data pripojim a prohlizim se jednotlive tabulky (aplikace
AdoTest).
Pokusil jsem si napsat vlastni programek na pripojeni ke konkretni databazi
a prohlizeni jedne tabulky. Na form jsem dal ADOConnection, DataSource,
ADOTable. Vse jsem navzajem propojil pres Connection.
Jako ConnectionString jsem nastavil "Provider=SQLOLEDB.1;Persist Security
Info=False;User ID=sa;Initial Catalog=sagit;Data Source=POWEREDGE;Use
Procedure for Prepare=1;Auto Translate=True;Packet Size=4096;Workstation
ID=IGOR2000". Na form jsem jeste umistil DBGrid a napojil ho na DataSource.
Kdyz z programku zavolam (ADOConnection.Connected je True) ADOTable.Open,
tak programek zatuhne.
Prosim vas muze mi nekdo poradit jak spravne postupovat pri pouzivani ADO
pro pristup do MS SQL, pripadne poslat na soukromy mail nejaky jednoduchy
prikladek, neco ve stylu jak jsem popsal.
Diky
Ing. Igor Vodicka, W2K, D5 Ent
informacni systemy
Nakladatelstvi Sagit
Tel.: 59 6786 001
HTTP://www.sagit(tec)cz/
---
Odchoz� zpr�va neobsahuje viry.
Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.486 / Virov� b�ze: 284 - datum vyd�n�: 29.5.2003
Visual Studio .NET - trial verze
[*] Milan Schembera <milan(zv)missoftware(tec)cz> - 2.6.2003 10:19:48
Mrkni na www.vltava(tec)cz, objednal jsem si VB.NET vcetne ceske knizky, maji i
C#, cena je kolem 1.400, zadny trial.
> -----Original Message-----
> From: delphi-l-owner(zv)clexpert(tec)cz
> [mailto:delphi-l-owner(zv)clexpert(tec)cz]On Behalf Of Jakub Dusek
> Sent: Sunday, June 01, 2003 9:19 PM
> To: Delphi Konference
> Subject: OT: Visual Studio .NET - trial verze
>
>
> Zdravim,
> da se u nas (treba u nejakeho distributora) objednat trial
> verze %subj%?
> Nasel jsem jen moznost objednani odnekud z Ameriky za $. Chtel bych si
> vyzkouset hlavne o cem je jazyk C#...
>
> Jakub Dusek
>
> ------------------------------------
> Web : http://www.corexpert.com
> Phone : +420 604 615 795
> Icq : 86063232
> ------------------------------------
> Sms GateKeeper - komfortni odesilani
> sms zprav pro platformu Windows
> ------------------------------------
>
>
>Zobrazenie HTML zo StringListu
[*] ing. Jan Fiala <jan.fiala(zv)wo(tec)cz> - 2.6.2003 10:05:26
2.6.2003 vito(zv)centrum(tec)cz:
> Achojte lidi,
> neviete niekto, ako mozem zobrazit HTML kod, ktory mam v StringListe
> (alebo v premennej string)? mam tam konkretne HTML tabulku a
> potreboval by som ju zobrazit bez toho, aby som tu tabulku ukladal do
> suboru a potom zobrazoval cez TWebBrowser. Prave v tejto komponente
> to potrebujem zobrazit. Alebo je ina cesta ako dosiahnut tento
> vysledok?
Tady je nejaky kod (uz nevim odkud):
var
PersistStreamInit: IPersistStreamInit;
StreamAdapter: IStream;
MemoryStream: TMemoryStream;
begin
WebBrowser.Navigate('about:blank');
repeat
Application.ProcessMessages;
Sleep(0);
until WebBrowser.ReadyState = ReadyState_Complete;
if WebBrowser.Document.QueryInterface(IPersistStreamInit, PersistStreamInit) = S_OK then
begin
MemoryStream := TMemoryStream.Create;
try
memoText.Lines.SaveToStream(MemoryStream);
MemoryStream.Position := 0;
except
MemoryStream.Free;
raise;
end;
StreamAdapter := TStreamAdapter.Create(MemoryStream, soOwned);
PersistStreamInit.Load(StreamAdapter);
end;
end;
Ale jsou tam problemy, pokud jsou v hlavicce odkazy na sablony apod.
Ale na jednoduchy kod to staci.
--
Jan Fiala
mailto:jan.fiala(zv)wo(tec)cz
OT: Visual Studio .NET - trial verze
[*] Jakub Dusek <delphi(zv)corexpert(tec)com> - 1.6.2003 21:19:18
Zdravim,
da se u nas (treba u nejakeho distributora) objednat trial verze %subj%?
Nasel jsem jen moznost objednani odnekud z Ameriky za $. Chtel bych si
vyzkouset hlavne o cem je jazyk C#...
Jakub Dusek
------------------------------------
Web : http://www.corexpert.com
Phone : +420 604 615 795
Icq : 86063232
------------------------------------
Sms GateKeeper - komfortni odesilani
sms zprav pro platformu Windows
------------------------------------
Visual Studio .NET - trial verze
[*] Jiri Virt <virt(zv)volny(tec)cz> - 2.6.2003 09:49:51
Zkus si stahnout Matrix z www.microsoft.com ...
Jirka
Visual Studio .NET - trial verze
[*] Jiri Sedivec <jsedivec(zv)mail(tec)cz> - 2.6.2003 09:56:57
Ja si volal do Mrkvosoftu CR a tam mi bylo receno, ze demo-verze,
trial-verze, apod. vyvojovych softwaru nejsou (nedelaji se)... Nejak se mi
tomu ale nechce verit...
Subject: OT: Visual Studio .NET - trial verze
> Zdravim,
> da se u nas (treba u nejakeho distributora) objednat trial verze %subj%?
> Nasel jsem jen moznost objednani odnekud z Ameriky za $. Chtel bych si
> vyzkouset hlavne o cem je jazyk C#...
>
LineRedirect TAPI 2.0
[*] Ing. Miroslav Ondrisek <ondrisek(zv)seznam(tec)cz> - 2.6.2003 09:50:10
Ja bych rekl, ze by to predevsim mela podporovat ta ustredna... Jsi si tim
jisty, ze to umi???? A ten COM mas pripojen k nejakemu modemu nebo primo k
ustredne?
> -----Original Message-----
> Subject: LineRedirect TAPI 2.0
>
>
> Do prkeny vohrady a zelenyho hradku, nevite nekdo
> jak presmeruji vybranny hovor na tel.ustredne?
> Zkousel jsem vsechno a furt nic....nejde a nejde
> presmerovat, Pouzil jsem LineRedirect,nasel jsem
> si i LineAccept kdyz tuhle fci pustim melo by to
> chodit,ale bohuzel...nemate nekdo ukazku nebo
> napad jak na to?
OT: Visual Studio .NET - trial verze
[*] Eichler Marek <Marek.Eichler(zv)access-it(tec)cz> - 02.6.2003 09:55:57
Zdravim,
>>> delphi(zv)corexpert.com 06/01 9:19 odp. >>>
>Zdravim,
>da se u nas (treba u nejakeho distributora) objednat trial verze
%subj%?
>Nasel jsem jen moznost objednani odnekud z Ameriky za $. Chtel bych
si
>vyzkouset hlavne o cem je jazyk C#...
No jestli ti jde pouze o vyzkouseni jazyka C# a netrvas na VS.NET, tak
si stahni Framework SDK a nejake free vyvojove prostredi (napr.
SharpDevelop http://www.icsharpcode.net/OpenSource/SD/ )
>Jakub Dusek
S pozdravem Marek Eichler
Inkrementalne nacitavanie XML dat
[*] delphin <delphinPP(zv)seznam(tec)cz> - 2.6.2003 09:37:44
> > ..pouzivam XMLTransformProvider, aby som XML data mohol mat ako
> > ClientDataSet...pri malom objeme dat a malej zlozitosti XML to je vcelku
OK,
>
> TClientDataSet umi ukladat data primo v XML, transformace je nutna jen v
> priade, ze jsou treba data v jinem formatu nez DATAPACKET.
>
> Petr Vones
>
..teraz mi nejde o ukladanie dat do XML, ale o ReadOnly pristup na XML data
cez ClientDataSet... takze pokial viem, tak v tom pripade potrebujem pre
XMLTransformProvider.TransformRead TransformationFile, alebo sa mylim?Zobrazenie HTML zo StringListu
[*] <vito(zv)centrum(tec)cz> - 02.6.2003 09:16:41
Achojte lidi,
neviete niekto, ako mozem zobrazit HTML kod, ktory mam v StringListe
(alebo v premennej string)? mam tam konkretne HTML tabulku a
potreboval by som ju zobrazit bez toho, aby som tu tabulku ukladal do
suboru a potom zobrazoval cez TWebBrowser. Prave v tejto komponente
to potrebujem zobrazit. Alebo je ina cesta ako dosiahnut tento
vysledok?
Diky
Vito
D5 Ent., W2K
ADO komponenty
[*] Posp�il Jan <J.Pospisil(zv)Aquasoft(tec)cz> - 2.6.2003 08:41:53
Ahoj,
potreboval bych poradit nejake FREE ADO komponenty ktere by behali s =
MSSQL2000 a byli co nejrychlejsi. A samozrejme nepotrebovali BDE. D=EDk
S pozdravem Honza
Chyba v D6 - svazane COM (Was: OT Vyvojove nastroj
[*] Zbysek Hlinka <hlinka(zv)hlinka(tec)cz> - 02.6.2003 08:46:44
On 2 Jun 2003 at 8:26, Karel Klimes wrote:
> > Ja jsem narazil na chybu, ktera ve svem dusledku znemoznuje
> > porgramovani
> urciteho druhu aplikaci -
> > konkretne programovani projektu s vice svazanymi COM objekty v D6 a
> > D7. Tato chyba je natolik tristni, ze me odradila od Delphi a
> > prinutila me prejit rychleji na C#
>
> Mohl bys byt konkretnejsi? Ja v D6 hodne pracuju s COM a nerad bych se
> dostal do problemu.
Uz jsem to tu psal mnohokrat. Mam otevreny projekt s vice COM. Kdyz
chci ladit, pustim program, a krokuji uvnitr objektu. OK. Najdu chybu
v nejakem objektu, opravim, prekompiluji, a s dalsim krokovanim jsem
v p.... Nezbyva nez zavrit Delphi, otevrit, a krokovat az do dalsi
opravy. Malem jsem z toho vyplesatel. :-)
> IMHO tento vykend sem se rozhodl zacit se C#. Shanim tutorialy,
> navody, tipy & triky - v CZ, v EN se ucim o mnoho pomaleji :( a pro VS
> .NET 2003. V patek jedu kupovat knizky :) - uz se nemuzu dockat:
Jestlize chces pracovat s vice objekty, ktere mohou byt roztrousene
po pocitaci nebo siti, nebo kvuli architekture aplikace, nebo i kvuli
nativnimu unicode, tak C# je vyborna volba. COM a Win32 Delphi zahod,
na .NET to nema.
> Pises, ze jsi presel na C#. Ale pokud sem to vse dobre pochopil, tak v
> C# NELZE udelat nativni Win32 aplikaci, tj. aby bezela na konkretnim
> PC MUSI tam byt .NET Framework SDK.
Ano, to musi.
> Bohuzel i dnes jeste existuji
> nektere spolecnosti, ktere pouzivaji W95 - prevazne vetsi "post
> socialisticke podniky", ktery by chtely implementovat IS postaveny na
> modernich technologiich, ALE klienti musi valit i na 486 s Win95.
V pohode, udelas pro ne HTML vystup. Zkousel jsem to na W95, a jde
to. Nesmis jim akorat posilat zadny vykonny kod, ten musi bezet na
necem, kde bezi .NET. Navic ti odpadne starost s instalacemi na
techto vykopavkach. Nebo se na ne vykasli, nejsou to perspektivni
zakaznici.
> Domnivam se tedy, ze v tomto pripade je nejlepsi zalozit IS na Web
> Forms a jako klienta pouzit "ultra tenkeho klienta" (tento pojem je
> ted in :) - prijde mne to jako cigarety PETRA ve verzi light, extra
> light, ultra light :))) ).
Nekourim, neznam. Kazdopadne s .NET mas daleko vic moznosti, o
kterych se ti v Delphi muze jen zdat. Troufam si tvrdit, ze az na
nejake vyjimky (prace s pointery, jeste chybi podpora nekterych
okrajovych funkci, ktere je nutno volat primo, pro neco bude treba
dopsat komponenty) napises v C# aplikaci efektivneji nez v Delphi.
Predpokladem ovsem je, ze zvladnes architekturu .NET stene jako
zvladas VCL.
> Muj nazor na vec:
> Spousta z Vas urcite (jako ja) uvazuje o rozsireni znalosti o C# a
> technologii .NET.
Ja myslim, ze bude povinnosti znat C# aspon pasivne. Protoze priklady
v MS dokumentaci budou psane prevazne v C#.
S pozdravem
Zbysek Hlinka
COM objekty a transakce
[*] Libor Filip <filip(zv)agrokonzulta(tec)cz> - 2.6.2003 08:51:56
Ahoj,
potrebuji poradit s nasledujicim problemem.
Mame aplikaci, ktera pouziva vice COM knihoven. Kazda
z techto knihoven potrebuje pripojeni na databazi a provadet
transakce. Transakce muze byt i pres vice COMu. Nyni mame
napsanou transakci komponentu (jeden connect rizeni transakci),
ktera pracuje spolehlive, ale projekty musi byt prelozeny s balicky.
V pripade, ze bychom chteli postupne prechazet na jiny programovaci jazyk
a postupne prepisovat COM knihovny, je nejaka moznost, jak ridit transakce?
Zatim chci opominout MTS.
Dekuji za vsechny napady, jak to resit.
Libor
Chyba v D6 - svazane COM (Was: OT Vyvojove nastroj
[*] Karel Klimes <klimes(zv)unicontrols-tramex(tec)cz> - 2.6.2003 08:26:46
> Ja jsem narazil na chybu, ktera ve svem dusledku znemoznuje porgramovan=
i
urciteho druhu aplikaci -=0D
> konkretne programovani projektu s vice svazanymi COM objekty v D6 a =0D
> D7. Tato chyba je natolik tristni, ze me odradila od Delphi a =0D
> prinutila me prejit rychleji na C# =0D
=0D
Mohl bys byt konkretnejsi? Ja v D6 hodne pracuju s COM a nerad bych se
dostal do problemu.=0D
=0D
IMHO tento vykend sem se rozhodl zacit se C#. Shanim tutorialy, navody, t=
ipy
& triky - v CZ, v EN se ucim o mnoho pomaleji :( a pro VS .NET 2003. V pa=
tek
jedu kupovat knizky :) - uz se nemuzu dockat:=0D
=0D
- Za=E8=EDn=E1me programovat v C#=0D
- Mysl=EDme v jazyku C#=0D
- =DAvod do .NET Framework=0D
=0D
Pises, ze jsi presel na C#. Ale pokud sem to vse dobre pochopil, tak v C#
NELZE udelat nativni Win32 aplikaci, tj. aby bezela na konkretnim PC MUSI
tam byt .NET Framework SDK.=0D
Bohuzel i dnes jeste existuji nektere spolecnosti, ktere pouzivaji W95 -
prevazne vetsi "post socialisticke podniky", ktery by chtely implementova=
t
IS postaveny na modernich technologiich, ALE klienti musi valit i na 486 =
s
Win95. Domnivam se tedy, ze v tomto pripade je nejlepsi zalozit IS na Web
Forms a jako klienta pouzit "ultra tenkeho klienta" (tento pojem je ted i=
n
:) - prijde mne to jako cigarety PETRA ve verzi light, extra light, ultra
light :))) ).=0D
=0D
Muj nazor na vec:=0D
Spousta z Vas urcite (jako ja) uvazuje o rozsireni znalosti o C# a
technologii .NET. Osobne si myslim, ze vsem "laickym" kritikum M$ brzo
spadne hrebinek, protoze to co ted mame pred sebou je rozjizdejici se vla=
k a
at uz je M$ takovej nebo makovej, kdyz nenaskocite ted, uz se Vam to nemu=
si
podarit nebo muzete skoncit az hodne zadnim vagone. A verte, ze to bude
poradne NARVANEJ vlak. Prodrat se potom dopredu Vam da hodne prace a kdov=
i
jestli se Vam to povede!!! Takze schladte hlavu a vzhuru do toho.=0D
=0D
=0D
S pozdravem=0D
=0D
Karel Klimes
Unicode komponenty
[*] Zbysek Hlinka <hlinka(zv)hlinka(tec)cz> - 02.6.2003 08:30:37
On 2 Jun 2003 at 7:56, Lebeda David wrote:
> > To jako ze napisou Nazdar Vlado = Zdravstuj Voloda najednou do
> > jednoho editu ? Hmm tak to jsem tedy "neumel"
> >
> > No nicmeme s UNICODE byly tehdy takove problemy, ze jsem to docela
> > zavrhnul.
>
> Ja vim, ze s Unicode komponentami tady trosku riskuju, ale nemam jinou
> moznost. V danem pripade nejde o to, ze by uzivatele neco do editu
> psali castecne v azbuce a latince. Vec se ma tak. Resena aplikace je
> cenik jistych vyrobku. V anglicky mluvenych zemich se vyrobek jmenu
> treba "Ozubene kolo PLX5". V Rusku to ale bude (preklad si vymyslim)
> "Ozubenoje koljeso PLX5", pricemz to PLX5 zustane psano latinkou,
> ostatni je azbukou.
Spravnou praci s unicode jsem resil pro Lokalizator. Jak editovani,
tak zobrazovani. Editor jsem si nekde stahnul a upravil pro sve
potreby, je odvozen od RichEdit. Na W2000, XP to jde, na W9x s tim
mohou byt problemy. Grid jsem si napsal svuj, na W2000, XP to jde
dobre, na W9x je s tim docela opruz. Obe komponenty jsou prilepene k
OLE DB komponentam, ty jsou vsak napsany tak, aby vyhovovaly mym
potrebam, a dal je uz rozvijet nebudu - nemam proc. Kazdopadne psat
korektni unicode v Delphi je takova pakarna, ze se vyplati naucit se
.NET a napsat to v nem. Casove i financne to vyjde lepe nez ohybat
Delphi na unicode. Takze jestli nemas mit jinou moznost, tak ti
nezbyva nez .NET (ale pozor, v ZADNEM PRIPADE VCL.NET!!!!!!).
Zakazniky s W95 odepis, pokud nemaji na upgrade, nebudou mit ani tvuj
soft.
S pozdravem
Zbysek Hlinka
Unicode komponenty
[*] Lebeda David <david.lebeda(zv)comarr(tec)cz> - 02.6.2003 07:56:38
> > Pro soucasnou existenci latinky a azbuky i v jednom editacnim
> > prvku jsem stahl sadu unicode komponent
>
> To jako ze napisou Nazdar Vlado =3D Zdravstuj Voloda najednou do jednoho
> editu ? Hmm tak to jsem tedy "neumel"
>
> No nicmeme s UNICODE byly tehdy takove problemy, ze jsem to docela
> zavrhnul.
Ja vim, ze s Unicode komponentami tady trosku riskuju, ale nemam jinou moz=
nost.
V danem pripade nejde o to, ze by uzivatele neco do editu psali castecne v=
azbuce a
latince. Vec se ma tak. Resena aplikace je cenik jistych vyrobku. V anglic=
ky
mluvenych zemich se vyrobek jmenu treba "Ozubene kolo PLX5". V Rusku to al=
e
bude (preklad si vymyslim) "Ozubenoje koljeso PLX5", pricemz to PLX5 zusta=
ne
psano latinkou, ostatni je azbukou. Tato data budou sou=E8=E1st=ED dod=E1v=
ky. U=BEivatel je
nebude zad=E1vat, i kdy=BE pro vyhled=E1v=E1n=ED mo=BEn=E1 ano, ale mus=ED=
se to spr=E1vn=EC zobrazit
pri prohl=ED=BEen=ED v DBGridu apod. O Exportu do Excelu ani nemluvim. To =
bude dalsi
vec. Dosud jsem exporty do Excelu resil SYLK formatem. Vyborne vysledky, s=
lusna
rychlost. Ovsem jestli to pujde v unicode.... tipnu si ze ne, protoze jde =
o stary textovy
format... To same Sinea (musim zjistit) - ani ta asi Unicode nebude umet
podporovat.
David Lebeda
StringGrid
[*] Lebeda David <david.lebeda(zv)comarr(tec)cz> - 02.6.2003 07:39:24
> a este mam dotaz, ze preco, ked instalujem nejaku componentu, mi
> takmer vzdy pri kompilacii hodi "File not found..." napriklad v
> riadku: "GridView_prop in '..\source\GridView_prop.pas';" i napriek
> tomu, ze ten subor tam je a nastavil som aj adresar v Environment
> Options->Library directory. dik
No a jak to teda vyresis, aby se ti to povedlo prelozit? Obecne me
napada toto:
1) V menu Tools - Environment Options - Library - Library Path je
cesta uvedena s preklepem ci tam vubec neni (pises, ze je, ale pro
jistotu....)
2) Mozna mas nektere soubory z te komponenty (napr. dcu) jeste v
jinem adresari, ktery je prohledavan driv
3) Podivej se do menu Project - Options - Directories, jestli tam
nemas nejaky problem (v rade pripadu by to mely byt cesty prazdne)
4) Mas od dane komponenty i zdrojak ve forme pas souboru?
David Lebeda
firebird: sietove prostredie v praxi
[*] Lebeda David <david.lebeda(zv)comarr(tec)cz> - 02.6.2003 07:19:51
> Ak si uzivatel vkladanie zaznamu rozmysli a zavola "Cancel" ,TAK
> GENERATOR SA ZVYSI TAK CI TAK ...
Ahoj,
uzivatel by mel mit zobrazen editacni formular (zadne DBEdit apod., ale klasicke
edity apod.). Pokud stiskne Cancel, nestane se nic, form se jen zavre. Pokud stiskne
OK, zahaji se transakce, sestavis insert prikaz(y) a provedes to. Pritom ID si nechas
vygenerovat bud v before insert triggeru automaticky, nebo si ho vyzadas ze serveru
napr. ulozenou procedurou ci selektikem, pokud ho chces vedet, v kazdem pripade ti
ID vznikne az tesne pred zapisem. Vygenerovane cislo tak zustane nepouzite jen v
pripade, ze se zapis nepodari z duvodu na strane serveru (poruseni referencni
integrity, problem v triggerech apod., zkratka kdyz zapis neprojde).
> formular resp. tabulku na ktoru navazuje (relacia 1:N) x tabuliek.
> Uzivatel vlozi zaznam do MASTER tabulky, v pohode mozem transakciu
> zrusit v pripade ak si to rozmysli - zavola "cancel" (GENERATOR JE
> INCREMENTOVANY) ale spravidla je to formular, kde je este kopec inych
> "podformularov" resp. detail tabuliek, pre vytvorenie ktorych
> potrebujem ID z Master tabulky
Tady bys mel popsat, jak to myslis.
1) Muzes vytvorit v ramci jednoho formu a jeho podformuu data pro master i jeho
detaily. Pak na tlacitko Ulozit se vse zapise do databaze v jedne transakci (master i
detaily) a neni problem.
2) Nebo vytvoris master a ten das ulozit do databaze. Pak uzivatel muze a nemusi
jiz zcela samostatne manipulovat s detaily. To ale asi neni ten zminovany pripad,
ze?
Mimochodem, pres jake komponenty k FB pristupujes?
David Lebeda
Unicode komponenty
[*] Ludek ZITA <konference(zv)sales(tec)cz> - 2.6.2003 00:23:17
----- Original Message -----
From: "Lebeda David" <david.lebeda(zv)comarr(tec)cz>
> potrebuji vytvorit aplikaci, ve ktere bude axistovat soucasne latinka
> a azbuka. Aplikace ma bezet na ruskych i anglickych Windows.
Ahoj.
Pred lety jsem v D4 psal neco podobneho pro W95.
Cesta pres UNICODE se neosvedcila a tak to vse bylo o jednom fontu, ktery ma
oba rezy (tenkrat vyhovel Arial) a
promaknutem systemu kdy v kazdem okamziku bylo jasne ktery Edit ci Label ma
zobrazovat azbuku a ktery cestinu a
nad kazdym formem byla konstrukce stylu (Components[i] as
TEdit)..Font.Charset := xxx (RUSSIAN_CHARSET nebo EASTEUROPE_CHARSET).
Dale byla vzdy pri zmene focusu prepnuta automaticky klavesnice podle
aktualniho Editu.
Databaze byla pres kalsicke DBAware komponenty (bylo to klasicke BDE a
paradox) a byl v ni jeste vzdy udaj o jazyku, pripadne byly udaje ve dvou
polich (vlastne ve trech protoze to musel umet i anglicky) a na
Dataset.Field v udalosti OnGetText se podle potreby bud predaval udaj
cesky,rusky nebo anglicky, pripadne (pokud bylo jen jedine pole, ktere psali
bud tak nebo onak tak se nastavoval charset podle udaje o language z
databaze)
Docela jsem si ovsem uzil s vyhledavanim ::))
Ale cele to fungovalo docela slusne.
> Pro soucasnou existenci latinky a azbuky i v jednom editacnim
> prvku jsem stahl sadu unicode komponent
To jako ze napisou Nazdar Vlado = Zdravstuj Voloda najednou do jednoho editu
?
Hmm tak to jsem tedy "neumel"
No nicmeme s UNICODE byly tehdy takove problemy, ze jsem to docela zavrhnul.
Ludek
firebird: sietove prostredie v praxi
[*] Pavel Cisar <pcb(zv)atlas(tec)cz> - 1.6.2003 22:00:39
Haj hou!
On 1 Jun 2003 at 10:44, radeq wrote:
> Ako riesite v praxi vztach MASTER-DETAIL nad Firebird ?
> Mam na mysli fazu vkladania zaznamu do master a hned do detail a
> napriklad nasledny "rollback" obidvoch vkladani.
> Naozaj musi existovat fyzicky zaznam v MASTER aby som mohol k nemu
> vytvarat DETAIL, neda sa to nejako zabalit do jednej transakcie?
pokud to neni nutne z jinych duvodu, lze ID master tabulky ziskat az tesne pred
ulozenim. Operace ulozeni je samozrejme nutne delat v jedine transakci, kdy je
ulozen master zaznam a nasledne zaznamy z podrizenych tabulek. Poradi je
zavazne pouze pokud je definovana referencni integrita. Kdyz neco selze, udela
se rollback.
S pozdravem
Pavel Cisar
Mobil: 724 281429
http://www.ibphoenix(tec)cz
Vse co potrebujete pro Firebird a InterBase
Re[2]: firebird: sietove prostredie v praxi
[*] Ing. Marek Kocan <kocan(zv)ebchod(tec)cz> - 1.6.2003 17:29:49
Nechci sice souhlasit s tvrzenim o duplicite unikatnich zaznamu apod,
nicmene v praxi se velmi castou pouzivaji castecne nenormalizovana reseni.
At jiz z duvodu nevedomeho ci vedomeho. Vedome duvody mohou byt napriklad
vyssi vykon, jednodussi sprava apod... Zjednodusene receno nelze nikdy rict,
ze je to spravne ci spatne. Proste jde o to, co chceme z databazove aplikace
ziskat (obecne z jakekoli aplikace), kolik na to mame penez, casu a hlave -
k cemu to ma slouzit. KER
> URCITE EXISTUJE RIESENIE, ktore je standardne a splna vsetky kriteria
> NORMOVANEJ DATABAZY ...
> Aj tak dakujem za postreh a dufam, ze este niekto prispeje troskou
> svojej praxe.Re[2]: firebird: sietove prostredie v praxi
[*] radeq <radeq(zv)centrum.sk> - 01.6.2003 17:01:40
> Podla mojich skusenosti pri praktickej prevadzke ktorejkolvek databazy
> skor-neskor aj tak dojde k naruseniu referencnej integrity. Preto uz
> od zaciatku predpokladam, ze ziadna integrita neexistuje. A datovy
> model aj programy s tym pocitaju. Ze moze existovat DETAIL bez
> MASTERA, ze vo fakture je odvolavka na adresu, ktora v adresari neni,
> ze 'unikatne' ID ma niekolko zaznamov atd.
Podla mna to zalezi IBA na TEBE ako na vyvojarovi ci to dovolis alebo
nie....prave preto sa chcem tomu vyhnut a dodrziavat iste standardy
praxou overene - nemyslim si vsak, ze Tvoje riesenie je spravne.
A to uz vobec nesuhlasim s tvrdenim : "...ze 'unikatne' ID ma niekolko
zaznamov atd"
URCITE EXISTUJE RIESENIE, ktore je standardne a splna vsetky kriteria
NORMOVANEJ DATABAZY ...
Aj tak dakujem za postreh a dufam, ze este niekto prispeje troskou
svojej praxe.
radeq
OT Vyvojove nastroje
[*] Petr Zahradnik <clexpert(zv)clexpert(tec)cz> - 1.6.2003 15:32:28
Puvodni zprava ze dne 31.5.2003:
> produkty znacne predrazuje a pak je schopna dat do novin reklamu na OEM
> produkty (za pomerne dobrou cenu, odpovidajici skutecne cene), ale taktne
A kdo jako urcuje, co je skutecna cena?
> pomlci o tom, ze na tyto produkty nedela podporu (to ma delat prodavajici,
> ktery vsak kvalitu nemuze nijak ovlivnit). Opravdu nejsme schopni se poucit
OEM produkty vzdy supportoval OEM partner. Na tom neni nic zvlastniho
a nic neznameho.
Petr Zahradnik, pocitacovy expert
==========================================================
Petr Zahradnik, Computer Laboratory
web: http://www.clexpert(tec)cz, e-mail: clexpert(zv)clexpert(tec)cz
==========================================================
StringGrid
[*] ing. Jan Fiala <jan.fiala(zv)wo(tec)cz> - 1.6.2003 15:15:08
1.6.2003 d0t:
> dobry den,
> mozte mi plz poradit, akym sposobom (ak je to mozne) mozem v klasickom
> StringGrid (or DrawGrid) v delphi7 spravit taku funkcionalitu, ze po
> kliknuti na prislusni riadok sa selectne cely riadok i pokial pozostava z
> viac buniek? defaultne sa totiz oznaci len prislusna bunka. pripadne nejaku
> componentu kt. to podporuje.
V StringGrid.Options si nastav RowSelect na True
--
Jan Fiala
mailto:jan.fiala(zv)wo(tec)cz
OT Vyvojove nastroje
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 1.6.2003 14:51:22
From: "Miroslav Vopaleck�" <m.vopalecky(zv)worldonline(tec)cz>
> problem odstranit. Oznamil jsem jej na hotline MS, jen jsem chtel poradit
> jak na dlouhe soubory u kterych mi oprava nesla udelat. Na hotline me
> ubezpecili, ze v dalsi verzi bude chyba odtranena. Tak jsem si naivne koupil
> MS Office XP a kdyz jsem zjistil, ze chyba pretrvava, tak jsem se rozhodl
V Delphi vim minimalne o padesati chybach, ktere jsou presne popsane a nikdo
je nikdy neopravil (a patrne uz ani neopravi).
> Opravdu si myslite, ze se MS zmeni ze dne na den? Pravda je ta, ze MS sve
Neni treba nic menit. Za poslednich par let dokazal ze je schopen produkovat
kvalitni (Windows 2000) a technologicky pokrokove veci (.NET a C#). Borland
naproti tomu pouze oprasuje Delphi, plni jej dalsimi 3rd party komponentami a
neobtezuje se s opravami chyb.
> produkty znacne predrazuje a pak je schopna dat do novin reklamu na OEM
> produkty (za pomerne dobrou cenu, odpovidajici skutecne cene), ale taktne
> pomlci o tom, ze na tyto produkty nedela podporu (to ma delat prodavajici,
Staci si jen precist licenci. MS nikdy nemel podporu na OEM produkty, to je
vec znama uz nejmene 7 let.
> Doufam, ze mi nechcete naznacit ze jsem investoval do programu, ktery jiz
> nebude podporovan a prejde se na produkty MS?
Bohuzel to asi tak dopadne. Borland uz totiz neni technologicka firma ...
Petr Vones
OT Vyvojove nastroje
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 1.6.2003 14:53:50
From: "ing. Jan Fiala" <jan.fiala(zv)wo(tec)cz>
> Cela tato diskuze je o tom, ze posledni prichazejici verze Delhi
> neprinasi dost velke novinky, jako tomu bylo drive.
Nejen to, Borland jiz take nijak nespecha s opravami chyb. Napriklad na Delphi
7 ani po vice jak osmi mesicich neni zadny Update Pack a pokud vim, ani se na
zadnem nepracuje. Neznamena to, ze by snad nebylo co opravovat :-)
> A misto toho, aby Borland poskytl vyvojarum v Delphi cisty .NET,
> vytvari paskvil, ktery bude do .NET linkovat stavajici VCL. Takze
Ne "misto toho". Borland pracuje na skutecnem Delphi.NET, ale k tomu jeste
vytvoril ten VCL.NET paskvil a tvrdi vyvojarum, ze je to (take) cesta k .NETu
coz je zrudne. Proste zadna jina cesta nez zacit od zacatku neexistuje. Podle
me jde spise o marketingovy tah Borlandu s jeho mantrou "zpetne kompatibility"
ktera ho ale spise brzdi a v tomto pripade dokonce zavadi vyvojare na slepou
kolej.
Je nutne si uvedomit za jakych podminek probiha vyvoj u Borlandu. Pokud si
nekdo predstavuje stovky lidi pracujici na pouze jednom projektu tak je na
omylu. Ten tym koluje po vsech RAD projektech, takze i vyvoj takoveho nesmyslu
jako VCL.NET stoji zbytecny cas. Proti puvodnim predpokladum je Delphi.NET uz
zpozdene a pry bude snad az koncem roku.
Petr Vones
Migracia projektu z D7 do Kylix2
[*] petuga(zv)nextra.sk - 1.6.2003 14:24:33
Zdravim,
existuje kompatibilita medzi Delphi(7) a Kylix2, nakolko by som potreboval
premigrovat svoj project, kt. vyvijam pod Win v Delphi7 na Linux do Kylix-u.
Dakujem
d0t
StringGrid
[*] d0t <petuga(zv)nextra.sk> - 1.6.2003 14:04:04
dobry den,
mozte mi plz poradit, akym sposobom (ak je to mozne) mozem v klasickom
StringGrid (or DrawGrid) v delphi7 spravit taku funkcionalitu, ze po
kliknuti na prislusni riadok sa selectne cely riadok i pokial pozostava z
viac buniek? defaultne sa totiz oznaci len prislusna bunka. pripadne nejaku
componentu kt. to podporuje.
a este mam dotaz, ze preco, ked instalujem nejaku componentu, mi takmer vzdy
pri kompilacii hodi "File not found..." napriklad v riadku: "GridView_prop
in '..\source\GridView_prop.pas';" i napriek tomu, ze ten subor tam je a
nastavil som aj adresar v Environment Options->Library directory. dik
d0t
firebird: sietove prostredie v praxi
[*] Viliam Mlich <mlich1(zv)volny(tec)cz> - 1.6.2003 11:26:44
>> Neprideluj ID na zaciatku vytvarania dokumentu,
>> ale az ked je vsetko hotove.
> Ak si uzivatel vkladanie zaznamu rozmysli a zavola
> "Cancel" ,TAK GENERATOR SA ZVYSI TAK CI TAK ...
Vsak hovorim, ze do databazy to mas pisat (a generovat ID zaznamu) az
vtedy, ked namiesto Cancel da Ulozit.
> Ako riesite v praxi vztach MASTER-DETAIL nad Firebird ?
Podla mojich skusenosti pri praktickej prevadzke ktorejkolvek databazy
skor-neskor aj tak dojde k naruseniu referencnej integrity. Preto uz
od zaciatku predpokladam, ze ziadna integrita neexistuje. A datovy
model aj programy s tym pocitaju. Ze moze existovat DETAIL bez
MASTERA, ze vo fakture je odvolavka na adresu, ktora v adresari neni,
ze 'unikatne' ID ma niekolko zaznamov atd.
bye
vmlich
Aplikacna vrstva nad Firebird
[*] radeq <radeq(zv)centrum.sk> - 01.6.2003 10:54:20
Dobr� den,
mam aplikaciu Client/Server - (klient je Win, Firebird Win/Linux)
Potrebujem vsak denne (aj 10krat!!) importovat nejake data z ineho
systemu (DBF tabulky, XLS a pod).
Samozrejme na strane klienta to ide spravit velmi jednoducho, ale
rad by som to spravil trosku sikovnejsie.
T.j. vytvorit nejaku aplikacnu vrstvu, nejaky exe subor, ktory bude
spusteny na strane Firebird servera a bude "cakat na rozkazy".
Predstava je pekna, ale neviem s tym pohnut, resp. neviem sa ubrat
spravnym smerom.
Chcem aby ta aplikacna vrstva bola naprogramovana 1x a mohla bezat aj
na Linuxe alebo na Windowse - podobne ako to ma riesene ABRA G3.
Takze asi Delphi a Kylix s pouzitim CLX ...ok?
Ako vyriesit komunikaciu medzi Klientom (Win) a aplikacnou vrstvou
(Win/Linux) ? Sockety ? Komponenty INDY? Alebo ake ? Najlepsie ak by
boli OpenSource ...
Ake pouzivate komponenty alebo nastroje pre porgramovanie aplikacnej
vrstvy ktora by mala bezat na Linuxe aj na Windowse (OpenSource)?
Dakujem.
radeq
firebird: sietove prostredie v praxi
[*] radeq <radeq(zv)centrum.sk> - 01.6.2003 10:44:21
>Normalne diery nie su na zavadu, ID zaznamu sluzi len pre jednoznacne
>urcenie tohoto a ziadneho ineho zaznamu. To je interny problem
>implementacie a zakaznik nema co do toho kecat. Neprideluj ID na
>zaciatku vytvarania dokumentu, ale az ked je vsetko hotove.
Ak si uzivatel vkladanie zaznamu rozmysli a zavola "Cancel" ,TAK GENERATOR SA ZVYSI TAK CI TAK ...
Jasne, ale predstav si, ze mas formular resp. tabulku na ktoru
navazuje (relacia 1:N) x tabuliek.
Uzivatel vlozi zaznam do MASTER tabulky, v pohode mozem transakciu
zrusit v pripade ak si to rozmysli - zavola "cancel" (GENERATOR JE INCREMENTOVANY)
ale spravidla je to formular, kde je este kopec inych
"podformularov" resp. detail tabuliek, pre vytvorenie ktorych
potrebujem ID z Master tabulky, takze musim ulozit v master tabulke
prave vkladany zaznam uz hned na zaciatku, aby som mohol vytvarat
zaznamy v tych detail tabulkach.
Ako riesite v praxi vztach MASTER-DETAIL nad Firebird ?
Mam na mysli fazu vkladania zaznamu do master a hned do detail a
napriklad nasledny "rollback" obidvoch vkladani.
Naozaj musi existovat fyzicky zaznam v MASTER aby som mohol k nemu
vytvarat DETAIL, neda sa to nejako zabalit do jednej transakcie?
Dakujem
radeq
Tisk vstupenek
[*] Pavel Zichovsky <zichovsky(zv)trul(tec)cz> - 01.6.2003 10:17:40
Zdravim,
On 31 May 2003 at 21:39, Pavel Kastner wrote:
> Nicm=E9n=EC v =E8em je probl=E9m: Vstupenky se pod=E1vaj=ED na perforova=
n=E9m
> p=E1su traktorem a kdy=BE p=F8ejede p=E1t=E1 vstupenka (analogie s A4) p=
rost=EC to
> odstr=E1nkuje - nastaven=ED tisk=E1rny na podava=E8 traktor nepom=E1h=E1=
. Zkou=B9el
> jsem i nastaven=ED velikosti str=E1nky pomoci WinAPI - nejprve str=E1nk=
u
> jako rozm=ECr l=EDstku a pot=E9 na nakone=E8n=EC dlouhou str=E1nku, ale =
v=FDsledek
> byl v=BEdy stejn=FD.
Problem muze byt primo v tiskarne. Zkuste zkontrolovat jeji interni nastav=
eni
(podle manualu - bud prepinace na ni, nebo jiny postup) zda neni zapnuto
neco jako "Skip over perforation", jaka je nastavena delka stranky apod. T=
yto
vnitrni nastaveni tiskarny vetsinou "zvenku" neovlivnis. U nekterych tiska=
ren to
sice jde pomoci tzv. ESC sekvenci, ale vzdy zalezi na konkretnim typu.
S pozdravem
Pavel =AEichovsk=FD (zichovsky(zv)trul(tec)cz)
OT Vyvojove nastroje
[*] Zbysek Hlinka <hlinka(zv)hlinka(tec)cz> - 01.6.2003 08:41:14
On 31 May 2003 at 21:45, Miroslav Vopaleck� wrote:
> Oznamil jsem jej na hotline MS,
> jen jsem chtel poradit jak na dlouhe soubory u kterych mi oprava nesla
> udelat. Na hotline me ubezpecili, ze v dalsi verzi bude chyba
> odtranena. Tak jsem si naivne koupil MS Office XP a kdyz jsem zjistil,
> ze chyba pretrvava, tak jsem se rozhodl pro jiny nastroj a po dlouhem
> hledani jsem vybral Delphi.
A myslis, ze sis pomohl? Chces vyjmenovat dlouhy seznam chyb, ktere
se v Delphi tahnou pres radu verzi? Ja jsem narazil na chybu, ktera
ve svem dusledku znemoznuje porgramovani urciteho druhu aplikaci -
konkretne programovani projektu s vice svazanymi COM objekty v D6 a
D7. Tato chyba je natolik tristni, ze me odradila od Delphi a
prinutila me prejit rychleji na C# (a ted si rikam, chvala Bohu za to
:). Zasilani zprav o chybe Borlandum neprineslo ZADNOU odezvu,
natozpak opravu. A hlasil jsem to uz od D6 bety.
S pozdravem
Zbysek Hlinka
Vytvorenie kopie designtime DataSetu (aj s persist
[*] Jaroslav Popluh�r - 31.5.2003 14:07:16
Mam DataSet napr. IBQuery, v design time mam vytvorenych pre zadane
SQL vytvorenych niekolko persistent fieldov (v tych su nadefinovane rozne
property - hlavne DisplayLabel.)
V runtime by som si chcel tento DataSet skopirovat - ako novu
instanciu, vyhodit zbytocne perzistentne stlcpe (aj zo selectu)
potom ho otvorit a pripojit k nemu DBGrid.
--
Best regards,
Jaroslav mailto:delphi1(zv)acc.sk
Paleta nastroju do dvou radku
[*] rkonecny <rkonecny(zv)datis(tec)cz> - 17.6.2003 08:29:28
Ahoj,
GExperts to umoznuje.
Stahnou lze na www.gexperts.org.
Roman Konecny
-----Original Message-----
From: delphi-l-owner(zv)clexpert(tec)cz [mailto:delphi-l-owner(zv)clexpert(tec)cz] On
Behalf Of Kadane Miroslav
Sent: Monday, June 16, 2003 12:13 PM
To: delphi-l(zv)clexpert(tec)cz
Subject: Paleta nastroju do dvou radku
Ahoj,
Nevite jestli jde paleta nastroju (ouska) dat do dvou nebo tri radku?
Mam Delphi 7pro
Dik Mirek
OT TEST
[*] Milan Tomes <milan.tomes(zv)haida(tec)cz> - 17.6.2003 07:38:20
Abych se priznal, tak v praci jsem si ten proces absolvoval cely z CD ale
strach jsem nezaznamenal. Jedine co jsem zaznamenal bylo neskutecne dlouhe
cekani. Doma jsem to vyresil tak, ze jsem si vsechna CD stahnul na disk a
instaloval jsem to z disku. Rychlost byla asi tak 4x vyssi, takze kdyz to
spocitam, tak jsem na tom i s tim stahovanim vydelal asi tak pul hodiny
:))))))
S pozdravem
Milan Tomes
mailto:milan.tomes(zv)haida(tec)cz
> [mailto:delphi-l-owner(zv)clexpert(tec)cz]On Behalf Of Ludek ZITA
>
> ----- Original Message -----
> From: "Petr Vones" <pvones(zv)mbox.vol(tec)cz>
>
> > > Pri instalaci .NET jsem mel uprimny strach o CD mechaniku a mel jsem
> pocit
> > > ze se hlava nutne musi stalym vystavovanim do krajnich poloh utrhnout.
> >
> > Nic takoveho jsem nezaznamel (Visual C# Standard) a to i pres to ze mam
> > nechvalne znamy IBM 75GXP disk z Madarska, ktery uz mel vadne
> sektory :-)
> >
> > Petr Vones
>
> No ja mel na mysli mechaniku CD ne disk. Tam mi to prislo , ze pro nazev
> kazdeho souboru se mrkne nekam na zacatek CD a pak si jde pro
> data na konec
> a porad dokola a jako by to vubec nebralo v uvahu cashe. Fakticky jsem se
> strachoval jestli behem te hodinove instlace CD mechanika neodejde do
> vecnych lovist.
>
> Ludek
SimpleMAPI Pegasu
[*] Lebeda David <david.lebeda(zv)comarr(tec)cz> - 17.6.2003 07:26:20
> > Hlaska, proti ktere bojuju, je v podstate jen kosmeticky problem -
> > neni to
> dulezite, ale
> > kdyby to slo...
>
> Ahoj.
> A dava Ti tu hlasku JCL nebo knihovna Pegasu ?
> Jestli JCL, tak to mas prece se zdrojakem ne ?
Prave ze hlasku dava knihovna Pegasu. Zdrojaky TJclEmail jsem samozrejme
prosel i ze studijnich duvodu, mimo jine jsem diky nim i nasel, co musim dopsat do
registru Windows, aby to fungovalo... ale to uz jsem psal drive.
Ale uz to neresme, oni si uzivatele zvyknou, zas takovy maler to neni :)
Diky
David Lebeda
Re[2]: Prohledavani binarky
[*] Miso Hlavac <hlavki(zv)medium13.sk> - 17.6.2003 00:10:57
iJF> Nechapu, proc by to neslo. Zacnu porovnavat na pozici 1 (berme to od
iJF> 1.znaku). Zjistim, ze se mi to na 6.znaku lisi.
iJF> Zacal jsem na 1.znaku, takze prejdu k 2.znaku a zacinam znovu
iJF> hledat vyskyt prvniho hledaneho znaku, coz je 'a'.
iJF> To najdu na 5.pozici a pak uz mi zbytek sedi a mam vyskyt.
Ano ano, pravda, az na to, ze zlozitost tohto algoritmu je O(n.m)...
Ja som ten algoritmus pochopil este jednoduchsie...
Nuz ale kazdopadne sa to da spravit na O(n+m). Tento alg. spravili
taki traja ujovia... Mena uz neviem... :o) A nikto im moc neveril, ze
sa to da spravit takouto zlozitostou. Samozrejme az dokial to
nespravili...
no a da sa najst v tom dokumente co som uz pisal...
m.Prohledavani binarky
[*] ing. Jan Fiala <jan.fiala(zv)wo(tec)cz> - 16.6.2003 23:52:56
16.6.2003 Miso Hlavac:
iJF>> A co na tom chces slozite vymyslet ?
iJF>> Pro otevreni pouzijes treba TFileStream.
iJF>> Zacnes prochazet a pri prvnim shodnem znaku budes porovnavat dalsi
iJF>> znak. A az se to bude shodovat cele, mas vyskyt.
> nuz, tak toto asi nie :o)
> vyhladavanie vzorky v texte je sice O(n+m), ale urcite nie vdaka tomuto
> algoritmu... algoritmus je trosku zlozitejsi...
> nuz a ten si nespominam... skuska z toho je uz daleko... ale skusim
> pozriet...
> priklad, kde to nepojde:
> text: abcbabcbaa
> hladana vzorka: abcbaa
Nechapu, proc by to neslo. Zacnu porovnavat na pozici 1 (berme to od
1.znaku). Zjistim, ze se mi to na 6.znaku lisi.
Zacal jsem na 1.znaku, takze prejdu k 2.znaku a zacinam znovu
hledat vyskyt prvniho hledaneho znaku, coz je 'a'.
To najdu na 5.pozici a pak uz mi zbytek sedi a mam vyskyt.
--
Jan Fiala
mailto:jan.fiala(zv)wo(tec)cz
Ukladanie obrazkov do databazy
[*] Ing. Keder Vladimir <vkeder(zv)iol.sk> - 16.6.2003 23:40:56
> ukladat obrazky do databazy MS Access 2000. Jedna sa o obrazky
> vo formatoch gif, jpg alebo bmp.
Nasiel som sposob ako ulozit obrazok do databazy (1001 tipov a trikov pre
Delphi tip 522, 524), avsak vzdy mi to ulozi ako dlouha binarni data a MS
Access si z tym nevie poradit a zobrazit. On pozaduje aby to bol balicek
(package).
Poradi mi niekto kde je chyba ???
Vlado
Re[2]: Firebird/MS-SQL dbExpress alebo ADO
[*] Jaroslav Popluhar <delphi1(zv)acc.sk> - 16.6.2003 23:30:35
Hello Pavel,
Monday, June 16, 2003, 5:26:58 PM, you wrote:
PC> At uz se ve finale rozhodnete pro jakoukoliv knihovnu, doporucuji vytvorit vlastni
PC> nadstavbu pro databazovou obstrakci na urovni logicke struktury databaze nebo
PC> objektu, protoze vlastnosti a moznosti MSSQL a FB se hodne lisi, obzvlaste v
PC> ulozenych procedurach a spoustich. Co nety nepujde odizolovat na strane db,
PC> pujde zamaskovat v teto vrstve.
Co znamena nety?
Existuju nejake priklady takychto nadstavieb?
--
Best regards,
Jaroslav mailto:delphi1(zv)acc.sk
SimpleMAPI Pegasu
[*] Ludek ZITA <konference(zv)sales(tec)cz> - 16.6.2003 23:00:34
----- Original Message -----
From: "Lebeda David" <david.lebeda(zv)comarr(tec)cz>
> Hlaska, proti ktere bojuju, je v podstate jen kosmeticky problem - neni to
dulezite, ale
> kdyby to slo...
Ahoj.
A dava Ti tu hlasku JCL nebo knihovna Pegasu ?
Jestli JCL, tak to mas prece se zdrojakem ne ?
Ludek
OT TEST
[*] Ludek ZITA <konference(zv)sales(tec)cz> - 16.6.2003 23:06:34
----- Original Message -----
From: "Petr Vones" <pvones(zv)mbox.vol(tec)cz>
> > Pri instalaci .NET jsem mel uprimny strach o CD mechaniku a mel jsem
pocit
> > ze se hlava nutne musi stalym vystavovanim do krajnich poloh utrhnout.
>
> Nic takoveho jsem nezaznamel (Visual C# Standard) a to i pres to ze mam
> nechvalne znamy IBM 75GXP disk z Madarska, ktery uz mel vadne sektory :-)
>
> Petr Vones
Ahoj.
No ja mel na mysli mechaniku CD ne disk. Tam mi to prislo , ze pro nazev
kazdeho souboru se mrkne nekam na zacatek CD a pak si jde pro data na konec
a porad dokola a jako by to vubec nebralo v uvahu cashe. Fakticky jsem se
strachoval jestli behem te hodinove instlace CD mechanika neodejde do
vecnych lovist.
Ludek
Re[2]: Prohledavani binarky
[*] Miso Hlavac <hlavki(zv)medium13.sk> - 16.6.2003 22:24:32
takze ak by bol zaujem, tak algoritmus najdes na
http://www.edi.fmph.uniba.sk/pardubska/2MIFI.zip
na strane 38...
:o)))) vela stastia...
m.Re[2]: Prohledavani binarky
[*] Miso Hlavac <hlavki(zv)medium13.sk> - 16.6.2003 22:24:31
iJF> A co na tom chces slozite vymyslet ?
iJF> Pro otevreni pouzijes treba TFileStream.
iJF> Zacnes prochazet a pri prvnim shodnem znaku budes porovnavat dalsi
iJF> znak. A az se to bude shodovat cele, mas vyskyt.
nuz, tak toto asi nie :o)
vyhladavanie vzorky v texte je sice O(n+m), ale urcite nie vdaka tomuto
algoritmu... algoritmus je trosku zlozitejsi...
nuz a ten si nespominam... skuska z toho je uz daleko... ale skusim
pozriet...
priklad, kde to nepojde:
text: abcbabcbaa
hladana vzorka: abcbaa
m.Prohledavani binarky
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 16.6.2003 22:30:32
From: "ing. Jan Fiala" <jan.fiala(zv)wo(tec)cz>
> A co na tom chces slozite vymyslet ?
> Pro otevreni pouzijes treba TFileStream.
A jeste lepsi je pouzit mapovani souboru pokud to jeho velikost umoznuje a pak
s tim pracovat jako s linearnimi daty v pameti.
Petr Vones
Ulozenie ikony do databazy
[*] Ivan Dulgerov <idulgerov(zv)stonline.sk> - 16.6.2003 22:12:26
Zdravim
> > Pokusam sa urobit nasledujucu vec :
> >
> > 1. rekurzne prehladam disk
> > 2 .z urcitych vopred definovanych suborov
> > ziskam pomocou SHGetFileInfo Handle ikony
> > Az po tento bod je vsetko v pohode
> > 3.tuto ikonu potrebujem ulozit do databazy
> > A tu je problem.
> > Otazka : Neviete ako ulozim ikonu suboru do
> > databazy ?
>
> Ahoj,
> nepises v cem je presne problem, resp. jakou databazi pouzivas. Pokud
> pouzijes sloupec typu BLOB, nemel bys s tim mit problemy. Na tema
> ukladani/cteni obrazku z BLOBu je v archivu cela rada prikladu.
*Pouzivam RxMemoryData
* Ti:= TImage.Create(self);
SHGetFileInfo(PChar(Path+SR.Name), 0, FileInfo,
SizeOf(FileInfo),
SHGFI_ICON or SHGFI_LARGEICON);
Ti.Picture.Icon.Handle :=FileInfo.hIcon;
ked skusim :
RxMemoryData1.FieldByName('Icon').AsVariant:=Ti.Picture.Icon;
Vyhodi chybu : incompatible types Variant and TIcon
ked skusim :
(RxMemoryData1.FieldByName('Icon') as
TBlobField).Assign(Ti.Picture.Icon);
vyhodi : cannot assign TIcon to a TBlobField
Ps. riesenie bude asi je to jednoduche, ale nejako mi to nepali a nepali
.... :-))
S pozdravom
Ivan Dulgerov
J.Straku 12
969 00 Banska Stiavnica
SLOVAK REPUBLIC
tel : 00421 - 045/6920428
Ulozenie ikony do databazy
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 16.6.2003 22:18:26
From: "Ivan Dulgerov" <idulgerov(zv)stonline.sk>
> RxMemoryData1.FieldByName('Icon').AsVariant:=Ti.Picture.Icon;
> Vyhodi chybu : incompatible types Variant and TIcon
> ked skusim :
> (RxMemoryData1.FieldByName('Icon') as
> TBlobField).Assign(Ti.Picture.Icon);
> vyhodi : cannot assign TIcon to a TBlobField
Co to zkusit treba pres stream ?
Petr Vones
Re[2]: Prohledavani binarky
[*] Miso Hlavac <7hlavac(zv)nw.fmph.uniba.sk> - 16.6.2003 22:09:20
iJF> A co na tom chces slozite vymyslet ?
iJF> Pro otevreni pouzijes treba TFileStream.
iJF> Zacnes prochazet a pri prvnim shodnem znaku budes porovnavat dalsi
iJF> znak. A az se to bude shodovat cele, mas vyskyt.
nuz, tak toto asi nie :o)
vyhladavanie vzorky v texte je sice O(n+m), ale urcite nie vdaka tomuto
algoritmu... algoritmus je trosku zlozitejsi...
nuz a ten si nespominam... skuska z toho je uz daleko... ale skusim
pozriet...
priklad, kde to nepojde:
text: abcbabcbaa
hladana vzorka: abcbaa
m.Ukladanie obrazkov do databazy
[*] Ing. Keder Vladimir <vkeder(zv)iol.sk> - 16.6.2003 21:15:36
Ahoj
Potrebujem ukladat obrazky do databazy MS Access 2000. Jedna sa o obrazky
vo formatoch gif, jpg alebo bmp. Nie je problem ulozit cestu k suboru a
potom nacitavat obrazky ako jednotlivy subor na disku. Ja ich musim ulozit
do databazy. Pouzivam D7 a komponenty DAO. Priklad alebo odkaz na priklad by
bol najlepsi. Pozeral som aj archiv konferencie avsak nic co by ma mohlo
posunut vpred som nenasiel.
Vlado
Re[2]: Firebird/MS-SQL dbExpress alebo ADO
[*] Jaroslav Popluhar <delphi1(zv)acc.sk> - 16.6.2003 20:57:35
PC> dbExpress bude urcite pruznejsi, a mene narocny. Bohuzel nejsem schopen
PC> posoudit kvalitu ovladace pro MSSQL, takze to chce jeste udelat nejaky pruzkum
PC> v tomhle ohledu. Pro Firebird je vhodne pouzit DBX driver primo pro FB, ktery je
PC> ale komercni (ostatne OLE DB driver pro ADO je take komercni, takze by v tom
PC> nemel byt zasadni problem).
Je mozne pouzit dbExpress driver dodany pre IB?
Ak ano s akykmi obmedzeniami?Prohledavani binarky
[*] ing. Jan Fiala <jan.fiala(zv)wo(tec)cz> - 16.6.2003 20:36:29
16.6.2003 Vymazal Milan:
> Zdravim
> nemate nekdo algoritmus na prohledavani binarniho souboru. Potreboval
> bych vyhledat urcity retezec bytu v souboru napriklad podle 0345DE3344
> atd.
A co na tom chces slozite vymyslet ?
Pro otevreni pouzijes treba TFileStream.
Zacnes prochazet a pri prvnim shodnem znaku budes porovnavat dalsi
znak. A az se to bude shodovat cele, mas vyskyt.
--
Jan Fiala
mailto:jan.fiala(zv)wo(tec)cz
problem s COFF lib suborom
[*] lubos hubka <lhubka(zv)1tel(tec)cz> - 16.6.2003 17:32:58
Zdravim.
Potrebujem pouzit LIB subor povodne urobeny v MSVC6.0.
Na inete som nasiel postup:
1) konverzia z "noveho" formatu MSVC6.0
link /lib /convert <problemovysubor.lib.>
2) konverzia z COFF do OMF
coff2omf <problemovysubor.lib.> <novysubor.lib>
Kniznica sa da prilinkovat, akurat mi pri pouzity funkcie z nej vyhodi
chybovu hlasku:
Vstupni bod procedury <...> se nepodarilo v dynamicky propojovane knihovne
<xxx.DLL> nalezt.
A kompilovanie skonci zobrazenim ASM a registrov procesora.
Viem ze nie kazda LIB kniznica sa da prekonvertovat a moja otazka je ci sa
jedna presne o tento problem,
alebo konverzia je o.k. a mam tam nejaky iny problem?
A este mi nie je jasne preco to hlasi chybovu hlasku o dynamickej kniznici
a zobrazuje aj koncovku kniznice ako DLL, ked sa jedna o LIB kniznicu.
Vdaka.
Lubos.FB 1.0.x a WinXP, pripona GDB, - asi pro Pavla Cis
[*] Pavel Cisar <pcb(zv)atlas(tec)cz> - 16.6.2003 17:45:01
Haj hou!
On 16 Jun 2003 at 12:05, Sedlak Zdenek wrote:
> 1) V knize v kapitole 11.2 o pojmenovani databaze uvadis, ze mohou byt
> problemy s nazvem souboru (priponou) pokud server pobezi na WinXP (i ME).
> Prave se chystam instalovat server FB 1.0.3 na WinXP, u hlavniho db souboru
> pouziji vhodnou priponu (*.fdb), ale v knize uvadis, ze tato verze FB
> neumoznuje zmenu nazvu (pripony) bezpecnostni databaze. Prosim jaka
> konkretni nebezpeci z toho mohou plynout? A jak je resit pokud nastanou,
> eventualne jak jim predchazet?
Nebezpeci neni v tomto pripade vazne, protoze System restore provadi
zalohovani hlidanych souboru pri jejich zmene. Pokud se v bezpecnostni
databazi nemeni data (pridavaji uzivatele, meni hesla), tak se nic
nezalohuje. Navic je bezpecnostni databaze mala, takze to ani nezere
prostor a cas pri zalohovani. Problemem jsou pouze bezne databaze, ktere
se zpravidla hodne meni a mohou byt i dost velke.
> 2) Je nejaka moznost jak snadno prevest knihovny podpurnych funkci UDF z win
> do linuxu? Mam vlastni zdroje v Delphi, ale samozrejme produkuju DLL pro
> Win32. Prepokladam, ze pujde prelozit ty zdroje v Kylixu a vytvorit *.SO.
> Ale chci se optat neni-li i jina moznost?
Pokud maji byt UDF multiplatformni, je lepsi je psat v C nebo C++. Pokud
jsou v Delphi, daji se typicky bez problemu prenes na Intel Linux pomoci
Kylixu.
S pozdravem
Firebird/MS-SQL dbExpress alebo ADO
[*] Pavel Cisar <pcb(zv)atlas(tec)cz> - 16.6.2003 17:26:58
Haj hou!
On 13 Jun 2003 at 16:12, Jaroslav Popluhar wrote:
> Startujeme vyvoj DB aplikacie, ktora musi byt prevadzky-schopna
> na DB FireBird a MS-SQL 2000.
>
> Aby sme zmensili rozdiely na strane klienta, radi by sme pre pristup
> k DB pouzili ADO alebo dbExpress.
>
> Pre spravne rozhodnutie by som rad zvazil Vase skusenosti,
> rady a odporucania.
>
> Takze ADO alebo dbExpress?
dbExpress bude urcite pruznejsi, a mene narocny. Bohuzel nejsem schopen
posoudit kvalitu ovladace pro MSSQL, takze to chce jeste udelat nejaky pruzkum
v tomhle ohledu. Pro Firebird je vhodne pouzit DBX driver primo pro FB, ktery je
ale komercni (ostatne OLE DB driver pro ADO je take komercni, takze by v tom
nemel byt zasadni problem).
At uz se ve finale rozhodnete pro jakoukoliv knihovnu, doporucuji vytvorit vlastni
nadstavbu pro databazovou obstrakci na urovni logicke struktury databaze nebo
objektu, protoze vlastnosti a moznosti MSSQL a FB se hodne lisi, obzvlaste v
ulozenych procedurach a spoustich. Co nety nepujde odizolovat na strane db,
pujde zamaskovat v teto vrstve.
S pozdravem
Pavel Cisar
Mobil: 724 281429
http://www.ibphoenix(tec)cz
Vse co potrebujete pro Firebird a InterBase
Prohledavani binarky
[*] Vymazal Milan <vymazal.milan(zv)seznam(tec)cz> - 16.6.2003 16:08:50
Zdravim
nemate nekdo algoritmus na prohledavani binarniho souboru. Potreboval
bych vyhledat urcity retezec bytu v souboru napriklad podle 0345DE3344
atd.
--
Best regards,
Milan Vymazal
Delphi 7 Enterprise, Windows 2000 SP3 Proff, IE 6.0sp1 with all sp
Odchyceni souboru pred otevrenim
[*] Vymazal Milan <vymazal.milan(zv)seznam(tec)cz> - 16.6.2003 16:05:49
Zdravim
>> Zdravim konferenci
>>
>> snazim se v Delphi naprogramova neco ve stylu antiviru. Potrebuji
>> odchytit pripad ze nekdo spusti nebo otevre soubor. Jde to podle tak
>> ze bydu ocekavat spusteni souboru , zkratka cekat na nejakou ON_..
>> ale presne nevim na kterou nesetkal se stim nekdo zvas ?
> V delphi to primo nejde, musi na to byt ovladac. Kdysi jsem to videl na
> www.sysinternals.com
Jo to je ten filemonitor. Taky me to napadlo ale zatim jsem to
neskousel. No budu to muset pouzit ale zajimalo by me jak prevezmu
kontrolu jeste pred tim nez to otevre a zkontroluji ten soubor.
S pozdravem
Milan Vymazal
Odchyceni souboru pred otevrenim
[*] delphin(zv)post(tec)cz - 16.6.2003 15:41:48
> Zdravim konferenci
>
> snazim se v Delphi naprogramova neco ve stylu antiviru. Potrebuji
> odchytit pripad ze nekdo spusti nebo otevre soubor. Jde to podle tak
> ze bydu ocekavat spusteni souboru , zkratka cekat na nejakou ON_..
> ale presne nevim na kterou nesetkal se stim nekdo zvas ?
V delphi to primo nejde, musi na to byt ovladac. Kdysi jsem to videl na
www.sysinternals.com
Odchyceni souboru pred otevrenim
[*] Vymazal Milan <vymazal.milan(zv)seznam(tec)cz> - 16.6.2003 15:20:47
Zdravim konferenci
snazim se v Delphi naprogramova neco ve stylu antiviru. Potrebuji
odchytit pripad ze nekdo spusti nebo otevre soubor. Jde to podle tak
ze bydu ocekavat spusteni souboru , zkratka cekat na nejakou ON_..
ale presne nevim na kterou nesetkal se stim nekdo zvas ?
--
Best regards,
Milan Vymazal
Delphi 7 Enterprise, Windows 2000 SP3 Proff, IE 6.0sp1 with all sp
QuickReport - po zavreni po sobe neuklidi smeti
[*] ing. Jan Fiala <jan.fiala(zv)wo(tec)cz> - 31.7.2003 23:41:19
31.7.2003 js-delphi(zv)quick(tec)cz:
> Ahoj!
> Neresil jste nekdo uz problem, ze po zavreni
> QuickReportu zustane v TEMP adresari smeti.
> Vytvarim tiskovou sestavu na cca 24 stran a v
> TEMP se mi mnozi soubory po 2,5MB - QRPxxxx.TMP.
> Nevite jak na to?
> Diky za radu ci napad.
> Jirka
Udelat vlastni Preview, ktere to bude po sobe mazat.
nebo
mazat to pri ukonceni programu.
--
Jan Fiala
mailto:jan.fiala(zv)wo(tec)cz
QuickReport - po zavreni po sobe neuklidi smeti
[*] js-delphi(zv)quick(tec)cz - 31.7.2003 23:21:17
Ahoj!
Neresil jste nekdo uz problem, ze po zavreni
QuickReportu zustane v TEMP adresari smeti.
Vytvarim tiskovou sestavu na cca 24 stran a v
TEMP se mi mnozi soubory po 2,5MB - QRPxxxx.TMP.
Nevite jak na to?
Diky za radu ci napad.
Jirka
--------------------------------------------------
Ing. Jiri Sokol; jiri.sokol(zv)seznam(tec)cz; 972 231 187
D6Prof+SP2; WinXPProf+SP1
programator amater
ID vytvoreneho riadku - zostavenie dotazu
[*] Erik Salaj <winsoft(zv)netkosice.sk> - 31.7.2003 23:13:17
> Dakujem za pomoc, funguje to skvele. Problem nastal, ak som sa pokusal pri
> Inserte dynamicky vlozit hodnoty. Ak parametre uvediem pred alebo po
volani
> Execute, vzdy dostanem chybovu hlasku. Ak vlozim hodnoty napevno do
prikazu,
> volanie prebehne bez problemov. Nebol by problem zostavit retazec za behu
> programu. Ale pri hodnote s desatinnou ciarkou to pozaduje desatinnu bodku
a
> nie desatinnu ciarku ako je nastavene v DecimalSeparator. Zda sa mi takto
> zostaveny retazec a vymenu desatinnej ciarky za bodku velmi nestastne
> riesenie. Preto by som sa chcel opytat ako dynamicky vlozit hodnoty do SQL
> dotazu.
Connection neumoznuje vlozit parametre, skus pouzit priamo ADODataSet.
Takto to funguje s Adonisom (mozem poslat demo priklad):
----------------------------------
// pripravime a zavolame INSERT s parametrom
ADODataSet1.SQL.Text := 'INSERT INTO COUNTRY (NAME) VALUES([ParamName])';
ADODataSet1.RetrieveParams;
ADODataSet1.Params[0].Value := 'NewName';
ADODataSet1.ExecSQL;
// precitame ID vlozeneho zaznamu
ADODataSet1.SQL.Text := 'SELECT (zv)(zv)IDENTITY';
ADODataSet1.Open;
ShowMessage('ID=' + ADODataSet1.Fields[0].AsString);
----------------------------------
alebo sa daju pouzit aj dva datasety, jeden na INSERT
a druhy na IDENTITY, pouzitie je potom:
ADODataSet1.ExecSQL; // vykonaj INSERT
ADODataSet2.Open; // precitaj ID
ShowMessage('ID=' + ADODataSet2ID.AsString);
Erik
ID vytvoreneho riadku - zostavenie dotazu
[*] Ing. Keder Vladimir <vkeder(zv)iol.sk> - 31.7.2003 22:37:14
> Connection.Execute('INSERT INTO xxx ...');
> ID := Connection.Execute('SELECT (zv)(zv)IDENTITY',
> RecordsAffected, -1).Fields[0].Value;
Dakujem za pomoc, funguje to skvele. Problem nastal, ak som sa pokusal pri
Inserte dynamicky vlozit hodnoty. Ak parametre uvediem pred alebo po volani
Execute, vzdy dostanem chybovu hlasku. Ak vlozim hodnoty napevno do prikazu,
volanie prebehne bez problemov. Nebol by problem zostavit retazec za behu
programu. Ale pri hodnote s desatinnou ciarkou to pozaduje desatinnu bodku a
nie desatinnu ciarku ako je nastavene v DecimalSeparator. Zda sa mi takto
zostaveny retazec a vymenu desatinnej ciarky za bodku velmi nestastne
riesenie. Preto by som sa chcel opytat ako dynamicky vlozit hodnoty do SQL
dotazu.
param:= ADODataSet1.Parameters.CreateParameter('_KodPolozky', ftString,
pdInput, 255, eKodPolozky.Text);
param.Index:= 0;
.......
ADODataSet1.Connection.Execute('INSERT INTO StavSkladu (KodPolozky,
Mnozstvo, CenaNakup, Dodavatel) VALUES ([_KodPolozky], [_Mnozstvo],
[_CenaNakup], [_Dodavatel])');
kodPolozky := ADODataSet1.Connection.Execute('SELECT
(zv)(zv)IDENTITY').Fields[0].Value;
Dakujem za pomoc
Vlado
C# Builder
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 31.7.2003 22:17:13
From: "Erik Salaj" <winsoft(zv)netkosice.sk>
> pre zaujimavost, prave som na C#B newsgroupe nasiel presne rovnaky
> problem (akurat, ze ja mam Win2k):
Tak to se povedlo, ale stejne je to problem Microsoftu. Neni prece mozne aby
volani na urovni aplikace zpusobilo BSOD.
Petr Vones
C# Builder
[*] Erik Salaj <winsoft(zv)netkosice.sk> - 31.7.2003 21:55:11
> C# Builder neinstaluje zadny driver, takze v tomto pripade musi byt chyba
> jinde. Patrne provadi jen nejake volani, pri kterem se to projevi. Vice se
> dozvis z minidumpu.
pre zaujimavost, prave som na C#B newsgroupe nasiel presne rovnaky
problem (akurat, ze ja mam Win2k):
----
I have a very strange Problem with C#Builder Personal Edition on WinXP
Professional: When I want to create an ASP WebApplication my computer
crashes down.
My Steps:
-Start C#Builder
-New -> ASP WebApplication
-Enter Projectname and let the default direktory
-Ok, but now Harddisk starts and the computer reboots.
---
Erik
C# Builder
[*] Erik Salaj <winsoft(zv)netkosice.sk> - 31.7.2003 21:43:08
> C# Builder neinstaluje zadny driver, takze v tomto pripade musi byt chyba
> jinde. Patrne provadi jen nejake volani, pri kterem se to projevi. Vice se
> dozvis z minidumpu.
na obrazovke zobrazi UNEXPECTED KERNEL MODE TRAP,
v minidumpe je zoznam dll-iek a driverov. ASP.NET 1.1
som skontroloval, vzorove aplikacie bezia bez problemov.
> Ohledne Personal verze je potesujici, ze Borland konecne uvolnil
samostatny
> download C# Builderu ktery ma asi jen 30MB.
to je presne ta vezia, co skusam. Nenasiel som tam ani Borland Data
Provider ani ComponentOne komponenty, zrejme je to dost orezana
verzia.
Erik
C# Builder
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 31.7.2003 19:31:00
From: "Erik Salaj" <winsoft(zv)netkosice.sk>
> Prostredie sa dost podoba na Delphi (napr. menu a ovladanie)
> ale su tam odlisnosti (napr. paleta komponentov nie je na hornej liste),
> takze to trocha aj spociatku myli ale pre Delphi programatorov
> bude asi rychlejsie si zvyknut na toto ovladanie ako na Visual C#.
S Visual C# nemam problem. Mozna je to tim, ze jsem zvykly maximalne pouzivat
mys a toolbary, takze mi nevadi jine klavesove zkratky (ktere si stejne nikdy
nezapamatuji ;-)
> Avizovany "modeling" som tam nenasiel, takze to som ani
Ten je snad az ve verzi Architect, mozna by byl v trial verzi.
> nemohol vyskusat, takisto som nemohol vyskusat ASP.NET,
> lebo pri vytvarani novej ASP.NET aplikacie mi vzdy spadlo
> cele Windows 2000 (klasicka modra obrazovka). Dva krat
C# Builder neinstaluje zadny driver, takze v tomto pripade musi byt chyba
jinde. Patrne provadi jen nejake volani, pri kterem se to projevi. Vice se
dozvis z minidumpu.
> Nemozem si pomoct, ale nijako sa mi nedari pochopit vyznam C# Buildera
> ako produktu.
Tuhle otazku si klade vice lidi, zvlaste kdyz jeste neni k dispozici tolik
diskutovane Delphi NET. A v pripade .NETu neplati ani zadne pohadky od tzv.
"nezavisle ceste", protoze jak platforma tak prekladac jsou od Microsoftu.
Stejne rozporuplne je take ignorovani ADO.NET pristupu k databazim v IDE a
vnucovani vlastni technologie (Borland Data Provider). Pokud vim, tak IDE
vubec nema "Server Explorer" ktery by umoznoval pristup jako Visual Studio.
Podobne je to s debuggerem.
Jedine co je snad zajimave jsou komponenty od ComponentOne ktere jsou v cene
C# Builderu. Otazka je, zdali to muze vykompenzovat rozdil oproti IDE Visual
Studia.
Ohledne Personal verze je potesujici, ze Borland konecne uvolnil samostatny
download C# Builderu ktery ma asi jen 30MB.
Petr Vones
C# Builder
[*] Erik Salaj <winsoft(zv)netkosice.sk> - 31.7.2003 18:10:55
> > Vyzera to tak,
> > ze problem je alebo v C# Builderi alebo v .NET Frameworku 1.1
> > ale tipujem to na C# Builder.
>
> pokud aplikace shodi cely system pak urcite neni zavada jen v
> aplikaci, ale neco je shnileho v systemu samem - aplikace jen vhodne
> naaranzovala podminky, ktere vedou ke krachu.
to je pravda. Pouzivam normalny anglicky Windows 2000
s poslednym service packom a vsetkymi updatami z webu.
Chodi bez akychkolvek problemov, C# Builder je zatial
jedina aplikacia, ktora mi ten Windows zhodi.
Erik
C# Builder
[*] Dalibor Toman <dtoman(zv)fortech(tec)cz> - 31.7.2003 17:20:51
> Vyzera to tak,
> ze problem je alebo v C# Builderi alebo v .NET Frameworku 1.1
> ale tipujem to na C# Builder.
pokud aplikace shodi cely system pak urcite neni zavada jen v
aplikaci, ale neco je shnileho v systemu samem - aplikace jen vhodne
naaranzovala podminky, ktere vedou ke krachu.
D. Toman
Tisk na slozenky
[*] Jakub Martinek <listbox(zv)vakmb(tec)cz> - 31.7.2003 17:32:52
> > Po zkusenostech se jevi jako nejvhodnejsi je laserova,
> podminkou je spodni
> > podavac -suplik. Horni podavace maji velkou toleranci pri natahovani
> > stranky. Vyhovuji take kvalitni bubliny se spodnim
> podavacem, tam ale
>
> Ja jsem slozenky tiskl na HP LaserJet 2100 a ted na HP Color LaserJet
> 4600 vzdy z horniho zasoblniku a nikdy jsem nemel nejmensi problem s
> toleranci, ani kdyz jsem jeste na starych poukazkach AV tiskl plne
> kodovanou cteci zonu. Rozdil je vicemene v tom, ze je nutne nastavit
> tisk zvlast na spodni zasobniky a zvlast na horni, protoze kazdy
> podava jinak, ale kdyz se to nastavi, je to bez problemu.
>
My pouzivame radu HPLJ 40xx + HPCLJ 4600 bez problemu. Podavace jsou
kvalitni a je jedno, zda pouzijete horni nebo suplik, pouze jich tiskneme v
kazde davce stovky a tak je suplik na 500 listu vhodnejsi.
Jen jsem chtel rict, ze napr. 6L nebo 1200 nejsou zrovna to prave.
> > Dale jsou nutne OCR fonty (hlavne OCR-B). stanejete je
> treba od CP, ale
> > kvalita nic moc.
>
> ??? Pismo OCR-B jak to, co jsem pouzival kdysi svoje, tak to od posty,
> je kvalitni font, nejsou v nem problemy, tisknu to roky a nevidim nic,
> v cem by bylo nekvalitni.
>
> Petr Zahradnik, pocitacovy expert
Mame koupeny komercni font, tehdy jeste posta svuj nedavala. Na obrazovce je
rozdil videt, ale pro rozpoznavani je asi nepodstatny.
Jakub Martinek
jmartinek(zv)vakmb
OT: C# Builder
[*] Erik Salaj <winsoft(zv)netkosice.sk> - 31.7.2003 16:44:49
Boli tu dotazy na porovnanie Visual C#.NET a C# Buildera
a dnes som zhodou okolnosti C# Builder stiahol a vyskusal
a musim teda povedat, ze ziaden mimoriadny dojem
tento produkt na mna neurobil.
Prostredie sa dost podoba na Delphi (napr. menu a ovladanie)
ale su tam odlisnosti (napr. paleta komponentov nie je na hornej liste),
takze to trocha aj spociatku myli ale pre Delphi programatorov
bude asi rychlejsie si zvyknut na toto ovladanie ako na Visual C#.
Az na par drobnych detailov (napr. v textovom editore
ked je kurzor na zatvorke, tak sa farebne zvyraznia obidve
zatvorky, alebo ze default syntax higlighting (nahodnou ?)
zhodou okolnosti pouziva takmer rovnake farby, ake mam
ja v Delphi rucne nastavene a su pouzite aj na nasich Adonis
FAQ strankach) som si nevsimol ziadne vlastnosti, ktore
by boli nejako zaujimave v porovnani s Visual C#.
Avizovany "modeling" som tam nenasiel, takze to som ani
nemohol vyskusat, takisto som nemohol vyskusat ASP.NET,
lebo pri vytvarani novej ASP.NET aplikacie mi vzdy spadlo
cele Windows 2000 (klasicka modra obrazovka). Dva krat
som to skusat, dva krat to spadlo. Pricinu neviem, Visual
C# ASP.NET chodi bez problemov a modru obrazovku
som uz velmi dlho nevidel na mojom NT-cku. Vyzera to tak,
ze problem je alebo v C# Builderi alebo v .NET Frameworku 1.1
ale tipujem to na C# Builder.
Stiahnut si to zdarma, nainstalovat si to a pouzivat to namiesto
riadkoveho prekladaca na hranie sa so C# a .NET to
by som snad videl ako vyhodne pouzitie tohto produktu.
Ale na vyvoj serioznejsich komercnych produktov
by som urcite zvolil Visual C#. Nemozem si pomoct,
ale nijako sa mi nedari pochopit vyznam C# Buildera
ako produktu.
Erik
ID vytvoreneho riadku MS Access + ADO
[*] Erik Salaj <winsoft(zv)netkosice.sk> - 31.7.2003 16:58:50
> Kde v dotaze mam umiestnit SELECT (zv)(zv)IDENTITY aby sa mi vratila hodnota
pola
> ID_Muzstvo typu autoincrement ? Ak to umiestnim na koniec dotazu hlasi mi
to
> Missing semicolon (;) at end of SQL statement. Pouzil som komponentu
> ADOQuery pre vratenie vysledku. V pripade samostatneho volania mi vrati
vzdy
> 1 aj ked je v tabulke ID_Muzstvo posledna hodnota 10.
ja som to mal v ADO Connection (priamo som pouzival ADO objekty)
a chodilo to bez problemov:
Connection.Execute('INSERT INTO xxx ...');
ID := Connection.Execute('SELECT (zv)(zv)IDENTITY',
RecordsAffected, -1).Fields[0].Value;
Rovnako musia fungovat aj ADO komponenty.
> Na pole typu Autoincrement su rozne nazory. Jedna vec je generovat
> nahodne cisla aby bol zaznam jednoznacne definovany, na druhej strane
> neporusit ciselnu radu. Kedze hodnota pola sa incrementuje pri volani
Post,
AutoInc nie su urcene na ciselnu radu. Pochybujem, ze nejaky SQL server
dokaze ciselnu radu riesit autonomne, musel by totiz precislovavat
ID-cka zaznamov v tabulke (a samozrejme aj v naviazanych tabulkach).
Netvrdim, ze by to nebolo mozne, ale myslim si, ze by to bolo zbytocne.
Ciselnu radu by nemal byt problem implementovat s pouzitim jednej
tabulky pocitadiel a transakcii.
AutoInc vyznam je ten, ze aplikacia nepotrebuje vymyslat nejaky vlastny
generator jednoznacnych cisel a skusat ci sa trafila, ale namiesto takejto
loterie prideluje ID-cka bez problemov sam SQL server (resp. Jet Engine
v Accesse) - pretoze on na rozdiel od aplikacie to moze bez problemov
urobit.
> potreby plne postacuje MS Access a neviem o inej moznosti ako dodrziavat
> ciselnu radu. Pouzivanie pola autoincrement je dost pohodlne a musi sa to
> odrazit niekde inde. Napr. pri pouzivani DAO vzdy incrementovalo o 2. Pri
> ADO som sa s takym problemom zatial nestretol. Nemusim na komara strielat
> kanonom.
DAO inkremetuje ID-cka korektne, ale problem tam bol myslim ten,
ze sa ikrementovalo na zaciatku editacie zaznamu a bol problem
tento mechanizmus prisposobit Delphi DataSet komponente.
Erik
odchyceni kliknuti na tlacitko OK
[*] Vymazal Milan <vymazal.milan(zv)seznam(tec)cz> - 31.7.2003 16:38:48
Zdravim
chtel bych se zeptat odborniku zdali je mozne odchytit na
prihlasovacim dialogu do Windows 2000 Proff stisknuti tlacitka OK ?
je to mozne delal jste to nekdo ?
--
Best regards,
Milan Vymazal
Delphi 7 Enterprise, Windows 2000 SP3 Proff, IE 6.0sp1 with all sp
ID vytvoreneho riadku MS Access + ADO
[*] Ludek ZITA <konference(zv)sales(tec)cz> - 31.7.2003 16:02:46
----- Original Message -----
From: "ing. Jan Fiala" <jan.fiala(zv)wo(tec)cz>
>
> Neni jednodussi si vytvaret vlastni jednoznacny identifikator ?
> Pokud pouzivas AutoIncrement jako primarni klic pro vazbu mezi
> tabulkami, zadelavas si na dost velke problemy.
>
Ahoj.
Jak kdy a jak kde. Pokud neni potreba replikace pak neni jediny duvod proc
autoincrement nepouzit.
Ludek
ID vytvoreneho riadku MS Access + ADO
[*] Ing. Keder Vladimir <vkeder(zv)iol.sk> - 31.7.2003 15:50:44
> SELECT (zv)(zv)IDENTITY
Mam nasledujuci dotaz SQL :
INSERT INTO Muzstvo (Skupina_ID, Popis_Muzstvo) VALUES ([_Skupina_ID],
[_Popis_Muzstvo])
V Delphi tento zaznam pridavam nasledovnym sposobom :
ADOCommand1.CommandText:= 'INSERT INTO Muzstvo (Skupina_ID, Popis_Muzstvo)
VALUES ([_Skupina_ID], [_Popis_Muzstvo])';
param:= ADOCommand1.Parameters.CreateParameter('_Skupina_ID', ftInteger,
pdInput, 0, poradie[1].tag);
param.Index:= 0;
param:= ADOCommand1.Parameters.CreateParameter('_Popis_Muzstvo', ftString,
pdInput, 50, eMuzstvo.Text);
param.Index:= 1;
ADOCommand1.Execute;
Kde v dotaze mam umiestnit SELECT (zv)(zv)IDENTITY aby sa mi vratila hodnota pola
ID_Muzstvo typu autoincrement ? Ak to umiestnim na koniec dotazu hlasi mi to
Missing semicolon (;) at end of SQL statement. Pouzil som komponentu
ADOQuery pre vratenie vysledku. V pripade samostatneho volania mi vrati vzdy
1 aj ked je v tabulke ID_Muzstvo posledna hodnota 10.
Na pole typu Autoincrement su rozne nazory. Jedna vec je generovat
nahodne cisla aby bol zaznam jednoznacne definovany, na druhej strane
neporusit ciselnu radu. Kedze hodnota pola sa incrementuje pri volani Post,
vygeneruje sa vzdy hodnota nasledujuca. Ak by som zavolal dotaz a zistil
MAX(ID) a sucasne by sa z inej stanice zavolal ten isty dotaz, vratilo by
rovnaku hodnotu a pri zapise by mali obidva zaznamy rovnake ID. Viem, ze je
to teoreticka uvaha a pri veciach ktore robim je to zbytocna uvaha, avsak je
to mozne. Nepouzivam SQL servre kde je to mozne iste osetrit. Pre moje
potreby plne postacuje MS Access a neviem o inej moznosti ako dodrziavat
ciselnu radu. Pouzivanie pola autoincrement je dost pohodlne a musi sa to
odrazit niekde inde. Napr. pri pouzivani DAO vzdy incrementovalo o 2. Pri
ADO som sa s takym problemom zatial nestretol. Nemusim na komara strielat
kanonom.
Dakujem vsetkym za rady pretoze su pre mna velmi uzitocne aby som sa v
buducnosti mohol niektorym problemov vyhnut.
Vlado
ADODataset Memofield a Unicode
[*] Ludek ZITA <konference(zv)sales(tec)cz> - 31.7.2003 15:52:45
Zdravim.
Mam v MS SQL2000 nadefinovanu tabulku :
CREATE TABLE [ZBOZIUNI] (
[IDZBOZIUNI] [int] IDENTITY (1, 1) NOT NULL ,
[NAZEV] [nvarchar] (50) COLLATE SQL_Latin1_General_CP1251_CI_AS NULL ,
[POPIS] [ntext] COLLATE SQL_Latin1_General_CP1251_CI_AS NULL
) ON [PRIMARY] TEXTIMAGE_ON [PRIMARY]
Pristupuji pres ADO (D6 profi) takto :
Read :
ADODataSet1.Open;
Edit1.Text := WideStringToStringEx(ADODataSet1NAZEV.Value,1251 );
Memo1.Text := WideStringToStringEx(ADODataSet1POPIS.Value,1251 );
ADODataSet1.Close;
Write :
ADODataSet1.Open;
ADODataSet1.Edit;
ADODataSet1NAZEV.Value:=StringToWideStringEx(Edit1.Text,1251);
ADODataSet1POPIS.Value:=StringToWideStringEx(Memo1.Text,1251);
ADODataSet1.Post;
ADODataSet1.Close;
Pole NAZEV je ok (je totiz ADODataSet1NAZEV: TWideStringField) ale
pole POPIS je nefunkcni (z azbuky mi udela otaznicky) IMHO proto ze je
ADODataSet1POPIS: TMemoField
Cili otazka zni jak pristupovat v D6 pres ADO k typu NVARCHAR nebo jak jinak
ukladat dlouhe texty azbukou.
Predem dik.
Ludek ZITA
D6 profi (6.240 Update Pack 2) a MS SQL2000 SP3
Export do Wordu
[*] Rostislav Lekes <rlekes(zv)atlas(tec)cz> - 31.7.2003 15:50:45
Je to bez vysvetlivek, ale snad prehledne
function ZamenWord(ADocument: TFileName; SearchString, ReplaceString:
string; Flags: TWordReplaceFlags): Boolean;
const
wdFindContinue = 1;
wdReplaceOne = 1;
wdReplaceAll = 2;
wdDoNotSaveChanges = 0;
var
WordApp: OLEVariant;
begin
Result := False;
if not FileExists(ADocument) then
begin
ShowMessage('Specified Document not found.');
Exit;
end;
try
WordApp := CreateOLEObject('Word.Application');
except
on E: Exception do
begin
E.Message := 'Word is not available.';
raise;
end;
end;
try
WordApp.Visible := False;
WordApp.Documents.Open(ADocument);
WordApp.Selection.Find.ClearFormatting;
WordApp.Selection.Find.Text := SearchString;
WordApp.Selection.Find.Replacement.Text := ReplaceString;
WordApp.Selection.Find.Forward := True;
WordApp.Selection.Find.Wrap := wdFindContinue;
WordApp.Selection.Find.Format := False;
WordApp.Selection.Find.MatchCase := wrfMatchCase in Flags;
WordApp.Selection.Find.MatchWholeWord := False;
WordApp.Selection.Find.MatchWildcards := wrfMatchWildcards in Flags;
WordApp.Selection.Find.MatchSoundsLike := False;
WordApp.Selection.Find.MatchAllWordForms := False;
if wrfReplaceAll in Flags then
WordApp.Selection.Find.Execute(Replace := wdReplaceAll)
else
WordApp.Selection.Find.Execute(Replace := wdReplaceOne);
WordApp.ActiveDocument.SaveAs(ADocument);
Result := True;
WordApp.ActiveDocument.Close(wdDoNotSaveChanges);
finally
WordApp.Quit;
WordApp := Unassigned;
end;
end;
----- Original Message -----
From: "Vlastimil Zdenek" <delphi(zv)gestore(tec)cz>
To: <delphi-l(zv)clexpert(tec)cz>
Sent: Thursday, July 31, 2003 3:30 PM
Subject: Export do Wordu
> Zdravim vsechny!
> Dival jsem se do archivu konfi, ale nic uspokojivyho jsem nenasel...:((
> Prosil bych o radu:
> 1, Potrebuju na urcite misto sablony ve wordu naplnit texty (pry pres
> wordovsky identifikatory, ale jak je tam dostanu....?
> 2, dynamicky z query plnit vytvorenou sablonu ve wordu. Pokud to jde i s
> formatovanim (odstavce, tabelatory) bylo by to super!
>
> Prikladek by byl fajn....:))
>
> Diky moc
> Vlasta
>
> D5, Office2000
>
>
>
>
>Export do Wordu
[*] Vlastimil Zdenek <delphi(zv)gestore(tec)cz> - 31.7.2003 15:30:43
Zdravim vsechny!
Dival jsem se do archivu konfi, ale nic uspokojivyho jsem nenasel...:((
Prosil bych o radu:
1, Potrebuju na urcite misto sablony ve wordu naplnit texty (pry pres
wordovsky identifikatory, ale jak je tam dostanu....?
2, dynamicky z query plnit vytvorenou sablonu ve wordu. Pokud to jde i s
formatovanim (odstavce, tabelatory) bylo by to super!
Prikladek by byl fajn....:))
Diky moc
Vlasta
D5, Office2000
ID vytvoreneho riadku MS Access + ADO
[*] ing. Jan Fiala <jan.fiala(zv)wo(tec)cz> - 31.7.2003 15:04:41
31.7.2003 Erik Salaj:
>> > AutoInc polozky generuje databaza, takze je to ok, staci to vediet
>> > pouzivat.
>>
>> Jiste, pak musis vedet, co s tim pri sehravani dat apod., protoze tim
>> se ti AutoInc rozleze a referencni integrita je v haji.
> AutoInc treba chapat vzdy ako identifikator zaznamu, na hodnote
> ktoreho nezalezi, potom s tym nie su ziadne problemy.
Jiste, ale v tom puvodnim dotazu to zrejme tak nebylo, pokud si jej
prectes.
--
Jan Fiala
mailto:jan.fiala(zv)wo(tec)cz
Synapse a FTP na Linuxu
[*] Lukas Gebauer <gebylist(zv)mlp(tec)cz> - 31.7.2003 15:14:42
> problem nebyl v pripojeni k FTP serveru na Linuxu, ale kdyz potrebuji zjistit soubory z adresare na FTP, zatuhne mi FtpSend.List, konkretne na radku : Result := DataRead(FDataStream);
> Pri zaremovani projedu dal. Nevite co s tim ?
Zcela urcite to NEZATUHNE! Pod pojmem 'zatuhne' si predstavim, ze to
zatuhne a uz s tim nejde nic delat, coz neni tenmto pripad! Zcela
urcite se ti po nejake dobe (danou timeouty) z teto funkce vrati s
chybou, ze ktere vyvodis pricinu problemu.
Tipnu si, ze problem je v navazovani spojeni datoveho kanalu, ktery
se touto funkci vytvari. Nesnazis se lezt pres nejaky firewall,
packetovy filtr ci preklad adres?
Zkousel jsi aktivni i pasvni rezim prenosu?Obarveni komponent na TPanel
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 31.7.2003 14:52:40
From: "LUKES Vaclav" <lukes(zv)ans(tec)cz>
> A co ldyz mam na Panel1 i jine komponenty, treba TMaskEdit a pod. a ja bych
> chtel obarvit vsechny, ktere jsou na Panelu ?
Potom pomoci RTTI.
Petr Vones
Synapse a FTP na Linuxu
[*] Petr Dedecek <petrd(zv)omega-lbc(tec)cz> - 31.7.2003 14:50:40
problem nebyl v pripojeni k FTP serveru na Linuxu, ale kdyz potrebuji zjistit soubory z adresare na FTP, zatuhne mi FtpSend.List, konkretne na radku : Result := DataRead(FDataStream);
Pri zaremovani projedu dal. Nevite co s tim ?
Dik za radu.
Petr
> Jestli vraci true, tak ses uspesne pripojil.
ID vytvoreneho riadku MS Access + ADO
[*] Erik Salaj <winsoft(zv)netkosice.sk> - 31.7.2003 14:28:38
> > lenze ako chces generovat jednoznacny identifikator zaznamu z
> > aplikacie?
>
> Nerikej mi, ze nejsi schopny vygenerovat jednoznacne ID. Staci mi ID,
> ve kterem bude datum a GetTickCount kombinovane s ID uzivatele. Pokud
> bych byl maximalista, muzu pouzit GUID
nie je problem generovat jednoznacne ID (napr. 128bitove GUID)
ale je problem generovat jednoznacne ID, ktore je kratke, napr. 32 bitove.
Ak ID ma byt v kazdom zazname a este k tomu sluzit na identifikaciu
zanamu (teda je aj v kazdej relacii), tak to teda nemusi byt jedno,
ci ma 32bitov alebo 128bitov.
> > AutoInc polozky generuje databaza, takze je to ok, staci to vediet
> > pouzivat.
>
> Jiste, pak musis vedet, co s tim pri sehravani dat apod., protoze tim
> se ti AutoInc rozleze a referencni integrita je v haji.
AutoInc treba chapat vzdy ako identifikator zaznamu, na hodnote
ktoreho nezalezi, potom s tym nie su ziadne problemy.
Erik
Prevod
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 31.7.2003 14:02:36
From: "Radim Kunz" <privat(zv)casestudio.com>
> funkce StrToFloat
Jenze tato funkce zavisi na reginonal settings, takze ocekavany oddelovac
desetinych mist se muze lisit. V Delphi 7 je to uz nastesti vyreseno dalsim
parametrem TFormatSettings u vetsiny konverznich funkci.
Ve starsich verzich Delphi lze pouzit proceduru Val.
Petr Vones
je uzivatel v domene ?
[*] Vymazal Milan <vymazal.milan(zv)seznam(tec)cz> - 31.7.2003 13:56:36
Zdravim konferenci
nemate nekdo funkci na zjisteni jestli uktualni prihlaseny
uzivatel je domenovy ?
--
Best regards,
Milan Vymazal
Delphi 7 Enterprise, Windows 2000 SP3 Proff, IE 6.0sp1 with all sp
TJpegImage na TCanvas - CLX
[*] Petr Janousek <petr.janousek(zv)definity(tec)cz> - 31.7.2003 13:08:33
Nevite nekdo, jakym zpusobem se da na Canvas zobrazit JpegImage ?
Canvas.Draw(x,y,jpg); nefunguje - podle prekladace se jedna o dva
rozdilne typy - TGraphic a TJpegImage.
Pouzivam Delphi 7 Ent. V Delphi 5 to slo, tak nevim, proc by to nemelo
jit tady.
dik za nakopnuti.
Petr Janousek
ID vytvoreneho riadku MS Access + ADO
[*] ing. Jan Fiala <jan.fiala(zv)wo(tec)cz> - 31.7.2003 12:44:31
31.7.2003 Erik Salaj:
>> Neni jednodussi si vytvaret vlastni jednoznacny identifikator ?
>> Pokud pouzivas AutoIncrement jako primarni klic pro vazbu mezi
>> tabulkami, zadelavas si na dost velke problemy.
> lenze ako chces generovat jednoznacny identifikator zaznamu z
> aplikacie?
Nerikej mi, ze nejsi schopny vygenerovat jednoznacne ID. Staci mi ID,
ve kterem bude datum a GetTickCount kombinovane s ID uzivatele. Pokud
bych byl maximalista, muzu pouzit GUID
> AutoInc polozky generuje databaza, takze je to ok, staci to vediet
> pouzivat.
Jiste, pak musis vedet, co s tim pri sehravani dat apod., protoze tim
se ti AutoInc rozleze a referencni integrita je v haji.
--
Jan Fiala
mailto:jan.fiala(zv)wo(tec)cz
ID vytvoreneho riadku MS Access + ADO
[*] Erik Salaj <winsoft(zv)netkosice.sk> - 31.7.2003 12:10:28
> Prave sa tu prebera tema ktora aj mna velmi zaujima, pretoze uz nejaky
> cas sa pokusam vyriesit problem ako zistit hodnotu typu Autoincrement
prave
> pridavaneho zaznamu. Pouzivam D7 Enterprise, MS Access 2000, ADO pre
pristup
> do databazy a Provider=Microsoft.Jet.OLEDB.4.0. Pozeral som aj do
> konferencie avsak nenasiel som ziadnu odpoved pre tuto kombinaciu.
> Dakujem za pomoc
SELECT (zv)(zv)IDENTITY
Erik
ID vytvoreneho riadku MS Access + ADO
[*] Erik Salaj <winsoft(zv)netkosice.sk> - 31.7.2003 12:14:29
> Neni jednodussi si vytvaret vlastni jednoznacny identifikator ?
> Pokud pouzivas AutoIncrement jako primarni klic pro vazbu mezi
> tabulkami, zadelavas si na dost velke problemy.
lenze ako chces generovat jednoznacny identifikator
zaznamu z aplikacie? AutoInc polozky generuje
databaza, takze je to ok, staci to vediet pouzivat.
Erik
Svatky
[*] martin.ben(zv)ge(tec)com - 31.7.2003 12:08:28
Velikonoce pocitat umis a na ostatni svatky si udelej vlastni seznam podle
zakona c. 245 z roku 2000
http://mvcr.iol(tec)cz/sbirka/2000/sb073-00.pdf
Martin Ben
PS: sam mam na stole kalendar
-----Original Message-----
From: KinDRik [mailto:kindrik(zv)centrum(tec)cz]
A mnel bych dalsi dotaz urcite ho nekdo prede mnou jiz resil a
pomuzemi potrebuji zjistovat jestli je v zadany den nejaky svatek
nebo nejni ... nemate nekdo pls nejaky unit nebo neco se seznamem
svatku ? {Velikonoce si spocitam sam to uz jsem zvladl}
Svatky
[*] KinDRik <kindrik(zv)centrum(tec)cz> - 31.7.2003 11:09:54
Jsem zase z5t
dekuji za tak rychlou odpoved na moji predchozi otazku {Vsem}
A mnel bych dalsi dotaz urcite ho nekdo prede mnou jiz resil a
pomuzemi potrebuji zjistovat jestli je v zadany den nejaky svatek
nebo nejni ... nemate nekdo pls nejaky unit nebo neco se seznamem
svatku ? {Velikonoce si spocitam sam to uz jsem zvladl}
Predem diky "-)
Jiri Betunak
DElphi5 ;WinXP Sp1
--------------------
Barevny displej sice nema, ale ta cena! Siemens A50 jiz od 577 Kc. www.oskar(tec)cz http://www.oskarmobil(tec)cz/handsets/hs_view1.php3?nob=1&lang=cz&hs_id=54&ii=1
Prevod
[*] Slavomir Cekel <slavomir.cekel(zv)noves.sk> - 31.7.2003 10:53:52
pouzi StrToFloat
> Zdravim mam stupidni otazku ...
> jak prevedu string napr '27.60' na cislo abych snim mohl provadet
> matematicke ukony ?Prevod
[*] Radim Kunz <privat(zv)casestudio(tec)com> - 31.7.2003 10:41:52
----- Original Message -----
From: "KinDRik" <kindrik(zv)centrum(tec)cz>
To: <delphi-l(zv)clexpert(tec)cz>
Sent: Thursday, July 31, 2003 10:35 AM
Subject: Prevod
> Zdravim mam stupidni otazku ...
> jak prevedu string napr '27.60' na cislo abych snim mohl provadet
> matematicke ukony ?
> Predem diky za nakopnuti
> Vsem se omlouvam za zacatecnickou otazku.
> Jiri Betunak
> Delphi5 , WinXp SP1
>
>
>
funkce StrToFloat
Radim
oved: Prevod
[*] Rumcajs-konfera <konfera(zv)rumcajs(tec)com> - 31.7.2003 10:39:51
StrToFloat(string);
Lukas "Rumcajs" Weiss
rumcajs(zv)email(tec)cz
Zdravim mam stupidni otazku ...
jak prevedu string napr '27.60' na cislo abych snim mohl provadet
matematicke ukony ?
Predem diky za nakopnuti
Vsem se omlouvam za zacatecnickou otazku.
Jiri Betunak
Delphi5 , WinXp SP1
.
Prevod
[*] KinDRik <kindrik(zv)centrum(tec)cz> - 31.7.2003 10:35:51
Zdravim mam stupidni otazku ...
jak prevedu string napr '27.60' na cislo abych snim mohl provadet
matematicke ukony ?
Predem diky za nakopnuti
Vsem se omlouvam za zacatecnickou otazku.
Jiri Betunak
Delphi5 , WinXp SP1
Spojovani menu
[*] Jiri Foldyna <jiri.f(zv)avizo(tec)cz> - 31.7.2003 10:25:50
>> D5 Ent, W2K
>> Potrebuji spojit main menu parent MDI formu s main menu child MDI
>> formu tak, aby se polozky z child formu doplnily do puvodniho menu.
>> Nejak takto:
> Mas nastaveny u menu AutoMerge ?
> GroupIndex musi byt u obou menu pro soubor stejny.
> Zkus poexperimentovat s GroupIndex u polozek menu. Mely by urcovat
> poradi, ve kterym se v menu budou zobrazovat.
Automerge mam nastavene, prestoze se to pro MDI childy nevyzaduje.
GroupIndex skutecne urcuje poradi, ve kterem se polozky budou zobrazovat,
ale soucasne funguje jako indikator pro nahradu polozky parent menu polozkou
z child menu. Fakticky to funguje tak, ze pokud se pri slucovani menu
parenta a childa vyskytuji v prvni urovni polozky se shodnym GroupIndex, pak
se parent polozka CELA nahradi child polozkou, bez ohledu na to, jestli se
subpolozky lisi nebo ne. Jedine, co jsem k problemu nasel, je doporuceni
udrzovat na kazdem childu ve shodnych polozkach prvni urovne cely strom
polozky, vcetne polozek z parent menu, a duplicitu kodu resit volanim
OnClick z MDI parent formu :-(
Kontroloval jsem i zdrojaky VCL, a vypada to tak, ze to Borland kapku
odflakl. Nazev Merge (spojovat) prilis nevystihuje skutecne chovani - spis
se jedna o nahrazovani a doplneni.
Diky
Jiri Foldyna
mailto:jiri.f(zv)avizo(tec)cz
FB 1.0 - Cascade delete a rychlost
[*] Skopalik Slavomir <skopalik(zv)hlubocky.del(tec)cz> - 31.7.2003 10:09:48
> Bohuzel to neni jen tak jednoduche. Databaze neobsahuje jen datovy model
> teto aplikace, ale asi dalsich 6 datovych modelu jinych aplikaci a ja
> opravdu nemam cas si ted s timto hrat. Zjednodusovat model take moc nemuzu,
> protoze pak mi zase neprobehne import dat, na kterych to je treba odzkouset
> a krom jineho to potrebuji zkouset tak jak to je a ne jen na 2 tabulkach.
> :(((
Bud chces prijit na to cim to je, v tom ti zde muzeme pomoci,
nebo potrebujes zprovoznit aplikaci o ktere zde nic nevime.
Proto je treba najit takovy model, ktery bude dostatecne jednoduchy
a ty si jej pak aplikujes na svuj konkretni pripad.
> Ten select je naprosto NEPODSTATNY !!!!!!!! Predstav si napr. select
> jedineho sloupce s podminkou, kterou nemuze splnit zadny zaznam (aby se
> eliminoval pripadny problem s prenosem dat na klienta). To je totiz ten
> problem. Kdybych potreboval poradit s optimalizaci dotazu, tak bych se
> zeptal primo :)))
Jenze ja potrebuji znat presne ten select i s planem a to jak
pred delete, tak po delete.
Nejlepe asi takto:
SELECT id FROM T WHERE id=0 AND tDate BETWEEN '1.1.2000' AND '2.1.2000';
PLAN (T INDEX (AA)) Current memory = 4575680
Delta memory = 6380
Max memory = 4912600
Elapsed time= 0.04 sec
Buffers = 2048
Reads = 8
Writes 0
Fetches = 10
>
> > >
> > > > 4. Byla by vhodna struktura DB ?
> > >
> > > ??? Nerozumim
> > Prebyval otaznik, tj. jake je vlastne struktura tabulek ?
> > tj. jake je DB schema ?
>
> Porad jeste nechapu - chces zakladaci skript ??? Ten ma > 6MB...
To ne, ale rikals jsi, ze pracujes s 5 tabulkami, dotaz klades nad jednou
je to tak ?
Tekze bych uvital tu jednu konkretni tabulku vcetne indexu a trigru,
a ty selekty (a pocty zaznamu pred a po delete).
Ja to resim tak, ze si pripravim test, ten pak muze spustit kazdy.
Jde o to, aby ten test reprezentoval pouze dany problem.
>
> >
> > >
> > > > 5. Kdyz se pusti ten SELECT na naplnenou DB jak trva dlouho ?
> > >
> > > zlomek vteriny
> >
> > Tvoje odpoved je v primem rozporu s odpovedi v bodu 3).
> > Opravdu trva select na naplnene DB mene jak 1 sec !!!!
> > A po vymazani zaznamu >> hodinu ?
>
> Ano - opravdu je to tak !!!
Posli prosim vypis z isql.
>
> >
> > >
> > > > 6. Jake je PLAN toho selectu.
> > >
> > > natural scan popr scan podle primarniho klice.
> >
> > Posli prosim primo plany z ISQL.
> > Narural scan -> pokud je to jedna tabulka, tak bude doba
> > linearne rust s poctem zaznamu v tabulce (je jedno jestli jsou
> > smazany, nebo ne)
>
> Jak jsem napsal vyse - je to naprosto nepodstatne...
Pak ti ale nemohu poradit.
>
> >
> > > > 8. Pri pouziti FB1.5 byli ty same problemy ?
> > >
> > > Ano
> >
> > To je divne, FB 1.5 by mel byt cca 1.5 krat rychlejsi.
>
> Hmmm - tzn. ze se rychlost zvysi z cca. 10 hodin na 7,5 hodiny ??? :-))))))
Uklidni se, psal jsi, ze je to stejne, ale ted pises, ze neni.
Je to tak ?
> Pricina rozhodne nebude v tom selectu, ale prosim:
>
> select id_nemsparcela from nemsparcela
> where
> id_nemsparcela is null
>
> Problemem je prave ta operace smazani. Pred ni jsou odezvy okamzite, ale po
> ni trva prvni odezva i nekolik hodin...
A jake jsou plany dotazu pred a delete ?
Slavek
FB 1.0 - Cascade delete a rychlost
[*] Petr Palicka <palicka.petr(zv)seznam(tec)cz> - 31.7.2003 10:13:49
ahoj,
> Bohuzel to neni jen tak jednoduche. Databaze neobsahuje jen
> datovy model teto aplikace, ale asi dalsich 6 datovych modelu
> jinych aplikaci a ja opravdu nemam cas si ted s timto hrat.
> Zjednodusovat model take moc nemuzu, protoze pak mi zase
> neprobehne import dat, na kterych to je treba odzkouset
> a krom jineho to potrebuji zkouset tak jak to je a ne jen na
> 2 tabulkach. :(((
Asi chapu tvoji pozici, SW "skoro" hotovy a vyvali se vykonostni
problem, termin vcera a ted co s tim, ze?
sice ti ted nepomuzu a neznam ani co vsecko ma vase aplikace
delat, ale reknu, jak pracujeme s daty KN my. dost mozna jich
zpracovavame radove mene, nas SW je urcen pro zemedelske
podniky, kdy ma drtiva vetsina do 1-5 katastru. my jsme si
"databazi" rozbili do samostatnych funkcnich celku. tedy:
1/ data z KN jsou v jedne databazi, kam se importuji z VFK.
2/ data souvisejici s evidenci nemovitosti jsou ve druhe
3/ data osob jsou ve treti (pouzivaji je dalsi aplikace: akcie,
majetek...)
- musi se nejak ty databaze udrzovat v relaci, treba prave klice osob.
zatim jsem s tim nemel vetsi potize. pri zalohovani je treba urcit,
ktere db zalohovat a pri obnoveni opacne.
+ lepe se to udrzuje, lze manipulovat jen s jednou db, teoreticky
lze dat ruzne db na ruzne servery. pri upgrade se muze vymenit
jenom jeden gdb.
peca
ps: nebudes na zivitelce? ja tam budu cca od soboty/nedele do konce
za firmu AG info. jestli jo, prijd, shanej pecu a dame rec/pivo :o)
FB 1.0 - Cascade delete a rychlost
[*] Marek Spisak <spishark(zv)post(tec)cz> - 31.7.2003 09:55:47
Milan Tomes wrote:
>>1. Nemazat, ale pouze zmenit ty co se zmenili - ano, zrejme to bude
>>dlouho trvat ale to by zase nemuselo nijak vadit.
>
>
> Toto bohuzel nejde - je opravdu nutne smazat predchozi data a pote je znovu
> naplnit i kdyz 95% dat bude stejnych resp. se stejnym identifikatorem,
> nicmene v datech nemuze zustat neplatny zaznam, protoze nelze zjistit, ze uz
> neplatnym je, a take by neumerne narustala velikost databaze.
Promin, mozna jsem mimo, ale neslo by treba behem importu nejak
oflagovat radky (95 %, ktere se zmenili) a mazat enem zbytek ???
Marek
Obarveni komponent na TPanel
[*] Robert Suska <suskar(zv)seznam(tec)cz> - 31.7.2003 09:31:46
Ahoj
co keby si pouzil aj help, ked sme Ti uz ukazali dvere, otvor ich sam :) a
kukni nieco ako Hierarchy a pozri nejakeho spolocneho predka a zisti ci
dokaze zmenit tu vlastnost ku tym komponentam naraz, pokial ju samozrejme uz
ma implementovanu.
Robo
> A co ldyz mam na Panel1 i jine komponenty, treba TMaskEdit a pod. a ja
bych chtel obarvit vsechny, ktere jsou na Panelu ?
> V.
>Obarveni komponent na TPanel
[*] LUKES Vaclav <lukes(zv)ans(tec)cz> - 31.7.2003 09:19:45
A co ldyz mam na Panel1 i jine komponenty, treba TMaskEdit a pod. a ja bych chtel obarvit vsechny, ktere jsou na Panelu ?
V.
-----Original Message-----
From: Ondrej Kelle [mailto:o.kelle(zv)digitalpublishing.de]
Sent: Thursday, July 31, 2003 8:50 AM
To: delphi-l(zv)clexpert(tec)cz
Subject: Re: Obarveni komponent na TPanel
> for i := 0 to Panel1.ControlCount-1 do
> if (Panel1.Controls[i] is TEdit) then
> (Panel1.Controls[i] as TEdit).Color := clNone;
Len taka drobnost. Ak uz raz testujes operatorom is, potom je operator as
nadbytocny.
Ked operator is vrati True, mozes uz priamo pouzit typecast.
if Panel1.Controls[I] is TEdit then
TEdit(Panel1.Controls[I]).Color := clNone;
HTH
TOndrej
My SQL - komponenty
[*] Jiri Matejka <matejka(zv)stemmark(tec)cz> - 31.7.2003 08:39:42
Zrejme to asi nepujde obejit, D7 Personal ma nejake (asi dost vyrazne)
omezeni prace s databazemi, takze je dost mozne ze ZeosDB potrebuje nektere
unity, ktere tam nejsou. Ja je pouzivam v D6 Prof, kde to jde bez problemu.
Jirka Matejka
> Mam Delphi 7 personal edition a zkousel jsem instalovat zminene Zeos
> DBO vsechny komponenty az na jednu tu posledni mi sli nainstalovat v
> pohode ale ta nejdulezitejsi Zcomponents potrebuje "dbrtl" ... a
> obavam se ze tohle v personalech opravdu nenajdu :( existuje neco jak
> tohle obejit ???
>
> <<<<<<<<<<<<<<<<<
>
>> Docela dobre jsou ZeosDBO:
>> http://zeoslib.sourceforge.net/zeos_zdo_main.php. Umi nejen MySQL
>> ale i radu dalsich databazi.
>
>> Jirka Matejka
>
>
>>> Zdravim,
>>>
>>> Pro My SQL jake jsou dobre komponenty ?
>>>
>>> Frantisek Stranik
>
>
>
>
> <<<<<<<<<<<<<<<<<
> MAKEUP//KOMIX//
Obarveni komponent na TPanel
[*] LUKES Vaclav <lukes(zv)ans(tec)cz> - 31.7.2003 08:43:42
Skvele. Diky.
V.
-----Original Message-----
From: Robert Suska [mailto:suskar(zv)seznam(tec)cz]
Sent: Thursday, July 31, 2003 8:30 AM
To: delphi-l(zv)clexpert(tec)cz
Subject: Re: Obarveni komponent na TPanel
Ahoj
podla vsetkeho chces toto.
var
i: Integer;
begin
for i := 0 to Panel1.ControlCount-1 do
if (Panel1.Controls[i] is TEdit) then
(Panel1.Controls[i] as TEdit).Color := clNone;
end;
Robo
> Jde mi o nasledujici vec. Rad bych nejak hromadne komponenty na PanelA
obarvil. Napr. s nepristupnenim neni problem (PanelA.Enable := false), ale s
obarvenim...
>
> Diky
>
> V.
Obarveni komponent na TPanel
[*] Jan Harman <harman(zv)volny(tec)cz> - 31.7.2003 08:43:42
Mozna by to slo i tak ze nastavis u vsech komponent ktere jsou na
panelu ParentColor=true a potom staci menit barvu toho jednoho
panelu. Honza
----- PUVODNI ZPRAVA -----
Od: "Robert Suska" <suskar(zv)seznam(tec)cz>
> podla vsetkeho chces toto.
>
> var
> i: Integer;
> begin
> for i := 0 to Panel1.ControlCount-1 do
> if (Panel1.Controls[i] is TEdit) then
> (Panel1.Controls[i] as TEdit).Color := clNone;
> end;
>
> Robo
>
>
> > Jde mi o nasledujici vec. Rad bych nejak hromadne
> > komponenty na PanelA
> obarvil. Napr. s nepristupnenim neni problem
> (PanelA.Enable := false), ale s
> obarvenim...
> >
> > Diky
> >
> > V.
--
Horke leto s VOLNY: Vyhraj Ford s klimatizaci! Vice na
http://soutez.volny(tec)cz
Obarveni komponent na TPanel
[*] Ondrej Kelle <o.kelle(zv)digitalpublishing.de> - 31.7.2003 08:49:43
> for i := 0 to Panel1.ControlCount-1 do
> if (Panel1.Controls[i] is TEdit) then
> (Panel1.Controls[i] as TEdit).Color := clNone;
Len taka drobnost. Ak uz raz testujes operatorom is, potom je operator as
nadbytocny.
Ked operator is vrati True, mozes uz priamo pouzit typecast.
if Panel1.Controls[I] is TEdit then
TEdit(Panel1.Controls[I]).Color := clNone;
HTH
TOndrej
Obarveni komponent na TPanel
[*] Robert Suska <suskar(zv)seznam(tec)cz> - 31.7.2003 08:29:41
Ahoj
podla vsetkeho chces toto.
var
i: Integer;
begin
for i := 0 to Panel1.ControlCount-1 do
if (Panel1.Controls[i] is TEdit) then
(Panel1.Controls[i] as TEdit).Color := clNone;
end;
Robo
> Jde mi o nasledujici vec. Rad bych nejak hromadne komponenty na PanelA
obarvil. Napr. s nepristupnenim neni problem (PanelA.Enable := false), ale s
obarvenim...
>
> Diky
>
> V.Obarveni komponent na TPanel
[*] LUKES Vaclav <lukes(zv)ans(tec)cz> - 31.7.2003 08:19:40
Ahoj,
prosim o radu. Na formulari (FormA) mam komponentu TPanel (PanelA) a na nem nekolik Editu.
Jde mi o nasledujici vec. Rad bych nejak hromadne komponenty na PanelA obarvil. Napr. s nepristupnenim neni problem (PanelA.Enable := false), ale s obarvenim...
Diky
V.FB 1.0 - Cascade delete a rychlost
[*] Milan Tomes <delphi(zv)haida(tec)cz> - 31.7.2003 07:59:38
> [mailto:delphi-l-owner(zv)clexpert(tec)cz]On Behalf Of Petr Palicka
>
> no, ono totiz, kdyz plnis a mazes 100tisic zaznamu, tak
> to chvilku trva, nez se odstrani neplatne verze radku.
To mas pravdu, ale mel jsem za to, ze radek se verzuje pouze pokud se spusti
nova transakce, ktera stejny radek cte. A to mohu v tuto chvili vyloucit.
> s KN jsem mel taky tu cest a treba import podniku,
> kompletni vymaz a potom _jakykoliv_ pozadavek na server
> a je tam prodleva. nicmene po zacvicenim s 10 MB VFK
> souborem to netrvalo byl jak pres obed. a takovyhle
Import 100MB souboru trva asi tak hodinku, vymaz dat trva nekolik vterin.
Bohuzel nemohu "cvicit" s VFK souborem, protoze ho musim nacist cely (bez
SGI).
> masivni presuny dat se nedelaji kazdej den, ale jednou,
> pri naplneni dat. potom staci brat a nacitat zmenovy davky,
> kdy se doplnuje a updatuje par set radku (pokud vubec).
Ale my musime resit i situaci (bohuzel ne vlastni vinou, ale opet vinou
firmy NESS), kdy je opravdu treba nacist kompletni porizovaci davku znovu a
tudiz musime vymazat puvodni data.
>
> zkus misto novyho plneni db daty zpracovat zmenovou davku.
> po nekolika upozornenich na chyby uz jim to celkem funguje :)
To umime, ale stejne tam maji spoustu chyb - neexistujici, ale povinne
reference apod... Jsou to naprosti amateri...
S pozdravem
Milan Tomes
mailto:milan.tomes(zv)haida(tec)cz
>
> peca
>
>FB 1.0 - Cascade delete a rychlost
[*] Milan Tomes <delphi(zv)haida(tec)cz> - 31.7.2003 07:55:38
> [mailto:delphi-l-owner(zv)clexpert(tec)cz]On Behalf Of Radek KALA
>
>
> Pokud takto potrebujes Obnovit v podstate obrovskej ciselnik, Jsou
> jeste dve dalsi reseni, ktera ti uspori vymazani spousty zaznamu.
Bohuzel se nejedna o ciselnik.
>
> 1. Nemazat, ale pouze zmenit ty co se zmenili - ano, zrejme to bude
> dlouho trvat ale to by zase nemuselo nijak vadit.
Toto bohuzel nejde - je opravdu nutne smazat predchozi data a pote je znovu
naplnit i kdyz 95% dat bude stejnych resp. se stejnym identifikatorem,
nicmene v datech nemuze zustat neplatny zaznam, protoze nelze zjistit, ze uz
neplatnym je, a take by neumerne narustala velikost databaze.
>
> 2. Nasypat nove ciselniky do prazdne databaze a pak k nim dosypat
> tvoje data.
To take nejde - v databazi neni jen datovy model Katastru nemovitosti, ale i
nekolik dalsich modelu...
>
> 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
S pozdravem
Milan Tomes
mailto:milan.tomes(zv)haida(tec)cz
FB 1.0 - Cascade delete a rychlost
[*] Milan Tomes <delphi(zv)haida(tec)cz> - 31.7.2003 07:51:37
> [mailto:delphi-l-owner(zv)clexpert(tec)cz]On Behalf Of Skopalik Slavomir
>
>
> > > 1. je to zpusobeno tou caskadni integritou (kdyz to prepises do
> > > trigru, nebo kdyz to odstrani aplikace je to jine) ?
> >
> > Netusim - nemohu to prepisovat do triggeru, protoze by to a)
> stalo hrozne
> > moc casu a b) ten ja nemam. Podle me je to uplne jedno, protoze
> kdyz smazeme
> > "jen" cca. 100 000 zaznamu, tak je lag cca. 30 minut :)))
>
> Prepsani typu integrity je otazka nekolika minut, takze
> me zajima ten vysledek (podle mne ale neni problem v integrite).
> Ja bych to delal zmenou volby v Case Studiu.
> Nema moc smysl testovat komplexni DB a myslet si ze naleznes
> pricinu, je treba DB postupne zjenodusovat az na cca 2 tabulky,
> pak je z toho neco, co lze resit.
>
Bohuzel to neni jen tak jednoduche. Databaze neobsahuje jen datovy model
teto aplikace, ale asi dalsich 6 datovych modelu jinych aplikaci a ja
opravdu nemam cas si ted s timto hrat. Zjednodusovat model take moc nemuzu,
protoze pak mi zase neprobehne import dat, na kterych to je treba odzkouset
a krom jineho to potrebuji zkouset tak jak to je a ne jen na 2 tabulkach.
:(((
> > > 3. Jaky je ten SELECT ?
> >
> > Select * from table
> > nebo
> > select count(id) from table atp...
> > Proste to nejjednodussi co si dokazes predstavit...
>
> Count je problem, doba scanu NEZALEZI na velikosti DB
> ale na poctu zaznamu.
> select * from ... zase zalezi spise na rychlosti interface (doba predani
> zaznamu klientovi, behem te server ceka, nebo obhospodaruje dalsi
> klienty).
> Takze jeste jednou, jaky je PRESNE ten selekt vcetne planu.
> pokud by tam byla vice jak jedna tabulka, tak to taky muze
> trvat moooooooooc dlouho.
Ten select je naprosto NEPODSTATNY !!!!!!!! Predstav si napr. select
jedineho sloupce s podminkou, kterou nemuze splnit zadny zaznam (aby se
eliminoval pripadny problem s prenosem dat na klienta). To je totiz ten
problem. Kdybych potreboval poradit s optimalizaci dotazu, tak bych se
zeptal primo :)))
> >
> > > 4. Byla by vhodna struktura DB ?
> >
> > ??? Nerozumim
> Prebyval otaznik, tj. jake je vlastne struktura tabulek ?
> tj. jake je DB schema ?
Porad jeste nechapu - chces zakladaci skript ??? Ten ma > 6MB...
>
> >
> > > 5. Kdyz se pusti ten SELECT na naplnenou DB jak trva dlouho ?
> >
> > zlomek vteriny
>
> Tvoje odpoved je v primem rozporu s odpovedi v bodu 3).
> Opravdu trva select na naplnene DB mene jak 1 sec !!!!
> A po vymazani zaznamu >> hodinu ?
Ano - opravdu je to tak !!!
>
> >
> > > 6. Jake je PLAN toho selectu.
> >
> > natural scan popr scan podle primarniho klice.
>
> Posli prosim primo plany z ISQL.
> Narural scan -> pokud je to jedna tabulka, tak bude doba
> linearne rust s poctem zaznamu v tabulce (je jedno jestli jsou
> smazany, nebo ne)
Jak jsem napsal vyse - je to naprosto nepodstatne...
>
> > > 8. Pri pouziti FB1.5 byli ty same problemy ?
> >
> > Ano
>
> To je divne, FB 1.5 by mel byt cca 1.5 krat rychlejsi.
Hmmm - tzn. ze se rychlost zvysi z cca. 10 hodin na 7,5 hodiny ??? :-))))))
>
> >
> > >
> > > Tohle by nam mozno mohlo pomoci, z uvedenych informci me napada
> > > puze spatne
> > > postaveny select (oni ty zaznamy totiz jeste existuji a budou
> > > existovat az do sweepu).
> >
> > To chapu, ale nechapu to, ze serveru trva prohledani nejakych
> 300 MB i vice
> > jak 5 hodin. Dodejme, ze kdyz se serverem a s onou databazi
> nebudu den nic
> > delat, coz by mel byt dostatecny cas pro provedeni sweepu, tak
> mi to vubec
> > nepomuze a trva to vsechno uplne stejne dlouho...
> >
>
> Prosim moh bys uz konecne poslat ty selekty ?
> Takto se vysledku skutecne nedoberem.
> Pricina je v tom selektu (celkove v nevhodne praci s DB), takze
> musime upravite ten select.
> Bylo by pekne to testovat dejme tomu na desetine dat a sledovat
> jestli doba narusta linearne, nebo jinak (exponencialne, kvadraticky,...).
Pricina rozhodne nebude v tom selectu, ale prosim:
select id_nemsparcela from nemsparcela
where
id_nemsparcela is null
Problemem je prave ta operace smazani. Pred ni jsou odezvy okamzite, ale po
ni trva prvni odezva i nekolik hodin...
S pozdravem
Milan Tomes
mailto:milan.tomes(zv)haida(tec)cz
>
> Slavek
>
>
>FB 1.0 - Cascade delete a rychlost
[*] Pavel Tresnak <delphi(zv)haida(tec)cz> - 31.7.2003 07:19:35
Ano, ale delete se obcas provest musi a ten lag je potom sileny.
Pavel Tresnak
mailto:pavel.tresnak(zv)haida(tec)cz
From: delphi-l-owner(zv)clexpert(tec)cz [mailto:delphi-l-owner(zv)clexpert(tec)cz]On
Behalf Of Petr Palicka
zkus misto novyho plneni db daty zpracovat zmenovou davku.
po nekolika upozornenich na chyby uz jim to celkem funguje :)
peca
ID vytvoreneho riadku MS Access + ADO
[*] Slavomir Cekel <slavomir.cekel(zv)noves.sk> - 31.7.2003 07:11:35
Ano je to jednoduchsie, ale napr. ja musim pracovat nad tabulkou, ktora je
uz takto spravena a vyuziva ju
iny soft !!! takze sa musim prisposobit ... takze naozaj by sme obaja
ocenili odpovede na otazku ... vdaka
Slavo
>
> Neni jednodussi si vytvaret vlastni jednoznacny identifikator ?
> Pokud pouzivas AutoIncrement jako primarni klic pro vazbu mezi
> tabulkami, zadelavas si na dost velke problemy.
>
> --
> Jan Fiala
> mailto:jan.fiala(zv)wo(tec)cz
>
>
> __________ Informacia od NOD32 1.470 (20030730) __________
>
> Tato sprava bola preverena systemom NOD32 pre Exchange.
> http://www.eset.sk
>
>
>TSearchRec a velkost adresara
[*] ing. Jan Fiala <jan.fiala(zv)wo(tec)cz> - 31.7.2003 06:45:33
31.7.2003 Ivan Dulgerov:
> Zdravim.
> Mam takuto zaujimavost.
> Prehladavam cdrom, a zistujem udaje o suboroch a
> adresaroch.
> Pouzivam FindFirst a FindNext.
> Problem je pri zistovani velkosti suborov.
> Potrebujem aby program korektne vratil velkost adresara 0.
> Takze mam
> var SR : TSearchRec ;
> Potom v pripade ze SR.Attr := faDirectory
> SR.Size vrati 0
> Toto funguje na Win XP.
> V pripade, ze spustim aplikaciu na Win 98, program
> funguje korektne len ak prehladavam HDD, alebo disketu 3,5",
> v pripade, ze prehladavam CDROM, program mi
> vrati velkost adresara 2048.
> Podotykam, ze len vo Win 98, vo Win XP vsetko funguje ako ma.
> Pokusal som sa korektne udaje vypacit z TSearchRec pomocou
> FindData. Bohuzial bez uspechu.
> Neviete niekto, ako dostat vo Win Play Station korektne udaje
> o adresary ?
if SR.Attr and faDirectory <> 0 then
Velikost := 0
else
Velikost := sr.Size;
--
Jan Fiala
mailto:jan.fiala(zv)wo(tec)cz
Nefunkcni heslo na pradoxovou tabulku.
[*] Petr Klima <delphi(zv)darvis(tec)cz> - 31.7.2003 06:31:31
> Od: ing. Jan Fiala [mailto:jan.fiala(zv)wo(tec)cz]
>
>
> 30.7.2003 Petr Klima:
> > A pro jakou verzi pdox tabulek to ma fungovat?
> > Petr
>
> Teoreticky pro vsechny.
>
Tak jo. Funguje to. Ale nesmis ty tabulky otevirat primo Paradoxem
Petr
TSearchRec a velkost adresara
[*] Ivan Dulgerov <idulgerov(zv)stonline.sk> - 31.7.2003 06:29:31
Zdravim.
Mam takuto zaujimavost.
Prehladavam cdrom, a zistujem udaje o suboroch a
adresaroch.
Pouzivam FindFirst a FindNext.
Problem je pri zistovani velkosti suborov.
Potrebujem aby program korektne vratil velkost adresara 0.
Takze mam
var SR : TSearchRec ;
Potom v pripade ze SR.Attr := faDirectory
SR.Size vrati 0
Toto funguje na Win XP.
V pripade, ze spustim aplikaciu na Win 98, program
funguje korektne len ak prehladavam HDD, alebo disketu 3,5",
v pripade, ze prehladavam CDROM, program mi
vrati velkost adresara 2048.
Podotykam, ze len vo Win 98, vo Win XP vsetko funguje ako ma.
Pokusal som sa korektne udaje vypacit z TSearchRec pomocou
FindData. Bohuzial bez uspechu.
Neviete niekto, ako dostat vo Win Play Station korektne udaje
o adresary ?
Ivan Dulgerov
J.Straku 12
969 00 Banska Stiavnica
SLOVAK REPUBLIC
tel : 00421 - 045/6920428
Precitanie default polozky z registrov
[*] ing. Jan Fiala <jan.fiala(zv)wo(tec)cz> - 31.7.2003 05:57:29
30.7.2003 spisiak:
> Ahoj,
>> Chyba bude na tvem prijimaci. Posli kus kodu.
> Tato funkcia mi na wlk chodi ok a na W98 vracia prazdny retazec ale v
> regedite to tam vidim
Zkus tohle:
Function getOutlookPath: String;
Var
key: String;
Begin
Result := '';
Key:='\CLSID\{0006F03A-0000-0000-C000-000000000046}\LocalServer32';
with TRegistry.Create do
Try
RootKey:=HKEY_CLASSES_ROOT;
if OpenKeyReadOnly(Key) then
begin
Result:=ReadString('')
CloseKey;
end
else
ShowMessage('Nic jsem nenasel, protoze klic neexistuje');
finally
Free;
end;
End;
--
Jan Fiala
mailto:jan.fiala(zv)wo(tec)cz
ID vytvoreneho riadku MS Access + ADO
[*] ing. Jan Fiala <jan.fiala(zv)wo(tec)cz> - 31.7.2003 05:39:28
30.7.2003 Ing. Keder Vladimir:
> Ahoj
> Prave sa tu prebera tema ktora aj mna velmi zaujima, pretoze uz nejaky
> cas sa pokusam vyriesit problem ako zistit hodnotu typu Autoincrement prave
> pridavaneho zaznamu. Pouzivam D7 Enterprise, MS Access 2000, ADO pre pristup
> do databazy a Provider=Microsoft.Jet.OLEDB.4.0. Pozeral som aj do
> konferencie avsak nenasiel som ziadnu odpoved pre tuto kombinaciu.
> Dakujem za pomoc
Neni jednodussi si vytvaret vlastni jednoznacny identifikator ?
Pokud pouzivas AutoIncrement jako primarni klic pro vazbu mezi
tabulkami, zadelavas si na dost velke problemy.
--
Jan Fiala
mailto:jan.fiala(zv)wo(tec)cz
Precitanie default polozky z registrov
[*] Tomas Rosa <trosa(zv)seznam(tec)cz> - 31.7.2003 04:25:23
predpokladam, ze navratovy kod FUNKCE OpenKey kontrolujes a tam nemuze
dojit k chybe. Kuprikladu klic neexistuje, mas na zacatku lomitko a tak
podobne.
>s> Function getOutlookPath: String;
>s> Var
>s> key: String;
>s> Begin
>s> Key:='\CLSID\{0006F03A-0000-0000-C000-000000000046}\LocalServer32';
>s> with TRegistry.Create do
>s> Try
>s> RootKey:=HKEY_CLASSES_ROOT;
>s> OpenKey(Key,False);
>s> Result:=ReadString('');
>s> finally
>s> Free;
>s> end;
>s> End; S pozdravem
Tomas Rosa
------------------------=[ pinknet on every screen]=-----------------------
Tomas Rosa
Tomas.Rosa(zv)PinkNet(tec)cz http://www.pnws.org
+420 602 860 704
PinkNet Web Server for Win32 - FREEWARE www.pnws.org
---------------------------------------------------------------------------
My SQL - komponenty
[*] chemix <makeup(zv)disconnect(tec)cz> - 31.7.2003 00:49:10
Mam Delphi 7 personal edition a zkousel jsem instalovat zminene Zeos DBO vsechny
komponenty az na jednu tu posledni mi sli nainstalovat v pohode ale ta
nejdulezitejsi Zcomponents potrebuje "dbrtl" ... a obavam se ze tohle v
personalech opravdu nenajdu :( existuje neco jak tohle obejit ???
<<<<<<<<<<<<<<<<<
JM> Docela dobre jsou ZeosDBO: http://zeoslib.sourceforge.net/zeos_zdo_main.php.
JM> Umi nejen MySQL ale i radu dalsich databazi.
JM> Jirka Matejka
>> Zdravim,
>>
>> Pro My SQL jake jsou dobre komponenty ?
>>
>> Frantisek Stranik
<<<<<<<<<<<<<<<<<
MAKEUP//KOMIX//Precitanie default polozky z registrov
[*] Jakub Dusek <delphi(zv)corexpert(tec)com> - 30.7.2003 23:33:05
... aha, sorry, nevsiml jsem si toho ze v regeditu to vidis... V tom
pripade nekde musi byt nejaka jina chybka.
Jakub Dusek
----------------------------------------------------------------------
web: http://www.corexpert.com, mobile: +420 604 615 795, ICQ: 86063232
aplikace pro komfortni odesilani sms zprav, vizitek, log a melodii
=> Sms GateKeeper 2.1
======================================================================
Wednesday, July 30, 2003, 10:37:00 PM, you wrote:
s> Tato funkcia mi na wlk chodi ok a na W98 vracia prazdny retazec ale v
s> regedite to tam vidim
Precitanie default polozky z registrov
[*] Jakub Dusek <delphi(zv)corexpert(tec)com> - 30.7.2003 23:19:03
Funkce je podle me spravne, existuje vubec ta cesta v tech registrech
na Win98? Na zjisteni cesty k Outlooku urcite existuje lepsi a
univerzalnejsi moznost nez v CLSID, pro normalni Outlook zrejme nejaky
podklic v:
HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Office
Pro Outlook Express:
HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Outlook Express
Staci prolezt Regeditem.
Jakub Dusek
----------------------------------------------------------------------
web: http://www.corexpert.com, mobile: +420 604 615 795, ICQ: 86063232
aplikace pro komfortni odesilani sms zprav, vizitek, log a melodii
=> Sms GateKeeper 2.1
======================================================================
Wednesday, July 30, 2003, 10:37:00 PM, you wrote:
s> Ahoj,
>> Chyba bude na tvem prijimaci. Posli kus kodu.
s> Tato funkcia mi na wlk chodi ok a na W98 vracia prazdny retazec ale v
s> regedite to tam vidim
s> Function getOutlookPath: String;
s> Var
s> key: String;
s> Begin
s> Key:='\CLSID\{0006F03A-0000-0000-C000-000000000046}\LocalServer32';
s> with TRegistry.Create do
s> Try
s> RootKey:=HKEY_CLASSES_ROOT;
s> OpenKey(Key,False);
s> Result:=ReadString('');
s> finally
s> Free;
s> end;
s> End;
s> KaSi
Precitanie default polozky z registrov
[*] spisiak <spisiak(zv)zoznam.sk> - 30.7.2003 22:37:00
Ahoj,
> Chyba bude na tvem prijimaci. Posli kus kodu.
Tato funkcia mi na wlk chodi ok a na W98 vracia prazdny retazec ale v
regedite to tam vidim
Function getOutlookPath: String;
Var
key: String;
Begin
Key:='\CLSID\{0006F03A-0000-0000-C000-000000000046}\LocalServer32';
with TRegistry.Create do
Try
RootKey:=HKEY_CLASSES_ROOT;
OpenKey(Key,False);
Result:=ReadString('');
finally
Free;
end;
End;
KaSi
Spojovani menu
[*] ing. Jan Fiala <jan.fiala(zv)wo(tec)cz> - 30.7.2003 21:52:57
30.7.2003 Jiri Foldyna:
> Ahoj,
> D5 Ent, W2K
> Potrebuji spojit main menu parent MDI formu s main menu child MDI formu tak,
> aby se polozky z child formu doplnily do puvodniho menu. Nejak takto:
> Parent menu:
> Soubor
> Otevrit
> Konec
> Child menu:
> Soubor
> Ulozit
> Potreboval bych dostat
> Soubor
> Otevrit
> Ulozit
> Konec
> Po otevreni child formu dostavam bud
> Soubor
> Ulozit
> (GroupIndex u TMenuItem Soubor je u obou formu stejny)
> nebo
> Soubor Soubor
> Otevrit Ulozit
> Konec
> (GroupIndex u TMenuItem Soubor je u obou formu ruzny)
> Experimentoval jsem s GroupIndex i u polozek Otevrit, Ulozit, Konec, ale
> neuspesne.
> Lze to nejak zaridit ?
Mas nastaveny u menu AutoMerge ?
GroupIndex musi byt u obou menu pro soubor stejny.
Zkus poexperimentovat s GroupIndex u polozek menu. Mely by urcovat
poradi, ve kterym se v menu budou zobrazovat.
--
Jan Fiala
mailto:jan.fiala(zv)wo(tec)cz
Nefunkcni heslo na pradoxovou tabulku.
[*] ing. Jan Fiala <jan.fiala(zv)wo(tec)cz> - 30.7.2003 21:52:57
30.7.2003 Petr Klima:
> A pro jakou verzi pdox tabulek to ma fungovat?
> Petr
Teoreticky pro vsechny.
--
Jan Fiala
mailto:jan.fiala(zv)wo(tec)cz
Precitanie default polozky z registrov
[*] ing. Jan Fiala <jan.fiala(zv)wo(tec)cz> - 30.7.2003 21:54:57
30.7.2003 spisiak:
>> Tak dej misto nazvu polozky prazdny string.
> Ahoj to mi funguje len na W2000 na W98 mi to vracia prazdny retazec.
Chyba bude na tvem prijimaci. Posli kus kodu.
--
Jan Fiala
mailto:jan.fiala(zv)wo(tec)cz
ID vytvoreneho riadku MS Access + ADO
[*] Ing. Keder Vladimir <vkeder(zv)iol.sk> - 30.7.2003 21:30:51
Ahoj
Prave sa tu prebera tema ktora aj mna velmi zaujima, pretoze uz nejaky
cas sa pokusam vyriesit problem ako zistit hodnotu typu Autoincrement prave
pridavaneho zaznamu. Pouzivam D7 Enterprise, MS Access 2000, ADO pre pristup
do databazy a Provider=Microsoft.Jet.OLEDB.4.0. Pozeral som aj do
konferencie avsak nenasiel som ziadnu odpoved pre tuto kombinaciu.
Dakujem za pomoc
Vlado
Komunikace s paralelnim portem
[*] Erik Salaj <winsoft(zv)netkosice.sk> - 30.7.2003 17:52:36
> Potrebuji komunikovat s paralelnim portem, potreboval bych k tomu nejake
komponenty. Muzete mi nekdo nejake doporucit?
ak staci citanie a zapis na IO porty, tak napr.
nas IOPort http://www.winsoft.sk/ioport.htm
(shareware). Podobne komponenty, mozno
aj freeware najdes na DSP, Torry, atd.
Erik
MainMenu
[*] Jakub Dusek <delphi(zv)corexpert(tec)com> - 30.7.2003 17:58:37
No takhle se prida jako hlavni polozka. Pokud ji chces pridat jako
podpolozku staci pouzit misto MainMenu1 primo polozku pod kterou to
chces pridat.
var SubItem, Item : TMenuItem;
begin
SubItem := TMenuItem.Create(MainMenu1);
SubItem.Caption := 'Menu item';
MainMenu1.Items.Add(SubItem);
Item := TMenuItem.Create(SubItem);
Item.Caption := 'Menu item child';
SubItem.Add(Item);
end;
SubItem nemusis pro tvuj pripad ani vytvaret v runtime, muzes ji mit
vytvorenou v designtime.
Jakub Dusek
----------------------------------------------------------------------
web: http://www.corexpert.com, mobile: +420 604 615 795, ICQ: 86063232
aplikace pro komfortni odesilani sms zprav, vizitek, log a melodii
=> Sms GateKeeper 2.1
======================================================================
Wednesday, July 30, 2003, 5:48:36 PM, you wrote:
S> Hellou Jakub,
S> Wednesday, July 30, 2003, 5:34:35 PM:
S> Nejak jinak by to prosim neslo? Hlavne mi jde o to, kam se prislusna
S> polozka prida. (potrebuju udelat seznam naposled otevrenych souboru)Precitanie default polozky z registrov
[*] Jakub Dusek <delphi(zv)corexpert(tec)com> - 30.7.2003 17:44:36
Hm, to se mi nezda, ze by to na Win98 nechodilo. Hledal bych chybu
nekde jinde.
Jakub Dusek
----------------------------------------------------------------------
web: http://www.corexpert.com, mobile: +420 604 615 795, ICQ: 86063232
aplikace pro komfortni odesilani sms zprav, vizitek, log a melodii
=> Sms GateKeeper 2.1
======================================================================
Wednesday, July 30, 2003, 4:48:31 PM, you wrote:
>> Tak dej misto nazvu polozky prazdny string.
s> Ahoj to mi funguje len na W2000 na W98 mi to vracia prazdny retazec.
s> KaSi
MainMenu
[*] Pavel Malinsky <malinsky(zv)pmcom(tec)cz> - 30.7.2003 17:56:37
> -----Original Message-----
> From: delphi-l-owner(zv)clexpert(tec)cz
> [mailto:delphi-l-owner(zv)clexpert(tec)cz]On Behalf Of Spider_X
>
> Nejak jinak by to prosim neslo? Hlavne mi jde o to, kam se prislusna
> polozka prida. (potrebuju udelat seznam naposled otevrenych souboru)
ahoj,
Add() pridava na konec nebo pouzij Insert() a dej to kam chces...
S pozdravem a dikem
=====================================
> Pavel Malinsky; malinsky(zv)pmcom(tec)cz <
=====================================
> GSM: 602 652 203 | ICQ: 322015967 <
=====================================
MainMenu
[*] Spider_X <spider_x(zv)quick(tec)cz> - 30.7.2003 17:48:36
Hellou Jakub,
Wednesday, July 30, 2003, 5:34:35 PM:
JD> var Item : TMenuItem
JD> begin
JD> Item := TMenuItem.Create(MainMenu1);
JD> Item.Caption := 'Menu item';
JD> MainMenu1.Items.Add(Item);
JD> end;
Nejak jinak by to prosim neslo? Hlavne mi jde o to, kam se prislusna
polozka prida. (potrebuju udelat seznam naposled otevrenych souboru)
--
Zdravi,
Spider_X
spider_x(zv)quick(tec)cz
Komunikace s paralelnim portem
[*] cihelnik.chemie.pedf <cihelnik.chemie.pedf(zv)seznam(tec)cz> - 30.7.2003 17:28:34
Treba TVicLPT
http://www.entechtaiwan.com/tools.htm
ale jinak komponenta neni treba.
Hezky den,
Simon Cihelnik
> Potrebuji komunikovat s paralelnim portem, potreboval bych k tomu nejake
komponenty. Muzete mi nekdo nejake doporucit?
> D7Pro
> Marek Dostal
MainMenu
[*] Jakub Dusek <delphi(zv)corexpert(tec)com> - 30.7.2003 17:34:35
var Item : TMenuItem
begin
Item := TMenuItem.Create(MainMenu1);
Item.Caption := 'Menu item';
MainMenu1.Items.Add(Item);
end;
Jakub Dusek
----------------------------------------------------------------------
web: http://www.corexpert.com, mobile: +420 604 615 795, ICQ: 86063232
aplikace pro komfortni odesilani sms zprav, vizitek, log a melodii
=> Sms GateKeeper 2.1
======================================================================
Wednesday, July 30, 2003, 5:24:34 PM, you wrote:
S> Hellou,
S> prosimvas poradte mi nekdo jak se daji do main menu pridavat dalsi
S> polozky v runtime.