Archív konference Delphi
Zpět na výběr roku archívu nebo přejít na fulltextové vyhledávání v konferenci.
Informace v "hlavicce" souboru
[*] Petr Poto�ek <pp1(zv)volny(tec)cz> - 30.1.2000 14:55:00
Zdravim vsechny,
poradil by mi, prosim, nekdo, jak v D4 se dostanu k informacim v "hlavicce"
souboru. Jedna se mi o datum a cas vytvoreni digitalni fotky. Kdyz soubor
JPG otevru pres WordPad vidim datum,cas,typ fotoaparatu atd., ale nevim jak
se k temto informacim dostat ( a dale zpracovavat ) z Delphi.
Predem dekuji za kazdy namet.
Petr Potocek
Jak na velke pole ?
[*] Infra Red <nezadal(zv)volny(tec)cz> - 31.1.2000 00:31:32
Ahoj,
potreboval bych v urcitem okamziku pracovat s polem o velikosti 1024x1024x2
of Single (Fourierova transformace obrazu).
Hlasi mi to EStackOverflow. Je vubec mozne pracovat s tak velkym polem ?
Kdyz ano, tak jak ?
Diky, Martin Nezadal (jsem zacatecnik)
nezadal(zv)volny(tec)cz
TControl.OnMouseDown ?
[*] Mirek Junek <mjunek(zv)uo.fairnet(tec)cz> - 31.1.2000 18:04:26
Ahoj,
OnMouseDown nastesti neni Private, ale Protected (Private by slo hur). Ve
vetsine pripadu si lze pomoci takovouhle cunacinkou:
v Implemantation si nadefinujes nejaky class dedici z "nedostupneho" classu,
pak se na Protected metodu dostanes pretypovanim. Priklad asi bude
nazornejsi , nejak se nedovedu vymacknout:
napr. chces OnMouseDown tridy tCalendar (ze Samples) priradit jine
OnMouseDown udalosti - dejme tomu Edit1.OnMouseDown. V Implementation sekci
si nadefinujes
tMyCalend=class (tCalendar);
Pak uz muzes pouzit
tMyCalend (Calendar1).OnMouseDown := Edit1MouseDown;
Stejne se dostanes na Protected property predku, napr.
Label2.Caption := IntToStr (tMyCalend (Calendar1).Row);
Toz tak
Mirek
| Potreboval bych za behu promenne typu TControl priradit udalost
OnMouseDown.
| Kdyby to byl napriklad TButton tak by to samozrejme nebyl zadny problem,
| ale TControl ma OnMouseDown v private sekci a je tak pro mne nedostupna.
|
| Jedno z reseni, ktere me napadlo, je uprava VCL a preneseni OnMouseDown
| v TControl do public (nebo published?) sekce, ale nezda se mi to moc
| koser...
|
| Jestli mate nejake reseni a nebo jestli se vam zda to moje schudne, dejte
| prosim vedet.
|
| Tomas Bihary
|Zobrazoani obrazku v TImage
[*] Va�ek N�vrat���zx"��뢖�z?� - 31.1.2000 20:40:01
Zdravicko :o)
Mam jeden spise "kosmeticky" problem. Mam dva obrazky (JPG) - jeden predstavuje obycejny napis, druhy predstavuje ten samy napis ale zvyrazneny. V programu je standardne ten prvni obrazek, ale kdyz se na nej najede mysi, chci aby se zobrazil ten druhy. A tady nastava problem - vzdycky, kdyz se meni obrazek(otazka momentu), tak to trochu problikne (behem te zmeny). Zkousel jsem ty obrazky nahrat pri startu programu do dvou TPicture a kdyz je treba, tak je predavat Image1 pomoci TGraphic, ale nepomohlo to. Normalne by to probliknuti nevadilo, ale tady se jedna o multimedialni program, kde by tim zhyckani uzivatele asi nebyli nadceni :-(.
S pozdravem
Vasek Navrat
Data za LEDEN 2000
[*] Slavek Rydval <rk(zv)atrey.karlin.mff.cuni(tec)cz> - 31.1.2000 22:10:18
Preji vsem pekneho dne,
prave doslo k nejhorsimu, byl jsem nucen odstranit vsechna data z
konference, ktera jsem mel na strankach. Diky vsem, kteri si je
stahli (a jeste vice tem, kteri mi to dali i vedet).
Na druhou stranu si tam muzete stahnout NOVA data za leden
2000 a pridat si je ke stavajicim. Krome toho je na strance jeste
par cisel, kolik vas bylo a podobne.
Adresa jako obvykle:
http://atrey.karlin.mff.cuni(tec)cz/~rk/DataZKonference.shtml
Slavek
-------------------------------------------------
http://atrey.karlin.mff.cuni(tec)cz/~rk
-------------------------------------------------
http://www.swnet(tec)cz
Magazin informacne vyspelych jedincu
-------------------------------------------------
Rodna cisla -bankovni ucty
[*] vp <vpetr(zv)bigfoot(tec)com> - 31.1.2000 22:43:31
tak tohle lze najit na usisu, ale jaky je algoritmus na bankovni ucty?
----- Original Message -----
From: "Mirek Junek" <mjunek(zv)uo.fairnet(tec)cz>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Monday, January 31, 2000 4:47 PM
Subject: Re: Rodna cisla
>
> |
> |
> | > Je to trochu jinak
> | > plati rr+mm+dd+ab+cd mod 11 = 0
> |
> | (alebo 11)
> |
> | > ne soucet cislic ale soucet dvojic cislic je (vetsinou ) celociselne
> | > delitelny 11. takze
> |
> | do roku 1953 ziadne a potom maju vsetky modulo 11
> |
> | > Prechod na 4 mistna rodna cisla byl myslim v roce 1953.
> |
> | Presne
> |
> | >> Na delitelnost 11 se bohuzel nelze spolehat (a lide narozeni v jinych
> | > zemich casto r.c. nemaji vubec). Navic se (tusim pri kuponove
> privatizaci)
> | > prislo na to, ze existuji lide s
> | > identickymi rodnymi cisly. Chybicka se obcas vloudi.
> |
> | To by nevadilo, ale maju rovnake meno, trvaly pobyt...a kua..niektory sa
> tak
> | podobaju ze ta ide rozhodit. Je ich par tisic a kopec ludi o tom ani
> nevie.
> |
> | > Nektere aplikace pouziti r.c. vyzaduji, protoje dobre delitelnost 11
> | > kontrolovat pri zadavani dat, ale kdyz to nevyjde, tak se pouze zeptat
> | > obsluhy, jestlti to je tak spravne.
> |
> | Ako som povedal, zistis ci je 3 miestne zacislie, ak hej, modulo
> | nekontrolujes, inac kontrolujes.
>
> Pozor - Ne vsechna ctyrmistna rc jsou delitelna 11 (zkusenost z praxe :-)
>
> Mirek
>
>
>
>Delitelnost (was Re: Rodna cisla)
[*] Roland Tur�an (RoTurSoft) <rotursoft(zv)nextra.sk> - 1.2.2000 00:02:41
>Subject: Delitelnost (was Re: Rodna cisla)
Ja tak viem ze ak je rodne cislo >=1.1.1954 tak plati ze rodne cislo napr.
7702176713 vydelis 11 vyde ti cislo, ktore musi byt cele, bez zvysku, t.j.
RODNE_CISLO MOD 11 sa musi rovnat 0.
Haj. Roland Turcan.
Adonis a asynchronni vykonavani prikazu
[*] DELPHI <DELPHI(zv)dingo(tec)cz> - 31.1.2000 23:08:30 gmt
> Ahoj,
>
> nevite jak zjistit ukonceni synchronniho vykonavani
> SQL dotazu prikazem ExecSQL?
Omlouvam se, chtel jsem rict asynchronniho....
>
> Chapu-li to dobre, tak v takovem pripade prikaz
> CompleteSQL ceka na dokonceni.
> Lze to zjistit i nejakym priznakem,
> abych nemusel blokovat program?
>
> Diky
>
> Bob
>
>
Bankovni ucty > Rodna cisla
[*] Roland Tur�an (RoTurSoft) <rotursoft(zv)nextra.sk> - 1.2.2000 00:09:21
> tak tohle lze najit na usisu, ale jaky je algoritmus na bankovni ucty?
Skus toto, aspon na slovensku to zatial, dufam plati.
POZOR, pri kontrole uctu 10006-1234567890/0100 musis zadat len cisloBU, bez
Predcislia a kodu banku.
PS: Co sa tyka kontroly predcislia a specifickeho symbolu, tak to este
zistujem.
PS2: Ci to funguje aj Cechach daj mi pliz vediet, som zvedavy, lebo Cechy
maju skoro rovnaku bankovu sferu.
------------------------------------------------------------
function SpravneCisloUctu(CisloUctu:String):Boolean;
var CisloU:real;
Vysledok:Integer;
Ucet:string[11];
SiedmyZnak:string[1];
begin
Result:=False;
if CisloUctu='' then begin Result:=true; Exit; end;
try
CisloU:=StrToFloat(CisloUctu);
except
vypischybu('Chyba pri prevode ��sla ��tu.');
Exit;
end;
Ucet:='0000000000';
Ucet:=Copy(Ucet,1,10-Length(FloatToStr(CisloU)))+FloatToStr(CisloU);
CisloU:=StrToFloat(Ucet[1])*6+
StrToFloat(Ucet[2])*3+
StrToFloat(Ucet[3])*7+
StrToFloat(Ucet[4])*9+
StrToFloat(Ucet[5])*10+
StrToFloat(Ucet[6])*5+
StrToFloat(Ucet[8])*4+
StrToFloat(Ucet[9])*2+
StrToFloat(Ucet[10]);
Vysledok:=(Round(CisloU)) mod 11;
Case Vysledok of
0 : SiedmyZnak := '0';
1 : SiedmyZnak := '4';
2 : SiedmyZnak := '8';
3 : SiedmyZnak := '1';
4 : SiedmyZnak := '5';
5 : SiedmyZnak := '9';
6 : SiedmyZnak := '2';
7 : SiedmyZnak := '6';
8 : SiedmyZnak := '8';
9 : SiedmyZnak := '3';
10: SiedmyZnak := '7';
end;
if Ucet[7]=SiedmyZnak then Result:=True;
end;
----------------------------------------------------------------
Hi. Roland Turcan.
LMD-Tools
[*] Petr Zahradnik <clexpert(zv)clexpert(tec)cz> - 1.2.2000 00:30:02
Puvodni zprava, kterou napsal Bene� Jaroslav dne 31 Jan 00,:
> k Delphi 5 je dodavano CD na kterem je i soubor komponent LMD-Tools (Tools
> special edition for Delphi 5). Pokud tento balik nekdo pouzivate, jak lze
> udelat aktualizaci (existuje-li http://www.lmd.de), nebo je potreba neco
> dokoupit?
No ja jsem si koupil plnou se zdrojakama... Ted je 4.52
a brzy pry bude verze 5.
S pozdravem
Petr Zahradnik, pocitacovy expert
Autorizovany dealer TurboPower Software... knihovny pro Delphi
==============================================================
=== Petr Zahradnik - Computer Laboratory ===
=== Obvodova 740/14, PO BOX 15, 400 07 Usti nad Labem 7 ===
=== telefon: 047-5500610, telefon/fax: 047-5501627 ===
=== mobilni telefon GSM (hotline): 0602-409601 ===
=== http://www.clexpert(tec)cz/ clexpert(zv)clexpert(tec)cz ===
==============================================================
ICQ: 21215917, PGP vitano
Kontrola spravnosti ICO
[*] Roland Tur�an (RoTurSoft) <rotursoft(zv)nextra.sk> - 1.2.2000 01:06:35
Ako sa kontroluje spravnost identifikacneho cisla organizacie ICO?
Tenk j� veri ma�.
H�j. Roland Tur�an
Pomale kreslenie na Canvas ... ?
[*] Pavol Stolc <pstolc(zv)sc.sknet.sk> - 1.2.2000 01:28:28
Co tak este porovnat graficku kartu a jej nastavenie (akceleracia) ?
Pavol Stolc
pstolc(zv)sc.sknet.sk
----- Original Message -----
From: J�n Grman <janog(zv)pluto.elf.stuba.sk>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Monday, January 31, 2000 6:03 PM
Subject: Pomale kreslenie na Canvas ... ?> Priatelia, mam nasledujuci problem...D5 Enterprise, MS SQL 7.0, BDE 5.01
>
> - jedna sa o viacvrstvovu aplikaciu
> - klient komunikuje so serverom aplikacie cez DCOM
> - server taha data pouzitim BDE z MS SQL servera
>
> - klient ziska komplet DATA jedneho riadku tabulky (obycajny selekt * from
> tabulka where ID = 56)
> - hlavna informacia v tomo riadku je kodovana v MEMO poli
> - tato informacia sa dekoduje a pouzije sa v "nahlade objektu"
> - ten nahlad moze obsahovat rozne prvky - ciary, obdlzniky, texty
staticke,
> texty vytvorene z dekodovanej informacie, ... - typicky sa napriklad da
> definovat napr. legitimacia zakaznika organizacie ...
> - jednotlive prvky sa kreslia na CANVAS (bud TImage, alebo TPrinter -
podla
> toho ci ide o nahlad alebo tlac)
>
> Problem:
> - u mna na pocitaci chodi vsetko ako na "dratkach" (NT 4.0 Worstation,
> SP5.0, IE5.0)
> - na inom pocitaci vo firme (NT 4.0 Server, SP5.0, IE4.0, s instalaciou
> D3) to tiez slape dobre...
> - u zakaznika1 pri rovnakom pocte zaznamov (skratka zhodnej databaze)
cela
> operacia nahladu trva radovo 3-5krat dlhsie... (NT 4.0 Enterprise Server,
> SP6.0, IE (neviem presne ale min. 4.0), DELPHI tam nikdy neboli
> samozrejme...)
> - u zakaznika2 je to to iste - rozdiely SP5
>
> Este som zabudol ze:
> - u mna bezim 1152 x 864x65536 color, na nasom serveri 800x600x65536
> color, zakaznik 1 800x600x16 color!!! a zakaznik 2 na 800x600x65536
> color....
>
> Ziskanie riadku na stranu klienta je vo vsetkych pripadoch velmi rychle,
> potom to vsak na niecom stoji...
> Zacinam mat podozrenie na verzie niektorych systemovych DLLiek...
> Ja som s toho hotovy.... nestretol sa s niecim podobnym niekto... s
hocicim
> co by sa priznakmi aspon podobalo ??
>
> Za vsetky napady vrela VDAKA.
>
> JaNo.
> Vdaka
Find v db
[*] Pavol Stolc <pstolc(zv)sc.sknet.sk> - 1.2.2000 01:30:54
> Zdravim,
>
> mam jednu otazocku. Akymi sposobmi sa da vyhladavat v TDataset. V
podstate,
> ze co sa musi urobit po stlaceni najdi prvy,
>
> 1. ak hladam iba v jednom poli
TDataSet.Locate(...)
> 2. vo vsetkych poliach
Tak toto treba vlastnorucne naprogramovat...
Palo Stolc.Shareware,registracie
[*] Jan Fiala <jan.fiala(zv)iol(tec)cz> - 1.2.2000 07:07:30
Pokud je to software, ktery nejak porizuje data, lze to udelat i tak, ze omezis
jejich pocet, napr. poridit pouze 20 dokladu, prehrat pouze prvni 3 pisnicky
apod.
====================
Jan Fiala jan.fiala(zv)iol(tec)cz
Prog-Soft s.r.o. Plzen
====================
----- Original Message -----
From: Lud�k ZITA <konference(zv)sales(tec)cz>> Majo Petrik
> Zdravim!
> Rad by som poznal nejaky normalny sposob
> ako zo svojej aplikacie vytvorit casovo limitovany
> shareware...
Val a Currency
[*] Jan Fiala <jan.fiala(zv)iol(tec)cz> - 1.2.2000 07:16:46
Zkus pouzit deklaraci :
C : TCurrency;
====================
Jan Fiala jan.fiala(zv)iol(tec)cz
Prog-Soft s.r.o. Plzen
====================
----- Original Message -----
From: Ondrej Jaura <jaura(zv)datalock.sk>> Prajem prijemny podvecer :)
>
>
> Procedura Val nema rada currency?
>
> Val(s, c, i);
> s: string;
> c: currency;
> i: integer;
>
> Delphi na mna hodia hlasku: "Left side cannot be assigned to" (Ale ved
> Currency je real-type.)
>
> Ak to nepojde tymto smerom, ako previest string na cislo, bez straty
> presnosti, ktoru ponuka Currency (nehcem ziadne priblizne hodnoty - vid
> """presnost""" real ci double).
>
> Dakujem za zachranne kolesa
>
> Ondrej Jaura
>
> [ Ondrej Jaura ] [ jaura(zv)datalock.sk ] [ Datalock a.s. ] [ :) ]
>
>
> Shareware,registracie
[*] Polak Jiri <Jiri.Polak(zv)tconsult(tec)cz> - 1.2.2000 07:24:05
> -----P�vodn� zpr�va-----
> Od: Lud�k ZITA [mailto:konference(zv)sales(tec)cz]
> Odesl�no: 31. ledna 2000 21:17
> Komu: delphi-l(zv)fwd(tec)cz
> P�edm�t: RE: Shareware,registracie
>
>
> > Majo Petrik
>
> > Zdravim!
> > Rad by som poznal nejaky normalny sposob
> > ako zo svojej aplikacie vytvorit casovo limitovany
> > shareware...
>
> Ahoj.
> Jednim z postupu je napr tento:
> 1) Pri prvnim spusteni (nebo pri instalaci)zapises do registru datum
> instalace a kodovane ho zapises do dalsiho (muze jich byt i
> vice) souboru na
> disku. Soubor by mel byt nenapadny napr. jedna ze free
> component BlindGuard
> (kterou najdes na www.utilmind.com) umistuje tento soubor do
> C:\WINDOWS\spool\PRINTERS.
> No a pak jiz jen kontrolujes, zda souhlasi zapis v registru s
> zapisem v
> souboru a pocitas dobu pouzivani a pod.
> Pochopitelne je dobre se drzet techto zasad:
> 1) Cesta a nazev souboru nesmi byt v exe zapsana jako holy
> string. Je treba
> to aspon oXORovat.
> 2) Je dobre u toho souboru zmenit datum vytvoreni nekam do minulosti.
> 3) Je dobre pokud nazev souboru nejak asocijuje s nazvy
> systemovych souboru
> Windows.
>
FUJ
Jura
Win 2000 (was RE: pripojeni k internetu)
[*] Jan Fiala <jan.fiala(zv)iol(tec)cz> - 1.2.2000 07:24:44
Nainstaloval jsem RC1, jak vyslo RC2 tak jsem to preinstaloval. A protoze mam
notebook s 2GB HDD a chci tam mit jeste neco jineho nez jen NT, patral jsem,
proc mam na disku o 200 MB min, hledal jsem stejne soubory a to je vysledek.
Kdyz jsem to smazal a NT bezela dal (a od te doby bezi), doufam, ze to muzu
prohlasit.
====================
Jan Fiala jan.fiala(zv)iol(tec)cz
Prog-Soft s.r.o. Plzen
====================
----- Original Message -----
From: Slavek Rydval <rk(zv)atrey.karlin.mff.cuni(tec)cz>> Ahoj,
>
> > Urcite jsi nainstaloval RC1 a pak pres nej RC2.
> ****Ne e. Je to rovnou RC2.
>
> > Podivej se do adresare
> > WinNT\System32\DLLCache a vse co tam je muzes vymazat - jsou to starsi
> > verze DLL, ktere byly nahrazeny novejsimi (asi 200 MB)
> ****Ale ty soubory tam presto jsou. Jak jsi zjistil, ze to muze
> smazat?
>
> Slavek
Zobrazoani obrazku v TImage
[*] caoperator(zv)ozjc.cpost(tec)cz - 1.2.2000 7:49:32
Preju hezkej den 8^)),
mozna by stalo za to resit to podobnym zpusobem jako na WWW strance, kde se tyhle obrazky nahravaji do array a pak se podle potreby jen sahne do urciteho prvku se spravnym obrazkem. Array s obrazkama se pri nacitani stranky natahne do pameti, takze prodleva mezi vymenou je minimalni. Priznavam ale, ze jsem to nezkousel prakticky v Delphi...
David Viktora (038/7010362, 0603/844618)
region�ln� oper�tor certifika�n� autority
�esk� po�ta s.p., o.z. VTJ�
Nemanick� 16
370 20 �esk� Bud�jovice
hot-line 07:00 - 11:30, 12:00 - 15:00
-----Original Message-----
From: engine(zv)ropacek(tec)cz [mailto:engine(zv)ropacek(tec)cz]
Sent: Monday, January 31, 2000 8:40 PM
To: "Delphi forum" <delphi-l(zv)fwd(tec)cz>; caoperator(zv)ozjc.cpost(tec)cz
Subject: Zobrazoani obrazku v TImage
Zdravicko :o)
Mam jeden spise "kosmeticky" problem. Mam dva obrazky (JPG) - jeden predstavuje obycejny napis, druhy predstavuje ten samy napis ale zvyrazneny. V programu je standardne ten prvni obrazek, ale kdyz se na nej najede mysi, chci aby se zobrazil ten druhy. A tady nastava problem - vzdycky, kdyz se meni obrazek(otazka momentu), tak to trochu problikne (behem te zmeny). Zkousel jsem ty obrazky nahrat pri startu programu do dvou TPicture a kdyz je treba, tak je predavat Image1 pomoci TGraphic, ale nepomohlo to. Normalne by to probliknuti nevadilo, ale tady se jedna o multimedialni program, kde by tim zhyckani uzivatele asi nebyli nadceni :-(.
S pozdravem
Vasek Navrat
---
P��choz� zpr�va neobsahuje viry.
Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.116 / Virov� b�ze: 55 - datum vyd�n�: 10.1.2000
---
Odchoz� zpr�va neobsahuje viry.
Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.116 / Virov� b�ze: 55 - datum vyd�n�: 10.1.2000
Foxpro a hlaseni - DIK
[*] Zbynek Ceska <zbyces(zv)physics.muni(tec)cz> - 1.2.2000 07:57:23
> Nastav SET SAFETY OFF.
To je presne ono. Diky moc.
^^^^^^^^
Zbynek Ceska.
*************************************************************************
** Mgr. (MSc.) Zbynek Ceska ** http://www.sci.muni(tec)cz/~zbyces ******
** Plasma Physics ** High Technology Physics ** Microwave Physics **
*************************************************************************SQL server zdarma
[*] Jaro <jaro(zv)sinea(tec)cz> - 1.2.2000 00:04:00 -0800
> - "takmer" domaci produkt. Pre mna je to velke plus pretoze ked mam alebo som
> mal lubovolny problem
> tak mam takmer okamzite riesenie a to ci uz obycajnou radou alebo patchom
> ktory tu chybu riesi. A to
> nek sa na mna nikto nehneva neroby ziadna firma ktora DB produkty vyvyja. Vo
> vacsine pripadov sa chyby len zbieraju
> a ked ich je dostatocny pocet opravenych (niekedy az po pol roku) vyda sa
> upgrade ktory chyby riesi. Pre mna to je
> neprijatelne
>
> - spolahlivost a stabilita WB602
Ja mam zkusenosti trochu jine. Pouzival jsem tedy jiz drive (nyni jiz starsi
verzi) WB602
a utekl jsem od toho pro prilisnou chybovost a nestabilitu.
U Interbase jsem se nesetkal se zavaznymi chybami - a updaty jsou dostatecne
caste.
Staci se podivat, jak rychle nasledovaly verze 5.0, 5.1, 5.5 a 5.6
>
> - WinBase umoznuje importy a exporty dat do inych formatov (nativny WB,TXT,
> DBF). Tiez funkcia ktora mi
> inde chyba.
To je pitomost. Datapump u Interbase umel import a export uz u verze 3.2.
Pravda svetovy standard WB tam chybi.
> - Upravovanie velkosti databaze (kompaktovanie) , funkcia ktoru povazujem u DB
> stroja za potrebnu. Napriklad toto
> nie je poriadne vyriesene ani v Interbase.
To je take nepravda. To samozrejme Interbase umi. Zpravidla to dela automaticky
a da se to nastavit.
>
> Ak by som sa vsak drzal subjektu "SQL server zdarma" a rozmislal ktory SQL
> server si vybrat tak radcej ako InterBase si zvolim WinBase pretoze
> Software602 neprestava WinBase602 vyvyjat nadalej, je to len zmenena licencna
> politika. Kdezto Interbase ako vyvoj skoncil
A to psali v Rudem pravu, ne?
a verzia ktora bude uvolnena moze
> byt funkcna a bezchybna ale nie je to iste. Spolahliva bude mozno az
> vtedy ked ju niekto "vezme pod palec" a nieco z nej urobi. Brat technicku
> podporu na Interbase ako 100% riesenie
> problemov ?
Ja pouzivam IB nekolik let a zadnou technickou podporu jsem nikdy nepotreboval a
nepotrebuju.
Jednoduse proto, ze to funguje a namam s tim problemy. Nevim, kdy bude IB
spolehliva
podle tvych predstav. Ona je dostatecne spolehliva uz ted a byla spolehliva i v
dobe, kdy jsem od
WB602 utekl. V tom je mozna ten rozdil. Zatimco tobe u 602 pomahali resit
problemy, ja
zadnou pomoc nepotreboval.
Ja se neposmivam produktum 602 a vazim si jejich prace. WB602 se mi libila v
dobe,
kdy toho na trhu u nas za rozumnou cenu jeste tolik nebylo.
Bohuzel v te dobe ta funkcnost nebyla dobra.
Dnesni situaci neznam, ale dnes jsou velmi dobre i jine servery a neni pravda,
ze toho umi mene
a ze jsou pomalejsi. Kdyby to byla pravda, tak uz by je WB602 zrejme vytlacila
z trhu.
Zatim jsem si ovsem nevsiml, ze by se neco takoveho delo. O vedouci postaveni
svadeji boj
uplne jine servery.
Pro mne zpravidla neni rozhodujici rychlost v Update a Insert, ale v
transakcich,
slozitych vyberech pres vice tabulek a pod. Dale pak moznosti vlastniho
programovaciho jazyka a pod.
Neni test jako test a kazdy test je zavadejici.
Dulezite je, jak se to chova v hotovych programech.
Jaro
> - urcite to nebude zadarmo
> - dlhe cakanie na riesenie problemu , ak vobec riesenie bude
Ty jsi nejspis vestec.
> - mam strach ze budu podporovat aj mutacie Interbase ktore medzicasom
> vzniknu :(
Z ceho mas strach, kdyz IB nepouzivas??? Ja IB pouzivam a strach nemam. Mozna na
zmene obchodni strategie vydelaji moji zakaznici, protoze koupi levnejsi server
nebo
bude k dispozici bezplatne. Mozna to bude jinak, ale to ukaze budoucnost.
Ja vesteckou kvalifikaci nedisponuji.
Jaro
Rodna cisla -bankovni ucty
[*] Mirek Junek <mjunek(zv)uo.fairnet(tec)cz> - 1.2.2000 09:14:08
| tak tohle lze najit na usisu, ale jaky je algoritmus na bankovni ucty?
Kazda banka to ma (obecne) jinak, je potreba vyzadat informace od konkretni
banky.
Zdar,
Mirek
(castecny) : Athena
[*] Pavel ZIDEK <kopr(zv)kopr(tec)cz> - 1.2.2000 09:17:03
Zkus
http://www.freefoto.com/> <OT>
> Nevite prosim nekdo URL obrazku ateny
> nebo kolosea (barevnem) velikem cca
> 300x300 pixelu ?
> </OT>
>
> Diky moc...
> ...Dobra
> Jak na velke pole ?
[*] Pavel ZIDEK <kopr(zv)kopr(tec)cz> - 1.2.2000 09:45:03
Podobny problem jsem mel pred 10 lety, kdy doopravdy nebylo RAMky na
rozhazovani a vyresil jsem to tak, ze jsem pole udelal jako soubor a
pracoval s pameti na hardu.
Tzn. udelas pole 1..1024 a ulozis to na 1024 radku no pak to jeste jednou
zopakujes (tj. x2) a mas to.
Pavel
> potreboval bych v urcitem okamziku pracovat s polem o velikosti
1024x1024x2
> of Single (Fourierova transformace obrazu).
> Hlasi mi to EStackOverflow. Je vubec mozne pracovat s tak velkym polem ?
> Kdyz ano, tak jak ?
> Diky, Martin Nezadal (jsem zacatecnik)
> nezadal(zv)volny(tec)cz
>
>Cteni e-mailu pomoci MAPI
[*] rdocekal(zv)csas(tec)cz - 1.2.2000 09:47:56
Pouzivam komponentu TEmail, vse co potrebujes umi. Je free a da se najit
napr. na DSP. Hledej temail2.zip.
S pozdravem
Radek Docekal
<mailto:rdocekal(zv)csas(tec)cz> ICQ: 9008367
> -----P�vodn� zpr�va-----
> Od: Jind�ich Nikodem [mailto:nikodem(zv)kh-kinetic(tec)cz]
> Odesl�no: 31. ledna 2000 11:24
> Komu: konference delphi
> P�edm�t: Cteni e-mailu pomoci MAPI
>
>
> Ahoj vsem,
>
> potrebuji pomoci Delphi 4 Std. stahnout vsechny e-maily
> (pomoci MAPI) a pak
> projit vsechny nove zpravy a precist si jejich predmet.
> Nevite nekdo jak na
> to?
>
>
>
> O neco jsem se pokousel. Predmet e-mailu umim precist, ale
> jen pokud se dany
> e-mail nachazi ve slozce dorucena posta v Outlooku, ale ja
> potrebuji abych
> nove e-maily stahnul (Odeslat/Prijmout) a jeden po druhem si prosel.
>
>
>
>
>
> Za kazdou odpoved predem dekuji
>
> Jindrich Nikodem
>
>
>
> nikodem(zv)kh-kinetic(tec)cz
>
>
>
> SQL server zdarma
[*] Ivan Turcan <iturcan(zv)gamo.sk> - 1.2.2000 10:04:40
>> - "takmer" domaci produkt. Pre mna je to velke plus pretoze ked mam alebo som
>> mal lubovolny problem
>> tak mam takmer okamzite riesenie a to ci uz obycajnou radou alebo patchom
>> ktory tu chybu riesi. A to
>> nek sa na mna nikto nehneva neroby ziadna firma ktora DB produkty vyvyja.
Vo
>> vacsine pripadov sa chyby len zbieraju
>> a ked ich je dostatocny pocet opravenych (niekedy az po pol roku) vyda sa
>> upgrade ktory chyby riesi. Pre mna to je
>> neprijatelne
>>
>> - spolahlivost a stabilita WB602
>Ja mam zkusenosti trochu jine. Pouzival jsem tedy jiz drive (nyni jiz starsi
>verzi) WB602
>a utekl jsem od toho pro prilisnou chybovost a nestabilitu.
>U Interbase jsem se nesetkal se zavaznymi chybami - a updaty jsou dostatecne
>caste.
Tak to si asi jediny, ale vlastne preco ak v aplikaciach mas radovo tisice
zaznamov
a vytvaras lokalne verzie softu eventualne mas mali pocet uzv. zavesenych nad
Interbase
tak problem ani nezbadas.
Ja mam aplikacie kde je radovo cca. 800 000 zaznamov na tabulku a viac, a
rozhodne by
som tieto data nezveril Interbase. Nielen podla mojich skusenosti je Interbase
pod Windows
nestabilna. Stretol som sa z mnozstvom zakaznikov ktory mali problemi z
Interbase (zahlcovanie servra, padanie, nestabilita).
>Staci se podivat, jak rychle nasledovaly verze 5.0, 5.1, 5.5 a 5.6
to hej, dokonca poznam jedneho pouzivatela Interbase ktory prechadzal postupne
od
Interbase 4.0 po 5.5 (pod Windows) a ziadna nevyriesila jeho problemi. Nepomohli
ani osobne konzultacie z vyvojarmi Interbase. Jedine co ciastocne problem
vyriesilo
bolo prejst na Interbase pod Unixom.
Cize upresnujem Interbase pod Windows nestabilna je a nie je to vymisel ale
hole fakty. Jedine kde sa o nej da uvazovat je Unix.
>>
>> - WinBase umoznuje importy a exporty dat do inych formatov (nativny WB,TXT,
>> DBF). Tiez funkcia ktora mi
>> inde chyba.
>To je pitomost. Datapump u Interbase umel import a export uz u verze 3.2.
>Pravda svetovy standard WB tam chybi.
DataPump nie je integrovana sucast Interbase ! Inak. napr. vie to aj Access
>> - Upravovanie velkosti databaze (kompaktovanie) , funkcia ktoru povazujem u
DB
>> stroja za potrebnu. Napriklad toto
>> nie je poriadne vyriesene ani v Interbase.
>To je take nepravda. To samozrejme Interbase umi. Zpravidla to dela automaticky
>a da se to nastavit.
Ako vydim zarity pouzivatel Interbase. prikl. Vytvor si prazdnu databazu , do
nej tabulku
a tu potom napln aspon 5000000 vetami. Teraz tieto vety zmaz (blby priklad ale
dajmetomu ze tie vety v Interbase spracuvam a posielam dalej, tzn. po spracovani
su nepotrebne) a porovnaj si velkost databaze pred a za tymto pokusom. A skus aj
zapnut kompaktovanie ktore tu spominas.>>
>> Ak by som sa vsak drzal subjektu "SQL server zdarma" a rozmislal ktory SQL
>> server si vybrat tak radcej ako InterBase si zvolim WinBase pretoze
>> Software602 neprestava WinBase602 vyvyjat nadalej, je to len zmenena licencna
>> politika. Kdezto Interbase ako vyvoj skoncil
>A to psali v Rudem pravu, ne?
nie v Modrom :)>>a verzia ktora bude uvolnena moze
>> byt funkcna a bezchybna ale nie je to iste. Spolahliva bude mozno az
>> vtedy ked ju niekto "vezme pod palec" a nieco z nej urobi. Brat technicku
>> podporu na Interbase ako 100% riesenie
>> problemov ?
>Ja pouzivam IB nekolik let a zadnou technickou podporu jsem nikdy nepotreboval
a
>nepotrebuju.
>Jednoduse proto, ze to funguje a namam s tim problemy. Nevim, kdy bude IB
>spolehliva
>podle tvych predstav. Ona je dostatecne spolehliva uz ted a byla spolehliva i v
>dobe, kdy jsem od
>WB602 utekl. V tom je mozna ten rozdil. Zatimco tobe u 602 pomahali resit
>problemy, ja
>zadnou pomoc nepotreboval.
>Ja se neposmivam produktum 602 a vazim si jejich prace. WB602 se mi libila v
>dobe,
>kdy toho na trhu u nas za rozumnou cenu jeste tolik nebylo.
>Bohuzel v te dobe ta funkcnost nebyla dobra.
>Dnesni situaci neznam, ale dnes jsou velmi dobre i jine servery a neni pravda,
>ze toho umi mene
>a ze jsou pomalejsi. Kdyby to byla pravda, tak uz by je WB602 zrejme vytlacila
>z trhu.
>Zatim jsem si ovsem nevsiml, ze by se neco takoveho delo. O vedouci postaveni
>svadeji boj
>uplne jine servery.
>Pro mne zpravidla neni rozhodujici rychlost v Update a Insert, ale v
>transakcich,
>slozitych vyberech pres vice tabulek a pod. Dale pak moznosti vlastniho
>programovaciho jazyka a pod.
>Neni test jako test a kazdy test je zavadejici.
>Dulezite je, jak se to chova v hotovych programech.
No, samozrejme je dolezite ako sa databaza chova v hotovom programe. Ved ja som
testoval
databazu nad hotovou aplikaciou. A Interbase jednoducho na velke objemy dat
nestaci.
Vadi mi v Interbase tiez aj to ze databaza je v subore jednom , pricom
uzivatelia su
v subore druhom, ktory nie je v podstate nahradit inym suborom. Tzn. Interbase
nie je
bezpecna na dobytie hackerom (vsetko sa da hack-nut ale nie vsetko tak lahko ako
Interbase)
Jasne o veduce postavenie na trhu "svadej boj" ine servery ale ani Interbase by
som sem nedaval. Prevazna vacsina uzivatelov vyvyjajucich aplikacie pre
Interbase ma programatorsku
zakladnu postavenu na Delphi , popr. inom Inprise vyvojovom nastroji.
WinBase nie je a zatial urcite ani nebude veduca na svetovom trhu , pretoze jej
chybaju niektore prvky (podpora medzinarodnych znakov). Treba si uvedomit ze
WinBase je urcena
prevazne pre SK a CZ trh.>> - urcite to nebude zadarmo
>> - dlhe cakanie na riesenie problemu , ak vobec riesenie bude
>Ty jsi nejspis vestec.
>> - mam strach ze budu podporovat aj mutacie Interbase ktore medzicasom
>> vzniknu :(
>Z ceho mas strach, kdyz IB nepouzivas???
>Ja IB pouzivam a strach nemam. Mozna na
>zmene obchodni strategie vydelaji moji zakaznici, protoze koupi levnejsi server
>nebo
>bude k dispozici bezplatne. Mozna to bude jinak, ale to ukaze budoucnost.
>Ja vesteckou kvalifikaci nedisponuji.
ale ba, a na zaklade coho potom pises ze nepouzivam Interbase ?
Interbase pouzivam takmer 4 roky a moze povedat ze ma niektore moznosti ktore
WinBase
nema (domeny) ale z WinBase som spokojnejsi, ma mnozstvo funkcii a datovych
typov naviac.
Ze predpokladam ako to bude z Interbase
a jej technickou podporou a funkcnostou ? nehnevaj sa na mna ale poznam osobne
niektorych
ludi, ktory Interbase vyvyjaju (-li) a poznam ako rychlo sa reaguje na technicke
problemi,
rok som pracoval v Inprise CZ v technickej podpore a co sa tyka problemov z
Interbase tak vacsina skutocnych problemov skoncila prechodom bud na iny SQL
server alebo prechodom na
Interbase pod Unixom ktora je stabilnejsia.
i.t.CAPI
[*] Ing. Lud�k Florian <Ludek.Florian(zv)bluerose(tec)cz> - 1.2.2000 10:04:29
Cauec,
muze me nekdo nasmerovat, kde najdu podrobniosti ohledne CAPI ? Potrebuji ovladat ISDN kartu od Telecomu, ale jejich informace jsou dost skromny.
Dik.
Bye Ludan
seriova komunikace
[*] lio(zv)email(tec)cz - 1.2.2000 10:13:49
Ahoj
Ve windowsech jsem novacek a muj problem spociva v tom ze potrebuju
komunikovat pres seriovou linku s 12-ti bit A/D prevodnikem.To vyzaduje
generovat rastr hodin s jednim pulsem 27 mikrosekund pro
zajisteni presne vzorkovaci frekvence mereni.
Pouzivam D3,WIN95/98 a zatim to uspesne vzdoruje jelikos pro
vytvoreni peotrebnych hodin pouzivam urcite naprosto
nevyhovujici techniku cyklu kteryma to zdrzuju , jako
napr.:
for i:=0 to 1000 do ;
Pri tomto procesu ale staci pohnout mysi a hodiny jsou v tahu(natoz pustit jinou aplikaci).
Jine reseni me nenapadlo jelikos vym ze timer nejede rychleji jak 55ms coz je ale strasne
pomale.(v DOSu jsem to udelal tak ze jsem zrychlil hodiny a bylo po problemu, ale ve WIN?)
Prosim bud o radu jak to udelat,nebo aspon naznak kde najit informace,poripade proc
to nejde.
Standa Vechet amatersky programator
--- CREATED BY ATC O..R..G..A..N..I..Z..E..R
--- http://email(tec)cz <--- Get Your Free Email
seriova komunikace
[*] lio(zv)email(tec)cz - 1.2.2000 10:22:22
Ahoj
Ve windowsech jsem novacek a muj problem spociva v tom ze potrebuju
komunikovat pres seriovou linku s 12-ti bit A/D prevodnikem.To vyzaduje
generovat rastr hodin s jednim pulsem 27 mikrosekund pro
zajisteni presne vzorkovaci frekvence mereni.
Pouzivam D3,WIN95/98 a zatim to uspesne vzdoruje jelikos pro
vytvoreni peotrebnych hodin pouzivam urcite naprosto
nevyhovujici techniku cyklu kteryma to zdrzuju , jako
napr.:
for i:=0 to 1000 do ;
Pri tomto procesu ale staci pohnout mysi a hodiny jsou v tahu(natoz pustit jinou aplikaci).
Jine reseni me nenapadlo jelikos vym ze timer nejede rychleji jak 55ms coz je ale strasne
pomale.(v DOSu jsem to udelal tak ze jsem zrychlil hodiny a bylo po problemu, ale ve WIN?)
Prosim bud o radu jak to udelat,nebo aspon naznak kde najit informace,poripade proc
to nejde.
Standa Vechet amatersky programator
--- CREATED BY ATC O..R..G..A..N..I..Z..E..R
--- http://email(tec)cz <--- Get Your Free Email
generovani nazvu
[*] sup(zv)svitap(tec)cz - 1.2.2000 10:25:18
>On Sun, 30 Jan 2000, [iso-8859-2] Bejvlov� Martina wrote:
>
>> stejne se mi to na disk nevejde. Uz si ze skoly z kombinatoriky moc
>> nepamatuji, ale tech variaci musi byt strasne moc.
>
>Ahojte,
>jestli se nepletu
>
> 8 k
> sum 36 = 2,901,713,047,668
> k=1
>
>coz je docela velky cislo.
>
Ono to bude jeste potom ocesavany, napr. nebudou smet byt dve a vice
stejnych pismen vedle sebe apod.
Jaroslav Weiss
odd. informatiky
SVITAP J.H.J. s.r.o.
Kijevska 6-8
SVITAVY
568 02
tel: ++420-461-568 202
fax: ++420-461-568 300
E-mail: sup(zv)svitap(tec)cz
URL: www.svitap(tec)cz
FTP: ftp.svitap(tec)cz
Jak na velke pole ?
[*] Slavek Rydval <rk(zv)atrey.karlin.mff.cuni(tec)cz> - 1.2.2000 10:51:01
Ahoj,
mas to globalni promennou nebo to deklarujes uvnitr
metody(procedury, fce)?
Pokud to je globalni, pak je to v pohode.
Jinak... nejde to nejak jinak? Vzdyt to ma cca 8 MB.
Slavek
> Ahoj,
> potreboval bych v urcitem okamziku pracovat s polem o velikosti
> 1024x1024x2 of Single (Fourierova transformace obrazu). Hlasi mi to
> EStackOverflow. Je vubec mozne pracovat s tak velkym polem ? Kdyz ano, tak
> jak ? Diky, Martin Nezadal (jsem zacatecnik) nezadal(zv)volny(tec)cz
>
>
-------------------------------------------------
http://atrey.karlin.mff.cuni(tec)cz/~rk
-------------------------------------------------
http://www.swnet(tec)cz
Magazin informacne vyspelych jedincu
-------------------------------------------------
Find v db
[*] Tomas Vesely <veselyt(zv)bigfoot(tec)com> - 1.2.2000 11:07:32
Pouzij
function Locate(const KeyFields: String; const KeyValues: Variant; Options:
TLocateOptions): Boolean;
priklad ala help
with CustTable do
Locate('Company;Contact;Phone', VarArrayOf(['Sight Diver', 'P',
'408-431-1000']), [loPartialKey]);
Vesna
-----Original Message-----
From: Michal Hlavac <7hlavac(zv)st.fmph.uniba.sk>
To: Delphi F�rum <delphi-l(zv)fwd(tec)cz>
Date: 31. ledna 2000 17:45
Subject: Find v db
>Zdravim,
>
>mam jednu otazocku. Akymi sposobmi sa da vyhladavat v TDataset. V podstate,
>ze co sa musi urobit po stlaceni najdi prvy,
>
>1. ak hladam iba v jednom poli
>2. vo vsetkych poliach
>
>Dik, Miso
Web pocitadlo
[*] sup(zv)svitap(tec)cz - 1.2.2000 11:09:56
Dobry den. Delam webovsky pocitadlo.
Neni mi jasny, jak dostanu vygenerovany obrazek z programu.
x:=inttostr(i); // i je cislo navstevnika
s:=copy('000000',1,6-length(x))+x;
xp:=TPicture.Create;
xp.bitmap.canvas.font.name:='Lucida Console';
xp.bitmap.canvas.font.Size:=-20;
xp.bitmap.canvas.font.Style:=[fsbold];
xp.bitmap.canvas.font.Color:=clGreen;
xp.bitmap.canvas.brush.Color:=$00DDE4D8;
xp.bitmap.height:=xp.bitmap.canvas.TextHeight(s);
xp.bitmap.width:=xp.bitmap.canvas.TextWidth(s);
xp.bitmap.canvas.textout(0,0,s);
xj:=TJPEGImage.create;
xj.Assign(xp.bitmap);
.... Jak dal? Zatim to resim tak, ze to ulozim:
xj.savetofile('d:\wwwroot\number.jpg');
a zobrazim na dalsi strance.
Ale jak udelat aby fungovalo <img src="script.exe">
Jaroslav Weiss
odd. informatiky
SVITAP J.H.J. s.r.o.
Kijevska 6-8
SVITAVY
568 02
tel: ++420-461-568 202
fax: ++420-461-568 300
E-mail: sup(zv)svitap(tec)cz
URL: www.svitap(tec)cz
FTP: ftp.svitap(tec)cz
Ridke matice
[*] Petr Fischer <petr.fischer.dk(zv)email(tec)cz> - 1.2.2000 11:53:37
Zdravim,
nemate nekdo odkazy, linky, texty, napady na imlpementaci ridkych matic
(sparse matrices)??? Tzn. kdyz chci matici o rozmerech milion X milion X
milion, ktera ale obsahuje kuprikladu jen priblblych 12 hodnot a neni tudiz
nutne alokovat astronomicke pole pameti + co nejrychlejsi pristup....
Petr Fischer
E-Mail: petr.fischer(zv)email(tec)cz, ICQ#: 24154715
Web pocitadlo
[*] bozek(zv)box(tec)cz (Bozek Petr) - 1.2.2000 12:29:55
[P��loha v souboru: CGICounter1.pas]
Ahoj.
Podivej se na prilozeny zdrojak.
Petr
----- Original Message -----
From: <sup(zv)svitap(tec)cz>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Tuesday, February 01, 2000 11:09 AM
Subject: Web pocitadlo
> Dobry den. Delam webovsky pocitadlo.
> Neni mi jasny, jak dostanu vygenerovany obrazek z programu.
>
> x:=inttostr(i); // i je cislo navstevnika
> s:=copy('000000',1,6-length(x))+x;
> xp:=TPicture.Create;
> xp.bitmap.canvas.font.name:='Lucida Console';
> xp.bitmap.canvas.font.Size:=-20;
> xp.bitmap.canvas.font.Style:=[fsbold];
> xp.bitmap.canvas.font.Color:=clGreen;
> xp.bitmap.canvas.brush.Color:=$00DDE4D8;
> xp.bitmap.height:=xp.bitmap.canvas.TextHeight(s);
> xp.bitmap.width:=xp.bitmap.canvas.TextWidth(s);
> xp.bitmap.canvas.textout(0,0,s);
> xj:=TJPEGImage.create;
> xj.Assign(xp.bitmap);
> .... Jak dal? Zatim to resim tak, ze to ulozim:
> xj.savetofile('d:\wwwroot\number.jpg');
> a zobrazim na dalsi strance.
>
> Ale jak udelat aby fungovalo <img src="script.exe">
>
>
> Jaroslav Weiss
> odd. informatiky
>
> SVITAP J.H.J. s.r.o.
> Kijevska 6-8
> SVITAVY
> 568 02
>
> tel: ++420-461-568 202
> fax: ++420-461-568 300
> E-mail: sup(zv)svitap(tec)cz
> URL: www.svitap(tec)cz
> FTP: ftp.svitap(tec)cz
seriova komunikace
[*] Dalibor Toman <dtoman(zv)fortech(tec)cz> - 1.2.2000 12:38:41
>Ahoj
>Ve windowsech jsem novacek a muj problem spociva v tom ze potrebuju
>komunikovat pres seriovou linku s 12-ti bit A/D prevodnikem.To vyzaduje
>generovat rastr hodin s jednim pulsem 27 mikrosekund pro
>zajisteni presne vzorkovaci frekvence mereni.
>
>Pouzivam D3,WIN95/98 a zatim to uspesne vzdoruje jelikos pro
>vytvoreni peotrebnych hodin pouzivam urcite naprosto
>nevyhovujici techniku cyklu kteryma to zdrzuju , jako
>napr.:
>for i:=0 to 1000 do ;
>Pri tomto procesu ale staci pohnout mysi a hodiny jsou v tahu(natoz pustit
jinou aplikaci).
>Jine reseni me nenapadlo jelikos vym ze timer nejede rychleji jak 55ms coz
je ale strasne
>pomale.(v DOSu jsem to udelal tak ze jsem zrychlil hodiny a bylo po
problemu, ale ve WIN?)
>
>Prosim bud o radu jak to udelat,nebo aspon naznak kde najit
informace,poripade proc
>to nejde.
pokud je nutne dodrzet tak presne vzorkovani pak podle me je nutne:
1) nepouzivat seriak. Nechapu jak muze takhle narocna aplikace cist data
pomoci serioveho rozhrani??
2) nepouzivat windows ty jaksi nejsou vhodne pro realtime aplikace.
Sanci rozchodit ve Win mas podle me jen tehdy, kdyz prevodnik bude urcovat
okamziky pro vzorkovani sam (resp hodiny budou externi) a data bude odesilat
na seriovku. PC musi mit seriak s dostatecnym bufferem (velikost zavisi na
rychlosti komunikace).
Zdravi
D. Toman
SQL
[*] Martin <geoplan(zv)pp.sinet.sk> - 1.2.2000 12:39:18
Zdravim,
mohol by mi niekto priblizit (po lopatisticky) pojmi transakcia, ulozene procedury a triger, prip. ako to vytvorim v interbase a pouzijem v delphi ? pomocou akej komponenty.
Martin Talian
Geoplan spol s r.o.
e-mail: geoplan(zv)pp.sinet.sk
Web pocitadlo
[*] sup(zv)svitap(tec)cz - 1.2.2000 13:02:34
>> Dobry den. Delam webovsky pocitadlo.
>
>Vsetko zalezi od pohladu na vec.
>Depends...aky web server pouzivas, na akej platforme.
>Kazdopadne spustanie exacov sa deje najjednoduxsie cez cgi scripty, ktore
si
>napises
>a spublikujes. Potom ix volas napr. takymto primityvnym sposobom.
><A><img src=/cgi-bin/nph-
count?width=6&link=http://hehe.hohoh.hu/homepag.htm
>border=0 ALIGN=right></A>
>alebo:
><img src="/cgi-bin/Count.cgi?df=pocitadlo.dat">
To vsechno vim, ten exac funguje jako script. Tedka jde o to, jak dostat
obrazek z exace.
Jaroslav Weiss
odd. informatiky
SVITAP J.H.J. s.r.o.
Kijevska 6-8
SVITAVY
568 02
tel: ++420-461-568 202
fax: ++420-461-568 300
E-mail: sup(zv)svitap(tec)cz
URL: www.svitap(tec)cz
FTP: ftp.svitap(tec)cz
Jak na velke pole ?
[*] Vaclav Krmela <krmela(zv)ustinadorlici(tec)cz> - 1.2.2000 13:05:48
From: Infra Red <nezadal(zv)volny(tec)cz>
>
> Ahoj,
> potreboval bych v urcitem okamziku pracovat s polem o velikosti
1024x1024x2
> of Single (Fourierova transformace obrazu).
> Hlasi mi to EStackOverflow. Je vubec mozne pracovat s tak velkym polem ?
> Kdyz ano, tak jak ?
> Diky, Martin Nezadal (jsem zacatecnik)
> nezadal(zv)volny(tec)cz
>
Problem je v deklaraci pole. Pravdepodobne to deklarujes jako statickou
promennou. Takto to nelze. Takhle velke promenne (a i mensi) je treba
vytvaret dynamicky, napriklad:
type
PMojePole = ^TMojePole;
TMojePole = array[0..1023,0..1023,1..2] of single;
......
var Pole: PMojePole;
......
Pole := New(PMojePole);
......
Pole^[x,y,z] := .....
Neco := Pole^[x,y,z];
.......
Dispose(Pole);
Jeste poznamku, bude presnost Single dostatecna?
Pozor na malou presnost pro velkych vypoctech...
Vaclav Krmela
Rodna cisla
[*] Ladislav Dolezel <dolezel(zv)scova.vabo(tec)cz> - 01.2.2000 13:05:06
J� pravidla kontorly r.�. zn�m mali�ko trochu jinak:
pokud je z���sl� 3-m�stn�, d� se p�ed to nula a ud�l� z toho t�m p�dem 4-m�stn�.
U m�ho otce i matky to funguje.
A pak s t�m modulo 11 to zn�m"
Sou�et ��sel na lich�ch pozic�ch m�nus sou�et ��sel na sud�ch pozic�ch je bu� 0
nebo d�liteln� 11.
ro me dn / abcd
(r+m+d+a+c) - (o+e+n+b+d) = 0 nebo d�liteln� 11
-Dodo-
Delphy confera na MV SR wrote:
> > Je to trochu jinak
> > plati rr+mm+dd+ab+cd mod 11 = 0
>
> (alebo 11)
>
> > ne soucet cislic ale soucet dvojic cislic je (vetsinou ) celociselne
> > delitelny 11. takze
>
> do roku 1953 ziadne a potom maju vsetky modulo 11
>
> > Prechod na 4 mistna rodna cisla byl myslim v roce 1953.
>
> Presne
>
> >> Na delitelnost 11 se bohuzel nelze spolehat (a lide narozeni v jinych
> > zemich casto r.c. nemaji vubec). Navic se (tusim pri kuponove privatizaci)
> > prislo na to, ze existuji lide s
> > identickymi rodnymi cisly. Chybicka se obcas vloudi.
>
> To by nevadilo, ale maju rovnake meno, trvaly pobyt...a kua..niektory sa tak
> podobaju ze ta ide rozhodit. Je ich par tisic a kopec ludi o tom ani nevie.
>
> > Nektere aplikace pouziti r.c. vyzaduji, protoje dobre delitelnost 11
> > kontrolovat pri zadavani dat, ale kdyz to nevyjde, tak se pouze zeptat
> > obsluhy, jestlti to je tak spravne.
>
> Ako som povedal, zistis ci je 3 miestne zacislie, ak hej, modulo
> nekontrolujes, inac kontrolujes.
>
> > Hodne zdaru
> > Mirek
>
> > | > projekt libovolnou teorii o rodnych
> > | > cislech. Jak se pocitaji,
> > | > jaky maji format (obzvlaste ted
> > | > v roce 2000 a dal).
> > | Sucet vsetkych cislic je delitelny 11 (rrmmdd/abcd
> (r+r+m+m+d+d+a+b+c+d)
> > | mod 11 = 0).
> > | To ovsem neplati pre starsie rodne cisla (minule a zac. tohto storocia),
> > | ktore maju na konci len trojcislie (rrmmdd/abc).
> > | > koncovce je zakodovane misto
> > | > narozeni, co je na tom pravda?
> > | Ano (videl som zoznam ludi narodenych v tom istom meste a v tom istom
> > roku -
> > | vsetci mali prve dve cisla zo stvorcislia rovnake).
>
> V SR bude system duplicit coskoro vyrieseny a podobne sa na tom pracuje aj v
> Czexax.
> Xyby vznikali napr. na matrikach kde si matrikarky poziciavali RC.
> V sucastnej dobe sa duplicitne RC nevydavaju.
>
> Werki
Ridke matice
[*] Lubo� RYBN��EK - 1.2.2000 13:06:39
A co zkusit to s uplne obycejnym zretezenym seznamem?
PItem = ^TItem;
TItem = record
Val: integer;
X, Y: integer;
Next: PItem;
end;
no a pak uz si jenom napises funkci Get(X, Y): integer ktera vrati hodnotu
na pozici [X, Y] (kdyz je v seznamu) nebo 0 (kdyz to tam neni). Podobne
Set(X, Y, Val) ktera bud zmeni hodnotu polozky seznamu ktera odpovida a nebo
prida dalsi cast retezu
A s tim uz udelas uplne vsechny operace nad tou matici. Urcite to pujde
udelat i jinak, ale ja sem si vzdycky vystacil s timhle
Lubos Rybnicek
ICQ UIN 18817151
Phone: +420 603 916889
> -----Original Message-----
> From: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz]On Behalf Of
> Petr Fischer
> Sent: Tuesday, February 01, 2000 11:54 AM
> To: DELPHI-KONFERENCE
> Subject: Ridke matice
>
>
> Zdravim,
>
> nemate nekdo odkazy, linky, texty, napady na imlpementaci ridkych matic
> (sparse matrices)??? Tzn. kdyz chci matici o rozmerech milion X milion X
> milion, ktera ale obsahuje kuprikladu jen priblblych 12 hodnot a
> neni tudiz
> nutne alokovat astronomicke pole pameti + co nejrychlejsi pristup...>
> Petr Fischer
> E-Mail: petr.fischer(zv)email(tec)cz, ICQ#: 24154715
>
>
>
OT: Word dokument
[*] Tomas Holan <HOLAN(zv)ksvi.mff.cuni(tec)cz> - 1.2.2000 14:07:17
>
> sorry za OffTopic, ale mam jeden velky problem. mame wordowsky file s
> dolezitymi datami a nejde otvorit. Chyba pri otvoreni suboru. Pritom
> kopirovat ide. Pravdepodobne hlavicka suboru. Neviem
> co mam robit.
No, jestli je to takovy ten soubor, co Word obycejne uklada
(bez nejakych zvlastnosti), potom se da cist normalne ocima
(kdyz preskaces uvodni popisy fontu, zbytky jinyhc dokumentu
a buhvi co vsechno a kdyz budes cist ob-znak (dvou-bajtove znaky)).
Nic na velkou praci, ale pokud tam mas nekde ulozeno heslo (:-)),
nebo cislo uctu..., tak ho najdes.
Tom
Spousteni jinych programu z prostredi aplikace
[*] caoperator(zv)ozjc.cpost(tec)cz - 1.2.2000 13:26:16
Lidi, tahle procedurka funguje a uz mam par napadu, jak ji rozsirit a osetrit 8^))). Vrele diky - vytrhli jste mi jeden z mnoha trnu z paty. Jo, mam jeden tip: na chat serveru Undernet je skupina jmenem #delphi, a tahle skupina je moderovana nejakymi programatory z Ruska a Izraele (v anglictine), kteri se v tom docela vyznaji. Ti mi taky poradili par zajimavych veci. Vrele doporucuji navstevu.
David Viktora
-----Original Message-----
From: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz]On Behalf Of
Lubo� RYBN��EK
Sent: Friday, January 28, 2000 9:11 AM
To: delphi-l(zv)fwd(tec)cz
Subject: RE: Pozdrav
Taky zdravim,
jde to docela jednoduse. Muzes pouzit ShellExecute (tusim ze to je z unity
ShellAPI)
procedure OpenObject(sObjectPath : PChar);
begin
Screen.Cursor := crAppStart;
try
ShellExecute(0, Nil, sObjectPath, Nil, Nil, SW_NORMAL);
finally
Screen.Cursor := crDefault;
end;
end;
a pak to pouzijes treba takhle (je asi jasny co to udela):
CoOtevrit := 'C:\windows\calc.exe';
OpenObject(PChar(CoOtevrit));
Vyhoda tohohle reseni je v tom, ze muzes otevrit cokoliv, co system znaNapr:
CoOtevrit := 'http://www.zive(tec)cz'; //otevre defaultni browser se strankou
Zive
CoOtevrit := 'X:\dopis.doc'; //pusti (treba) Word a v nem dopis.doc
CoOtevrit := 'mailto:delphi-l(zv)fwd(tec)cz'; // co to asi udela? :-)
No a to je cela veda
LR
---
Odchoz� zpr�va neobsahuje viry.
Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.116 / Virov� b�ze: 55 - datum vyd�n�: 10.1.2000
Ridke matice
[*] Vetrak <vetrak(zv)datalock.sk> - 1.2.2000 13:28:47
Skus sa pozriet na metodu konecnych prvkov ( Finite element method ) , sposob zapisu matice hladaj pod nazvom "Skyline".
Celkom sikovna metoda, pokial mas symetricku maticu. Tusim je tam aj algoritmus zapisu a tiez riesenia riedkych matic, bude to treba ale prekopat z Fortranu do Delphi ( pokial budes hladat soft "Nonsap" alebo "Sap" ).
Dano
Ridke matice
[*] Tomas Bihary <tomas.bihary(zv)vslib(tec)cz> - 1.2.2000 12:42:32 -0000
Ja bych si nadefinoval typ
TPolozkaMatice = record
XIndex,
YIndex: Integer;
Hodnota: Single;
end;
a snim bych dal pracoval.
Bud v poli nebo treba s pomoci TList.
Ahoj Tomas Bihary
----- P�vodn� zpr�va -----
Od: Petr Fischer <petr.fischer.dk(zv)email(tec)cz>
Komu: DELPHI-KONFERENCE <delphi-l(zv)fwd(tec)cz>
Odesl�no: 1. �nora 2000 10:53
P�edm�t: Ridke matice
> Zdravim,
>
> nemate nekdo odkazy, linky, texty, napady na imlpementaci ridkych matic
> (sparse matrices)??? Tzn. kdyz chci matici o rozmerech milion X milion X
> milion, ktera ale obsahuje kuprikladu jen priblblych 12 hodnot a neni
tudiz
> nutne alokovat astronomicke pole pameti + co nejrychlejsi pristup....
>
> Petr Fischer
> E-Mail: petr.fischer(zv)email(tec)cz, ICQ#: 24154715
>
>
>Rodna cisla -bankovni ucty
[*] Ale� Kle�ka - 1.2.2000 13:54:55
----- Original Message -----
From: Mirek Junek <mjunek(zv)uo.fairnet(tec)cz>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Tuesday, February 01, 2000 9:14 AM
Subject: Re: Rodna cisla -bankovni ucty
> Kazda banka to ma (obecne) jinak, je potreba vyzadat informace od
konkretni banky.
To je samozrejme nesmysl, protoze pro vytvareni cisel bankovnich uctu
existuje predpis ( tusim od CNB ) - jinak by nebyla mozna vubec zadna
kontrola, jestli posilas penize na uplne nesmyslne cislo uctu, nebo jestli
dane cislo uctu muze existovat.
Momentalne nemuzu dany predpis najit, ale hned jak to najdu, tak poslu.
S pozdravem
Ale� Kle�ka
{ a.klecka(zv)email(tec)cz }Jak na velke pole ?
[*] Petr�j Zden�k <ZPetruj(zv)qgir(tec)cz> - 1.2.2000 13:55:21
Nadeklaruj to jako pole pointeru ukazujici na dvourozmerne pole
> -----Original Message-----
> From: Infra Red [mailto:nezadal(zv)volny(tec)cz]
> Sent: Monday, January 31, 2000 12:32 AM
> To: delphi-l(zv)fwd(tec)cz
> Subject: Jak na velke pole ?
>
>
>
> Ahoj,
> potreboval bych v urcitem okamziku pracovat s polem o
> velikosti 1024x1024x2
> of Single (Fourierova transformace obrazu).
> Hlasi mi to EStackOverflow. Je vubec mozne pracovat s tak
> velkym polem ?
> Kdyz ano, tak jak ?
> Diky, Martin Nezadal (jsem zacatecnik)
> nezadal(zv)volny(tec)cz
>
> Rodna cisla
[*] Jaroslav Nadhera <nadhera(zv)csh(tec)cz> - 1.2.2000 13:57:07
To je ale ruznych algoritmu, vidte? Me zase funguje delitelnost jedenacti
celeho desetimistneho (ne devitimistneho cisla pred rokem 1953). Tak
schvalne, kdo ma pravdu?
J. N�dhera
CSH spol. s r.o.
Velflikova 10, 160 00 Praha 6
tel: 02/2431 2344-5, fax: 02/652 28 92
Nedbalova 14, 701 00 Ostrava
tel: 069/663 56 87
e-mail: nadhera(zv)csh(tec)cz WWW: http://www.csh(tec)cz
----- Original Message -----
From: Ladislav Dolezel <dolezel(zv)scova.vabo(tec)cz>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Tuesday, February 01, 2000 1:05 PM
Subject: Re: Rodna cisla
> J� pravidla kontorly r.�. zn�m mali�ko trochu jinak:
>
> pokud je z���sl� 3-m�stn�, d� se p�ed to nula a ud�l� z toho t�m p�dem
4-m�stn�.
>
> U m�ho otce i matky to funguje.
>
> A pak s t�m modulo 11 to zn�m"
> Sou�et ��sel na lich�ch pozic�ch m�nus sou�et ��sel na sud�ch pozic�ch je
bu� 0
> nebo d�liteln� 11.
> ro me dn / abcd
>
> (r+m+d+a+c) - (o+e+n+b+d) = 0 nebo d�liteln� 11
> -Dodo-
>
>
> Delphy confera na MV SR wrote:
>
> > > Je to trochu jinak
> > > plati rr+mm+dd+ab+cd mod 11 = 0
> >
> > (alebo 11)
> >
> > > ne soucet cislic ale soucet dvojic cislic je (vetsinou ) celociselne
> > > delitelny 11. takze
> >
> > do roku 1953 ziadne a potom maju vsetky modulo 11
> >
> > > Prechod na 4 mistna rodna cisla byl myslim v roce 1953.
> >
> > Presne
> >
> > >> Na delitelnost 11 se bohuzel nelze spolehat (a lide narozeni v jinych
> > > zemich casto r.c. nemaji vubec). Navic se (tusim pri kuponove
privatizaci)
> > > prislo na to, ze existuji lide s
> > > identickymi rodnymi cisly. Chybicka se obcas vloudi.
> >
> > To by nevadilo, ale maju rovnake meno, trvaly pobyt...a kua..niektory sa
tak
> > podobaju ze ta ide rozhodit. Je ich par tisic a kopec ludi o tom ani
nevie.
> >
> > > Nektere aplikace pouziti r.c. vyzaduji, protoje dobre delitelnost 11
> > > kontrolovat pri zadavani dat, ale kdyz to nevyjde, tak se pouze zeptat
> > > obsluhy, jestlti to je tak spravne.
> >
> > Ako som povedal, zistis ci je 3 miestne zacislie, ak hej, modulo
> > nekontrolujes, inac kontrolujes.
> >
> > > Hodne zdaru
> > > Mirek
> >
> > > | > projekt libovolnou teorii o rodnych
> > > | > cislech. Jak se pocitaji,
> > > | > jaky maji format (obzvlaste ted
> > > | > v roce 2000 a dal).
> > > | Sucet vsetkych cislic je delitelny 11 (rrmmdd/abcd
> > (r+r+m+m+d+d+a+b+c+d)
> > > | mod 11 = 0).
> > > | To ovsem neplati pre starsie rodne cisla (minule a zac. tohto
storocia),
> > > | ktore maju na konci len trojcislie (rrmmdd/abc).
> > > | > koncovce je zakodovane misto
> > > | > narozeni, co je na tom pravda?
> > > | Ano (videl som zoznam ludi narodenych v tom istom meste a v tom
istom
> > > roku -
> > > | vsetci mali prve dve cisla zo stvorcislia rovnake).
> >
> > V SR bude system duplicit coskoro vyrieseny a podobne sa na tom pracuje
aj v
> > Czexax.
> > Xyby vznikali napr. na matrikach kde si matrikarky poziciavali RC.
> > V sucastnej dobe sa duplicitne RC nevydavaju.
> >
> > Werki
>
>seriova komunikace
[*] Mirek Junek <mjunek(zv)uo.fairnet(tec)cz> - 1.2.2000 13:59:36
|
| >Ahoj
| >Ve windowsech jsem novacek a muj problem spociva v tom ze potrebuju
| >komunikovat pres seriovou linku s 12-ti bit A/D prevodnikem.To vyzaduje
| >generovat rastr hodin s jednim pulsem 27 mikrosekund pro
| >zajisteni presne vzorkovaci frekvence mereni.
| >
| >Pouzivam D3,WIN95/98 a zatim to uspesne vzdoruje jelikos pro
| >vytvoreni peotrebnych hodin pouzivam urcite naprosto
| >nevyhovujici techniku cyklu kteryma to zdrzuju , jako
| >napr.:
| >for i:=0 to 1000 do ;
| >Pri tomto procesu ale staci pohnout mysi a hodiny jsou v tahu(natoz
pustit
| jinou aplikaci).
| >Jine reseni me nenapadlo jelikos vym ze timer nejede rychleji jak 55ms
coz
| je ale strasne
| >pomale.(v DOSu jsem to udelal tak ze jsem zrychlil hodiny a bylo po
| problemu, ale ve WIN?)
| >
| >Prosim bud o radu jak to udelat,nebo aspon naznak kde najit
| informace,poripade proc
| >to nejde.
|
|
| pokud je nutne dodrzet tak presne vzorkovani pak podle me je nutne:
| 1) nepouzivat seriak. Nechapu jak muze takhle narocna aplikace cist data
| pomoci serioveho rozhrani??
| 2) nepouzivat windows ty jaksi nejsou vhodne pro realtime aplikace.
|
|
| Sanci rozchodit ve Win mas podle me jen tehdy, kdyz prevodnik bude urcovat
| okamziky pro vzorkovani sam (resp hodiny budou externi) a data bude
odesilat
| na seriovku. PC musi mit seriak s dostatecnym bufferem (velikost zavisi na
| rychlosti komunikace).
|
|
| Zdravi
| D. Toman
|
|
100 % souhlas s Daliborem. Vzhledem k multitaskingove povaze Win nejde
pocitat s generovanim nejakych presnych intervalu, protoze at to zmeris jak
chces, nikdo ti nezaruci, ze ve spravny cas dostane tvoje uloha pridelene
CPU. Navic DOC k windows je dost mlcenliva, pokud se tyka zpusobu
pridelovani CPU jednotlivym taskum, a chova se to pod ruznymi verzemi Win
ruzne.
Takze podle meho ti zbyvaji 2 moznosti:
- opustit Windows
- generator hodin pro A/D si udelat hardwarove (to by nemel byt takovy
problem) a po seriove lince jen cist hodnoty, pak ale zalezi, jak rychle
potrebujes vzorkovat (predpokladam, ze tech 27 us jsou pro interni hodiny
prevodniku). Pokud bys potreboval presnou dobu cteni vzorku (coz je vetsina
pripadu :-() , videl bych to spise na externi desku, ktera by cetla vzorky,
ukladala si je do bufferu a potom po vetsich blocich posilala do PC s
informaci o case.
Hodne zdaru, Mirek
Souborove ODBC DSN
[*] Martin Dupal <mdupal(zv)vision(tec)cz> - 1.2.2000 13:59:26
Ahoj,
zkousel nekdo uspesne pouzivat %subj% v Delphi (pres BDE) ?
Nedari se mi docilit toho, aby se definovane souborove DSN objevovaly
mezi aliasy u TDatabase. V podstate se mi nedari je jakkoli vyuzit.
Nepochopil jsem neco nebo to je dalsi minus BDE?
Martin
Win 2000 (was RE: pripojeni k internetu)
[*] Martin Kubecka <martin.kubecka(zv)amenit(tec)cz> - 1.2.2000 14:05:02
No a pak se pry da jeste vyhodit \winnt\Driver Cache coz je dalsich 50MB -
mam to z nejake konference...
Mac
----- Original Message -----
From: "Jan Fiala" <jan.fiala(zv)iol(tec)cz>> Nainstaloval jsem RC1, jak vyslo RC2 tak jsem to preinstaloval. A protoze
mam
> notebook s 2GB HDD a chci tam mit jeste neco jineho nez jen NT, patral
jsem,
> proc mam na disku o 200 MB min, hledal jsem stejne soubory a to je
vysledek.
> Kdyz jsem to smazal a NT bezela dal (a od te doby bezi), doufam, ze to
muzu
> prohlasit.
dao
[*] Martin <geoplan(zv)pp.sinet.sk> - 1.2.2000 14:07:11
skusam dao komponenty. pomocou daodataset cez daodatabaza na databazu ACCESS. Mam dve tabulky , chcem jednu napoit na druhu ako master. Nejak mi to nechce ist.
Je lepsie pouzit komponentu DAODATASET alebo DAOQERY ?
MArtin
Ridke matice
[*] Michal Hlavac <7hlavac(zv)st.fmph.uniba.sk> - 1.2.2000 14:09:09
A co tak skusit v D5 dynamicke polia.
Miso
-----P�vodn� zpr�va-----
>Zdravim,
>
>nemate nekdo odkazy, linky, texty, napady na imlpementaci ridkych matic
>(sparse matrices)??? Tzn. kdyz chci matici o rozmerech milion X milion X
>milion, ktera ale obsahuje kuprikladu jen priblblych 12 hodnot a neni tudiz
>nutne alokovat astronomicke pole pameti + co nejrychlejsi pristup....
>
>Petr Fischer
>E-Mail: petr.fischer(zv)email(tec)cz, ICQ#: 24154715
>
>
>
>dao
[*] Martin Kubecka <martin.kubecka(zv)amenit(tec)cz> - 1.2.2000 14:11:13
Jeste by to chtelo rict o jake komponenty presne jde. Pokud pouzivas DAODS od Erika Salaje, tak je urcite lepsi pouzivat DAODataset (ten umi jak table tak query).
Mac
----- Original Message -----
From: Martin skusam dao komponenty. pomocou daodataset cez daodatabaza na databazu ACCESS. Mam dve tabulky , chcem jednu napoit na druhu ako master. Nejak mi to nechce ist.
Je lepsie pouzit komponentu DAODATASET alebo DAOQERY ?
MArtin
SQL server zdarma
[*] Ivan Turcan <iturcan(zv)gamo.sk> - 1.2.2000 14:11:54
>Preto si myslim, ze jednoducho pod UNIXom bude vsetko slapat lepsie len
>preto ze je to UNIX, nie preto ze je to ine SRDB.
no dobre, Robo zle som odpovedal mal som na mysli to ze unix ako taky je
stabilnejsi
v porovnani z windoze. Nic to ale nemeni na fakte ze pod unixom je X
stabilnejsich a lepsich databaz ako Interbase
Ivan Turcan
Rodna cisla
[*] Ing. Zdenek Sraier <sraierzd(zv)atlas(tec)cz> - 1.2.2000 14:16:40
Sorry, ale uz mi to neda:
Proc tady porad vymyslite pravidla pro RC, kdyz hned na zacatku
diskuze kdosi (budiz mu chvala) poslal odkaz na Statni Informacni System
www.usiscr(tec)cz/cz/standardy/datprv27.html
kde najdete vse
SCHEMA PREZENTACE RC:
vychazi z data narozeni a udava se ve tvaru:
nnnnnn/nnnn (zarovnano vlevo)
nn -- -- / --- - rok narozeni (posledni dvojcisli)
-- nn -- / --- - mesic narozeni (01 az 12) u zen plus 50
-- -- nn / --- - den narozeni (01 az 31)
-- -- -- / nnn - trojmistna koncovka
-- -- -- / --- n kontrolni cislice
Trojmistna koncovka byla pridelovana do data narozeni 1. 1. 1954.
Byly pridelovany i koncovky "000".
Kontrolni cislice je pridavana k RC obcanu narozenych od 1. 1. 1954.
Devitimistne cislo vytvorene z datove casti pred lomitkem a trojmistne
koncovky delime 11 a celociselny zbytek tohoto podilu je kontrolni
cislice. Je-li zbytek nula, pak kontrolni cislice je nula. Je-li
zbytek 10, pak kontrolni cislice je take 0 (podle interniho predpisu
FSU CVK 2898/1985 byly tyto nulove koncovky pridelovany pouze
do roku 1985 v poctu cca 1000; neni vylouceno, ze se v minimalnim poctu
vyskytly i po tomto roce).
Pozn.: Pri zapisu na technickych nosicich se lomitko vynechava.
PRIPUSTNE HODNOTY
Prvni dvojcisli 00 az 99;
druhe dvojcisli 01 az 12, 51 az 62;
treti dvojcisli - mesice leden, brezen, kveten, cervenec, srpen,
rijen a prosinec 01-31, mesice duben, cerven, zari, listopad 01-30 a mesic
unor 01-29.
Koncovka 000 az 9999 s tim, ze je-li koncovka ctyrmistna,
pak ctvrta cislice je rovna zbytku po deleni predchazejiciho
devitimistneho cisla cislem 11 a je-li tento zbytek 10,
je ctvrta cislice koncovky rovna 0.
----- Original Message -----
From: Ladislav Dolezel <dolezel(zv)scova.vabo(tec)cz>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Tuesday, February 01, 2000 1:05 PM
Subject: Re: Rodna cisla
> J� pravidla kontorly r.�. zn�m mali�ko trochu jinak:
>
> pokud je z���sl� 3-m�stn�, d� se p�ed to nula a ud�l� z toho t�m p�dem
4-m�stn�.
>
> U m�ho otce i matky to funguje.
>
> A pak s t�m modulo 11 to zn�m"
> Sou�et ��sel na lich�ch pozic�ch m�nus sou�et ��sel na sud�ch pozic�ch je
bu� 0
> nebo d�liteln� 11.
> ro me dn / abcd
>
> (r+m+d+a+c) - (o+e+n+b+d) = 0 nebo d�liteln� 11
> -Dodo-
>
>
> Delphy confera na MV SR wrote:
>
> > > Je to trochu jinak
> > > plati rr+mm+dd+ab+cd mod 11 = 0
> >
> > (alebo 11)
> >
> > > ne soucet cislic ale soucet dvojic cislic je (vetsinou ) celociselne
> > > delitelny 11. takze
> >
> > do roku 1953 ziadne a potom maju vsetky modulo 11
> >
> > > Prechod na 4 mistna rodna cisla byl myslim v roce 1953.
> >
> > Presne
> >
> > >> Na delitelnost 11 se bohuzel nelze spolehat (a lide narozeni v jinych
> > > zemich casto r.c. nemaji vubec). Navic se (tusim pri kuponove
privatizaci)
> > > prislo na to, ze existuji lide s
> > > identickymi rodnymi cisly. Chybicka se obcas vloudi.
> >
> > To by nevadilo, ale maju rovnake meno, trvaly pobyt...a kua..niektory sa
tak
> > podobaju ze ta ide rozhodit. Je ich par tisic a kopec ludi o tom ani
nevie.
> >
> > > Nektere aplikace pouziti r.c. vyzaduji, protoje dobre delitelnost 11
> > > kontrolovat pri zadavani dat, ale kdyz to nevyjde, tak se pouze zeptat
> > > obsluhy, jestlti to je tak spravne.
> >
> > Ako som povedal, zistis ci je 3 miestne zacislie, ak hej, modulo
> > nekontrolujes, inac kontrolujes.
> >
> > > Hodne zdaru
> > > Mirek
> >
> > > | > projekt libovolnou teorii o rodnych
> > > | > cislech. Jak se pocitaji,
> > > | > jaky maji format (obzvlaste ted
> > > | > v roce 2000 a dal).
> > > | Sucet vsetkych cislic je delitelny 11 (rrmmdd/abcd
> > (r+r+m+m+d+d+a+b+c+d)
> > > | mod 11 = 0).
> > > | To ovsem neplati pre starsie rodne cisla (minule a zac. tohto
storocia),
> > > | ktore maju na konci len trojcislie (rrmmdd/abc).
> > > | > koncovce je zakodovane misto
> > > | > narozeni, co je na tom pravda?
> > > | Ano (videl som zoznam ludi narodenych v tom istom meste a v tom
istom
> > > roku -
> > > | vsetci mali prve dve cisla zo stvorcislia rovnake).
> >
> > V SR bude system duplicit coskoro vyrieseny a podobne sa na tom pracuje
aj v
> > Czexax.
> > Xyby vznikali napr. na matrikach kde si matrikarky poziciavali RC.
> > V sucastnej dobe sa duplicitne RC nevydavaju.
> >
> > Werki
>Rodna cisla -bankovni ucty
[*] Ale� Kle�ka - 1.2.2000 14:18:47
Predcisli uctu muze byt nevyplnene a max. delka je 6 znaku.
Cislo uctu musi mit max.10 znaku.
Predcisli i cislo uctu muze obsahovat pouze cislice,
Algoritmus kontroly cisla ABCDEFGHIJ:
cislice: A B C D E F G H I J
vahy: 6 3 7 9 10 5 8 4 2 1
---------------------------------
Vahy se k cislicim na jednotlivych pozicich prirazuji zprava.
C�slo ABCDEFGHIJ je v poradku, pokud je soucet S beze zbytku delitelny 11.
S=J*1+I*2 +H*4+G*8+F*5+E*10+D*9+C*7+B*3+A*6.
Ale� Kle�ka
{ aklecka(zv)merlin(tec)cz }
SQL server zdarma
[*] Pavel Medek <Pavel.Medek(zv)talema(tec)cz> - 1.2.2000 14:20:23
----- Original Message -----
From: Delphy confera na MV SR <delphi(zv)minv.sk>
> Zaujalo ma vsak ten rozdiel UNIX/WIN. Myslis stabilnejsiu Interbase pod
> UNIXom? Neverim.
> U vacsiny DB vyrobcov sa prenasaju zdrojaky a proste sa len skompilia pod
> inou platformou.
Kdyby jsi o Interbase vedel trosku vic, nebo byl alespon prihlasen do IB
konference
a cetl co o ni rikaji vyvojari (myslim ti co pisou IB) tak by jsi nerikal
takoveto
kategoricke hlouposti.
Zapomen na pouhou rekompilaci. IB pro NT je tzv. superserver narozdil od
UNIXu.
Jadro IB zpracovava procesy uplne jinak pod NT a pod UNIXem.
IB je pod UNIXem stabilnejsi, protoze je pro nej puvodne napsana a teprve
potom proto,
ze je UNIX stabilnejsi nez NT.
Pavel
Jak na velke pole ?
[*] Slavek Rydval <rk(zv)atrey.karlin.mff.cuni(tec)cz> - 1.2.2000 14:25:21
> Problem je v deklaraci pole. Pravdepodobne to deklarujes jako statickou
> promennou. Takto to nelze.
****Pokud se bavime o Delphi, tak to lze. Vyzkousej si to a uvidis.
var MojePole = array[0..1023,0..1023,1..2] of single;
Naprosto v pohode (D5). Asi zapominate, ze od dob 32-bitovych
kompilatoru muzete teoreticky adresovat az 4 GB.
Slavek
> Vaclav Krmela
-------------------------------------------------
http://atrey.karlin.mff.cuni(tec)cz/~rk
-------------------------------------------------
http://www.swnet(tec)cz
Magazin informacne vyspelych jedincu
-------------------------------------------------
Web pocitadlo
[*] sup(zv)svitap(tec)cz - 1.2.2000 14:39:14
>Ahoj.
>Podivej se na prilozeny zdrojak.
>Petr
uses
Windows, Messages, SysUtils, Classes, HTTPApp,...
Pekny, ale v D3Profi nemam zadny httpapp.dcu, pricemz v helpu je to popsany.
Kde se to da sehnat???
Zbytek je uz jasnej...
MyStream := TMemoryStream.Create;
Try
JPEGPicture.SaveToStream(MyStream);
MyStream.Position := 0;
Response.ContentType := 'image/jpeg';
Response.SendResponse;
Response.SendStream(MyStream);
Finally
MyStream.Free;
End;
Jaroslav Weiss
odd. informatiky
SVITAP J.H.J. s.r.o.
Kijevska 6-8
SVITAVY
568 02
tel: ++420-461-568 202
fax: ++420-461-568 300
E-mail: sup(zv)svitap(tec)cz
URL: www.svitap(tec)cz
FTP: ftp.svitap(tec)cz
SQL server zdarma
[*] Tomas =?iso-8859-2?Q?Michal=EDk?= <michalik(zv)proca(tec)cz> - 01.2.2000 14:52:57
Ivan Turcan wrote:
> >Preto si myslim, ze jednoducho pod UNIXom bude vsetko slapat lepsie len
> >preto ze je to UNIX, nie preto ze je to ine SRDB.
>
> no dobre, Robo zle som odpovedal mal som na mysli to ze unix ako taky je
> stabilnejsi
> v porovnani z windoze. Nic to ale nemeni na fakte ze pod unixom je X
> stabilnejsich a lepsich databaz ako Interbase
a taky Y mene stabilnich a horsich (a jeste je pravdepodobne, ze Y > X)
>
> Ivan Turcan
--
=================================
Tomas Michalik
ProCA, s. r. o.
V Luzich 818, Praha 4
Czech Republic
e-mail: michalik(zv)proca(tec)cz
tel: +420 2 67283446
dao
[*] Martin <geoplan(zv)pp.sinet.sk> - 1.2.2000 14:55:06
dobre, ale ako napojim podriadenu tabulku na hlavnu. POmocou SQL.
Martin
----- Original Message -----
Od: Martin Kubecka
Komu: delphi-l(zv)fwd(tec)cz
Odoslan�: 1. febru�r 2000 14:11
Predmet: Re: dao
Jeste by to chtelo rict o jake komponenty presne jde. Pokud pouzivas DAODS od Erika Salaje, tak je urcite lepsi pouzivat DAODataset (ten umi jak table tak query).
Mac
----- Original Message -----
From: Martin skusam dao komponenty. pomocou daodataset cez daodatabaza na databazu ACCESS. Mam dve tabulky , chcem jednu napoit na druhu ako master. Nejak mi to nechce ist.
Je lepsie pouzit komponentu DAODATASET alebo DAOQERY ?
MArtin
SQL
[*] Slavek Rydval <rk(zv)atrey.karlin.mff.cuni(tec)cz> - 1.2.2000 14:59:51
Ahoj,
> mohol by mi niekto priblizit (po lopatisticky) pojmi transakcia, ulozene
> procedury a triger, prip. ako to vytvorim v interbase a pouzijem v delphi
> ? pomocou akej komponenty.
Transakce: atomicka operace, kdy pred a po provedeni jsou data v
konzistentim stavu. Mezivysledky nejsou nikomu jinemu nez
provadejici transakci viditelne. Ucebnicovy priklad: prevod penez z
jednoho uctu na druhy:
0) start transaction
1) odecti sumu z uctu A
2) pristi na ucet B
3) pokud se neco pokazilo rollback jinak commit;
Rollback vraci stav dat jako bylo pred zacatkem transakce, commit
potvrdi zmenu. Obecne se jeste nastavuje uroven izolace transakci
(blizsi info o izolacich viz ma stranka:
http://atrey.karlin.mff.cuni(tec)cz/~rk/IzolaceTransakci.shtml)
Trigger: trigger je typicky odpalen pri nejake editacni akci vztahujici
se k tabulce. Typicky pro stroje neumoznujici autoinkrementalni
typ se pri vkladani novych dat zvysi nejake cislo a to se hodi
spolecne s ostatnimi daty do tabulky. Nejbeznejsi byvaji triggry
AB, kde A muze byt Before a After, B je insert, update, delete,
tedy napr. BeforeDelete.
Ulozene procedury: jsou to procedury, ktere jsou na serveru a tam
se spousteji jako kazda jina procedura.
Priklady na IB:
transakce: to si zajistis pomoci komponenty TIBTransaction (D5)
nebo TDatabase.
Triggery:
SET TERM ## ;
/*****************************************************************************
/
/** TRIGGER -- OSOBA **/
/** BEFORE INSERT **/
CREATE TRIGGER T_OSOBA_ID FOR OSOBA
ACTIVE BEFORE INSERT POSITION 0
AS BEGIN
NEW.O_ID = GEN_ID (G_OSOBA_ID, 1);
END##
Ulozene procedury:
/*****************************************************************************
/
/** PROCEDURY PRO PR�CI S TABULKAMI **/
SET TERM !! ;
/** OSOBY **/ /**********************/
/** VKL�D�N� **/
CREATE PROCEDURE INSERT_INTO_OSOBA (I_JMENO
VARCHAR (20),
I_PRIJMENI VARCHAR (20),
I_KONTAKT VARCHAR (100))
AS
BEGIN
INSERT INTO OSOBA (JMENO, PRIJMENI, KONTAKT)
VALUES (:I_JMENO, :I_PRIJMENI, :I_KONTAKT);
END!!
Jestli chces, poslu Ti muj zapoctak.
Slavek
> Martin Talian
-------------------------------------------------
http://atrey.karlin.mff.cuni(tec)cz/~rk
-------------------------------------------------
http://www.swnet(tec)cz
Magazin informacne vyspelych jedincu
-------------------------------------------------
SQL server zdarma
[*] Ivan Turcan <iturcan(zv)gamo.sk> - 1.2.2000 15:12:29
>a taky Y mene stabilnich a horsich (a jeste je pravdepodobne, ze Y > X)
alebo X > Y
X = Y
i.t.
Ridke matice
[*] Lukas Voborsky <xvobl03(zv)vse(tec)cz> - 1.2.2000 15:19:01
On Tue, 1 Feb 2000, Tomas Bihary wrote:
> Ja bych si nadefinoval typ
>
> TPolozkaMatice = record
> XIndex,
> YIndex: Integer;
> Hodnota: Single;
> end;
>
> > Zdravim,
> >
> > nemate nekdo odkazy, linky, texty, napady na imlpementaci ridkych matic
> > (sparse matrices)??? Tzn. kdyz chci matici o rozmerech milion X milion X
> > milion, ktera ale obsahuje kuprikladu jen priblblych 12 hodnot a neni
> tudiz
> > nutne alokovat astronomicke pole pameti + co nejrychlejsi pristup....
> >
> > Petr Fischer
> > E-Mail: petr.fischer(zv)email(tec)cz, ICQ#: 24154715
Ahoj,
ono asi zalezi, co s nima chces delat, ze.
Lukas
-==============================================================-
mailto: voborsky(zv)menza.mff.cuni(tec)cz ICQ: 21084410
www: http://come.to/voborsky tel. 8551040-9 l. 393
-==============================================================-
PGP podporovano
TIcon -> TBitmap
[*] Libor Junek <libor(zv)thsoft(tec)cz> - 1.2.2000 15:20:32
Neznate nahodou nekdo jak se prevadi TIcon na TBitmap. Pokousel jsem to udelat pres zalozeni TIconInfo:
var
hIconLarge,hIconSmall: hIcon;
IconInfo: TIconInfo;
BMP: TBitmap;
ExtractIconEx('C:\Prog.exe',0,hIconLarge,hIconSmall,1); Tady mi to dosadi hIcon bez problemu
GetIconInfo(hIconLarge,IconInfo);
BMP.MaskHandle:=IconInfo.hbmMask;
BMP.Handle:=IconInfo.hbmColor;
Ikonu to sice prevede ale do pozadi se dosadi cerna barva a pokud nastavim Transparent na True tak se mi zpruhledni i cerne cary ktere nechci.
DrawIcon a DrawIconEx mi nejak nechce fungovat.
Dik.
Libor Junek
ToolButon
[*] Libor Filip <filip(zv)agrokonzulta(tec)cz> - 1.2.2000 15:24:24
Mam jednoduchou aplikaci v D5, kde je pouze ToolBar s ToolButtony a ImageList. Problem je v zobrazeni obrazku na ToolButtonech ve Win95, ale pouze v nekterych instalacich Win95. Zobrazeni ve Win98 nebo Win NT je spravny.
Pokud tu samou aplikaci kompiluji v D3 a spustim na stroji s Win95, kde byl problem, tak je zobrazeni spravne.
Nevi nekdo, kde je problem?Win 2000 (was RE: pripojeni k internetu)
[*] Jan Fiala <jan.fiala(zv)iol(tec)cz> - 1.2.2000 15:34:11
Jo, jenomze to je CAB, ktery obsahuje ovladace a ze ktereho se ti instaluji,
pokud si neco pridavas do NTcek. Takze pak potrebujes CDcko pro instalaci novych
driveru.
====================
Jan Fiala jan.fiala(zv)iol(tec)cz
Prog-Soft s.r.o. Plzen
====================
----- Original Message -----
From: Martin Kubecka <martin.kubecka(zv)amenit(tec)cz>> No a pak se pry da jeste vyhodit \winnt\Driver Cache coz je dalsich 50MB -
> mam to z nejake konference...
>
> Mac
>
TIcon -> TBitmap
[*] Ladislav Dolezel <dolezel(zv)scova.vabo(tec)cz> - 01.2.2000 15:42:59
P��mo FAQ od BORLANDU:
How do I create an icon from an bitmap?
Question:
How do I create an icon from an bitmap?
Answer:
You must create two bitmaps, a mask bitmap (called the "AND"
bitmap) and a image bitmap (called the XOR bitmap). You can pass the
handles to the "AND" and "XOR" bitmaps to the Windows API function
CreateIconIndirect() and use the returned icon handle in your
application.
Example:
procedure TForm1.Button1Click(Sender: TObject);
var
IconSizeX : integer;
IconSizeY : integer;
AndMask : TBitmap;
XOrMask : TBitmap;
IconInfo : TIconInfo;
Icon : TIcon;
begin
{Get the icon size}
IconSizeX := GetSystemMetrics(SM_CXICON);
IconSizeY := GetSystemMetrics(SM_CYICON);
{Create the "And" mask}
AndMask := TBitmap.Create;
AndMask.Monochrome := true;
AndMask.Width := IconSizeX;
AndMask.Height := IconSizeY;
{Draw on the "And" mask}
AndMask.Canvas.Brush.Color := clWhite;
AndMask.Canvas.FillRect(Rect(0, 0, IconSizeX, IconSizeY));
AndMask.Canvas.Brush.Color := clBlack;
AndMask.Canvas.Ellipse(4, 4, IconSizeX - 4, IconSizeY - 4);
{Draw as a test}
Form1.Canvas.Draw(IconSizeX * 2, IconSizeY, AndMask);
{Create the "XOr" mask}
XOrMask := TBitmap.Create;
XOrMask.Width := IconSizeX;
XOrMask.Height := IconSizeY;
{Draw on the "XOr" mask}
XOrMask.Canvas.Brush.Color := ClBlack;
XOrMask.Canvas.FillRect(Rect(0, 0, IconSizeX, IconSizeY));
XOrMask.Canvas.Pen.Color := clRed;
XOrMask.Canvas.Brush.Color := clRed;
XOrMask.Canvas.Ellipse(4, 4, IconSizeX - 4, IconSizeY - 4);
{Draw as a test}
Form1.Canvas.Draw(IconSizeX * 4, IconSizeY, XOrMask);
{Create a icon}
Icon := TIcon.Create;
IconInfo.fIcon := true;
IconInfo.xHotspot := 0;
IconInfo.yHotspot := 0;
IconInfo.hbmMask := AndMask.Handle;
IconInfo.hbmColor := XOrMask.Handle;
Icon.Handle := CreateIconIndirect(IconInfo);
{Destroy the temporary bitmaps}
AndMask.Free;
XOrMask.Free;
{Draw as a test}
Form1.Canvas.Draw(IconSizeX * 6, IconSizeY, Icon);
{Assign the application icon}
Application.Icon := Icon;
{Force a repaint}
InvalidateRect(Application.Handle, nil, true);
{Free the icon}
Icon.Free;
end;
-----------
-Dodo-
Libor Junek wrote:
> Neznate nahodou nekdo jak se prevadi TIcon na TBitmap. Pokousel jsem
> to udelat pres zalozeni TIconInfo: var hIconLarge,hIconSmall:
> hIcon; IconInfo: TIconInfo; BMP:
> TBitmap; ExtractIconEx('C:\Prog.exe',0,hIconLarge,hIconSmall,1); Tady
> mi to dosadi hIcon bez problemu GetIconInfo(hIconLarge,IconInfo);
> BMP.MaskHandle:=IconInfo.hbmMask;
> BMP.Handle:=IconInfo.hbmColor;Ikonu to sice prevede ale do pozadi se
> dosadi cerna barva a pokud nastavim Transparent na True tak se mi
> zpruhledni i cerne cary ktere nechci.DrawIcon a DrawIconEx mi nejak
> nechce fungovat.Dik.
> Libor Junek
dao
[*] Martin <geoplan(zv)pp.sinet.sk> - 1.2.2000 15:43:07
je to od E. Salaje
Martin
----- Original Message -----
Od: Martin Kubecka
Komu: delphi-l(zv)fwd(tec)cz
Odoslan�: 1. febru�r 2000 14:11
Predmet: Re: dao
Jeste by to chtelo rict o jake komponenty presne jde. Pokud pouzivas DAODS od Erika Salaje, tak je urcite lepsi pouzivat DAODataset (ten umi jak table tak query).
Mac
----- Original Message -----
From: Martin skusam dao komponenty. pomocou daodataset cez daodatabaza na databazu ACCESS. Mam dve tabulky , chcem jednu napoit na druhu ako master. Nejak mi to nechce ist.
Je lepsie pouzit komponentu DAODATASET alebo DAOQERY ?
MArtin
*.XM, *.MOD
[*] Ji�� H�sek <HysekJ(zv)mail.spsuh.hiedu(tec)cz> - 1.2.2000 15:47:30
Zdravim,
nemate nekdo nejakou komponentu, pro prehravani modulu formatu XM
nebo MOD?Default usesname and password for Intebase ?
[*] Doller.Jozef(zv)zsr.sk - 1.2.2000 16:10:57
Mam pocit ze "masterkey"
> -----P�vodn� zpr�va-----
> Od: Roland Tur�an (RoTurSoft) [SMTP:rotursoft(zv)nextra.sk]
> Odesl�no: 28. janu�r 2000 3:58
> Komu: Delphi CZ konferencia
> P�edm�t: Default usesname and password for Intebase ?
>
> Ake je Default usesname and password for Intebase ?
> Meno pyta SYSDBA ale ake je heslo
>
>
> Hi Roland ?
> Vysledek SQL SUM do promenne
[*] Ing. Petr �vejda <lingvista(zv)lingvista(tec)cz> - 1.2.2000 16:12:36
[P��loha v souboru: winmail.dat]
Jak mohu dostat vysledek SQL souctu do promenne
var Soucet: integer;
...
SELECT SUM(Mnozstvi) FROM Prikazy ....... ted co, aby to slo do promenne
Soucet ??????
...
Query1.ExecSQL;
Diky
Ing. Petr Svejda
software specialist
DBGRID+DBLookupEdit+ukazovatko
[*] Radoslav =?iso-8859-1?Q?Krehl=EDk?= <heretic(zv)softok(tec)cz> - 01.2.2000 16:32:47
Hi all,
rad bych elegantne udelal nasledujici, tak se radsi ptam , predtim nez z
vlastni neznalosti zacnu psat nejaky API prasarny :)
mam DBGRID
pod nim mam DBLookupEdit
a ted chci, abych podle toho jak pisu do toho DBLookupEditu, se posovalo
ukazovatko na zaznamech v tom gridu, coz mi dela, jenze ja bych navic
chtel, aby to ukazovatko vypadalo jako barevny pruh pres celou radku v tom
DBGridu - tj nestaci mi jen jedno oznacene policko. Zkousel jsem trosku
laskovat a delat to pres multiselect, nakonec jsem ale dosahnul max toho,
ze se mi takovy bar-kursor pres radku udela, jen kdyz tam ale rucne klidnu
mysi (klasicky focus na ten dbgrid nestaci) .....nemate s tim nekdo experience?
Hx
Vysledek SQL SUM do promenne
[*] Jezek Petr, Ing. <PETR(zv)sevis.sk> - 1.2.2000 16:44:06
Skus toto
Soucet := 0;
with Query do begin
try
Close;
Sql.Text := 'SELECT SUM(Mnozstvi) FROM Prikazy ...';
Open;
Soucet := Fields[0].AsInteger;
finally
Close;
end; // try
end; //with
Petr
> -----Original Message-----
> From: Ing. Petr �vejda [mailto:lingvista(zv)lingvista(tec)cz]
> Sent: Tuesday, February 01, 2000 4:13 PM
> To: DELPHI forum
> Subject: Vysledek SQL SUM do promenne
>
> Jak mohu dostat vysledek SQL souctu do promenne
>
> var Soucet: integer;
>
>
> ...
> SELECT SUM(Mnozstvi) FROM Prikazy ....... ted co, aby to slo do promenne
Soucet ??????
> ...
>
> Query1.ExecSQL;
>
>
>
> Diky
>
> Ing. Petr Svejda
> software specialist
Vysledek SQL SUM do promenne
[*] Ale� Kle�ka - 1.2.2000 16:51:41
> Jak mohu dostat vysledek SQL souctu do promenne
>
> var Soucet: integer;
> ...
> SELECT SUM(Mnozstvi) FROM Prikazy ....... ted co, aby to slo do promenne
Zkus:
Query1.SQL.Text := 'SELECT SUM(Mnozstvi) As Soucet FROM Prikazy';
> ...
> Query1.ExecSQL;
Soucet := Query1.FieldByName('Soucet').AsInteger;
S pozdravem
Ale� Kle�ka
{ aklecka(zv)merlin(tec)cz }Nemodalne Forms
[*] Miroslav Petrek <petrek(zv)mail.eurotel.sk> - 1.2.2000 16:59:05
Mam velky projekt, v ktorom je vela formularov a kazdy
formular pouziva jednu tabulku.
Formulare maju byt nemodalne.
Ako urobit, aby sa vytvarali formulare pocas behu programu?
Pri akej udalosti a ako ich a tabulku zatvarat aby bolo zatazenie
pamate co najnizsie?
Miro
DBGRID+DBLookupEdit+ukazovatko
[*] JAHODA Jozef <jahoda(zv)asset.sk> - 1.2.2000 17:27:28
Radoslav Krehl�k wrote
> mam DBGRID
> aby to ukazovatko vypadalo jako barevny pruh pres celou radku v tom
> DBGridu - tj nestaci mi jen jedno oznacene policko.
>
v Options DBGRIDU nastav RowSelect na True
JJ
ToolButon
[*] Tomas Bihary <tomas.bihary(zv)vslib(tec)cz> - 1.2.2000 16:32:01 -0000
Rad bych se k tomouto dotazu pripojil, protoze se nam
totez stalo ve WinNT4.0 SP3 kompilace s D4 UpdatePack3
a na druhem pocitaci od stejneho vyrobce (nevim jestli
byly oba stejne nainstalovany) fungovalo vse OK. Zkouseli
jsme dohonce i starsi verze ty samy aplikace a tenhle problem
se taky objevil.
Nezmizely nam jen obrazky z ToolButonku, ale i obrazky,
ktere byly pomoci TImageList, pripojeny k polozkam
TTreeView. Mozna bude problem v TImageList, ale mozna
taky uplne nekde jinde...
Zatim jsme narazili jen na jeden pocitac, kde se to stalo.
Za zkusenost se stejnym problemem a za napady na vyreseni
vrely dik
Tomas Bihary
----- P�vodn� zpr�va -----
Od: Libor Filip <filip(zv)agrokonzulta(tec)cz>
Komu: Konference Delphi (el. adresa) <delphi-l(zv)fwd(tec)cz>
Odesl�no: 1. �nora 2000 14:24
P�edm�t: ToolButon
> Mam jednoduchou aplikaci v D5, kde je pouze ToolBar s ToolButtony a
ImageList. Problem je v zobrazeni obrazku na ToolButtonech ve Win95, ale
pouze v nekterych instalacich Win95. Zobrazeni ve Win98 nebo Win NT je
spravny.
> Pokud tu samou aplikaci kompiluji v D3 a spustim na stroji s Win95, kde
byl problem, tak je zobrazeni spravne.
> Nevi nekdo, kde je problem?dao
[*] Martin Kuska <martin.kuska(zv)amenit(tec)cz> - 1.2.2000 17:52:43
Cau.
V DAODatasetu od Erika funguje Master-Detail jen pokud je Detail napojen primo na tabulku a ne pres dotaz. Pokud pouzijes dotaz (vlastnost SQL), tak nefungujou ani vlastnosti Filter a Sort.
Martin.
==============================================================
= Ing. Martin Kuska - Amenit s.r.o. =
= Na Valech - budova Dytron, 741 01 Novy Jicin =
= telefon/fax: +420 656 706203 mobil: +420 603 710545 =
= http://www.amenit(tec)cz e-mail: martin.kuska(zv)amenit(tec)cz =
==============================================================
----- Original Message -----
From: Martin
To: delphi-l(zv)fwd(tec)cz
Sent: Tuesday, February 01, 2000 2:55 PM
Subject: RE: dao
dobre, ale ako napojim podriadenu tabulku na hlavnu. POmocou SQL.
Martin
skusam dao komponenty. pomocou daodataset cez daodatabaza na databazu ACCESS. Mam dve tabulky , chcem jednu napoit na druhu ako master. Nejak mi to nechce ist.
Je lepsie pouzit komponentu DAODATASET alebo DAOQERY ?
MArtin
Rodna cisla -bankovni ucty
[*] Mirek Junek <mjunek(zv)uo.fairnet(tec)cz> - 1.2.2000 19:01:42
> Kazda banka to ma (obecne) jinak, je potreba vyzadat informace od
konkretni banky.
> To je samozrejme nesmysl, protoze pro vytvareni cisel bankovnich uctu
> existuje predpis ( tusim od CNB ) - jinak by nebyla mozna vubec zadna
> kontrola, jestli posilas penize na uplne nesmyslne cislo uctu, nebo jestli
> dane cislo uctu muze existovat.
To je pravda, pokud se tyka cisla uctu. Mel jsem na mysli format dat pri
posilani vypisu elektronickou formou. Tam se to lisi dost podstatne
Mirek
Jak na velke pole ?
[*] Vaclav Krmela <krmela(zv)ustinadorlici(tec)cz> - 1.2.2000 19:16:39
From: Slavek Rydval <rk(zv)atrey.karlin.mff.cuni(tec)cz>> > Problem je v deklaraci pole. Pravdepodobne to deklarujes jako statickou
> > promennou. Takto to nelze.
> ****Pokud se bavime o Delphi, tak to lze. Vyzkousej si to a uvidis.
>
> var MojePole = array[0..1023,0..1023,1..2] of single;
>
> Naprosto v pohode (D5). Asi zapominate, ze od dob 32-bitovych
> kompilatoru muzete teoreticky adresovat az 4 GB.
>
> Slavek
>
Tak moc pohodove mi to nepripada. Zkus si to sam.
Pokud takto deklarujes pole jako globalni promennou,
aplikace jiz pri svem startu zcela zbytecne sezere 8MB
pameti a tuto pamet si drzi az do uplneho ukonceni aplikace.
Pokud toto pole potrebuji jenom v urcitem okamziku,
je lepsi si ho alokovat kdyz ho potrebuji a kdyz uz ho
nepotrebuji, pamet zase uvolnit. Urcite se bude 8MB
pameti hodit v jine casti aplikace, nebo ji bude moci
pouzit jina bezici aplikace.
Programy bychom meli psat tak, aby behaly a ne aby
sezraly co nejvice pameti a zablokovaly ostatni aplikace.
Vaclav Krmela
CAPI
[*] p. Jirman <jim.design(zv)iol(tec)cz> - 1.2.2000 19:20:17
Zkousel jsi jejich domovskou stranku www.teles.de
)) jestli mas TELES.SO/16.3 jako ja, tak me na telecomu spis stvalo,
ze mi nedali na ni ovladace a spatnou verzi capi
ted mam verzi CAPI 3.29Release a myslim, ze az na tu
garantovanou pomalost s tim nejsou problemy
----- Original Message -----
From: Ing. Lud�k Florian
To: Konference Delphi
Sent: Tuesday, February 01, 2000 10:04 AM
Subject: CAPI
Cauec,
muze me nekdo nasmerovat, kde najdu podrobniosti ohledne CAPI ? Potrebuji ovladat ISDN kartu od Telecomu, ale jejich informace jsou dost skromny.
Dik.
Bye Ludan
Jak na velke pole ?
[*] Slavek Rydval <rk(zv)atrey.karlin.mff.cuni(tec)cz> - 1.2.2000 19:26:56
> Tak moc pohodove mi to nepripada. Zkus si to sam.
> Pokud takto deklarujes pole jako globalni promennou,
> aplikace jiz pri svem startu zcela zbytecne sezere 8MB
> pameti a tuto pamet si drzi az do uplneho ukonceni aplikace.
****Chtel jsem jenom ukazat, ze lze mit staticke pole o zminenem
poctu polozek. Pokud jde o to, ze se po pouziva po dobu 10 % behu apliakce,
pak od D4 jsou k dispozici dynamicka pole.
> Programy bychom meli psat tak, aby behaly a ne aby
> sezraly co nejvice pameti a zablokovaly ostatni aplikace.
****Na tom se asi shodnem vsichni. :-)
Slavek
> Vaclav Krmela
-------------------------------------------------
http://atrey.karlin.mff.cuni(tec)cz/~rk
-------------------------------------------------
http://www.swnet(tec)cz
Magazin informacne vyspelych jedincu
-------------------------------------------------
Skryti TaskBaru
[*] Va�ek N�vrat���zx"��뢖�z?� - 1.2.2000 20:20:54
Cau,
takze fakt nikdo nevi, jak schovat ten TaskBar nebo jak zrusit volbu "Vzdy na vrchu"??
Vasek
Pocet vyskytu retezcu v tabulce
[*] Roman Fiser <rfiser(zv)leknet(tec)cz> - 1.2.2000 20:46:17
Dobry den,
D5 ENT, paradox a Interbase
mam tabulku ktera muze mit radove miliony zaznamu. V teto tabulce mam
polozku typu string, ktera muze nabyvat libovolnych hodnot.
Potrebuji zjistit kolikrat se mi ktera hodnota v tabulce vyskytuje. Prozatim
se mi nepodarilo dospet k nejakemu
alespon trochu rychlemu reseni
Dekuji za kazdou radu.
S pozdravem,
Roman Fiser
roman(zv)management(tec)cz
*.XM, *.MOD
[*] Martin Pesek <pesek.martin(zv)mymail(tec)cz> - 1.2.2000 21:10:35
Zdravim !!!
Neni to sice komponenta, ale maka se s tim dost jednoduse. Pro freeware je
to zadara a pro shareware a komercni veci uz jsou nejaky prachy. Vice na
http://www.icl.ndirect.co.uk/music/
Cau Martin.
----- Original Message -----
From: Ji�� H�sek <HysekJ(zv)mail.spsuh.hiedu(tec)cz>
To: <delphi-l(zv)fwd(tec)cz>; <owner-delphi-l(zv)fwd(tec)cz>
Sent: Tuesday, February 01, 2000 3:47 PM
Subject: *.XM, *.MOD
> Zdravim,
> nemate nekdo nejakou komponentu, pro prehravani modulu formatu XM
> nebo MOD?
>
>Rychlost INSERTu pres ADO
[*] p. Jirman <jim.design(zv)iol(tec)cz> - 1.2.2000 21:37:56
A na jakym to bylo stroji a OS?
Tu jednouzivatelskou databazi, kterou jsi zkousel bych pod P200MMX
nenasazoval.
Petr Fischer wrote:
> > 1) mam pro ukazku jednoduchou TTable (paradox pres BDE) s polozkama
JMENO
> > (CHAR 20) a PRIJMENI (CHAR 20). Pokud do ni v cyklu pridam 10000 polozek
> > (Append -> Post) tak to trva asi 3 vteriny a vysledna velikost *.DB
> > souboru je asi 500kB
> >
> > 2) mam TADOTable (z Adonisu) se stejnyma polozkama jako v pripade (1)
pres
> > ODBC Driver for Paradox. Pridani 10000 polozek (Append -> Post) trva
> > nekolik minut a velikost souboru je stejna...
> >
> > 3) nebyl jsem spokojen a pripojil jsem se pres ADOTable,
> > Microsoft.JET.4.0.Driver (nebo tak nejak) na *.MDB soubor v ocekavani
> > brutalni rychlosti. Vysledek: pridani 10000 polozek trvalo opet minuty a
> > vysledna velikost souboru byla pres 7 (slovy SEDM!!!) mega...
> >
> > Ono se na BDE obcas pekne nadava (i kdyz je proc), ale ted mi nekdo
> > poradte, co si mam zvolit za format souborovy databaze a pres co na ni
> > pristupovat, abych nemusel roky cekat nez se neco provede (a to se mi
ten
> > Adonis tak libil). Svizny pridavani tisicu zaznamu do tabulky neni
vymysl,
> > to bych opravdu potreboval...
ToolButon
[*] Lubos RYBN��EK - 1.2.2000 21:52:42
Jen se pripojuji jako dalsi v rade. Mam naprosto tentyz problem s aplikaci
zkompilovanou pod D4 upd.3 spustenou na W95. Uz jsem ten pocitac (P60 :-)
nekolikrat preinstaloval, ale porad mam misto obrazku prazdna mista
(TTreeView, buttons, ...)
Je skoro jasne ze je to dalsi bug D4. Lamu si s tim hlavu uz skoro tri
mesice a porad nic..
Lubos Rybnicek
ICQ UIN 18817151
Phone: +420 603 916889
> Rad bych se k tomouto dotazu pripojil, protoze se nam
> totez stalo ve WinNT4.0 SP3 kompilace s D4 UpdatePack3
> a na druhem pocitaci od stejneho vyrobce (nevim jestli
> byly oba stejne nainstalovany) fungovalo vse OK. Zkouseli
> jsme dohonce i starsi verze ty samy aplikace a tenhle problem
> se taky objevil> Nezmizely nam jen obrazky z ToolButonku, ale i obrazky,
> ktere byly pomoci TImageList, pripojeny k polozkam
> TTreeView. Mozna bude problem v TImageList, ale mozna
> taky uplne nekde jinde..> Zatim jsme narazili jen na jeden pocitac, kde se to stalo> Za zkusenost se stejnym problemem a za napady na vyreseni
> vrely dik
>
> ----- P�vodn� zpr�va -----
> > Mam jednoduchou aplikaci v D5, kde je pouze ToolBar s ToolButtony a
> ImageList. Problem je v zobrazeni obrazku na ToolButtonech ve Win95, ale
> pouze v nekterych instalacich Win95. Zobrazeni ve Win98 nebo Win NT je
> spravny> > Pokud tu samou aplikaci kompiluji v D3 a spustim na stroji s
> Win95, kde
> byl problem, tak je zobrazeni spravne> > Nevi nekdo, kde je problem?
Skryti TaskBaru
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 1.2.2000 22:28:09
From: Va�ek N�vrat <engine(zv)ropacek(tec)cz>
> takze fakt nikdo nevi, jak schovat ten TaskBar nebo jak zrusit volbu "Vzdy na vrchu"??
Ahoj,
A proc stale trvas na schovavani taskbaru, lze prece prekryt taskbar hlavnim
oknem aplikace.
Petr Vones, amatersky programator
Zobrazoani obrazku v TImage
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 1.2.2000 22:28:41
From: Va�ek N�vrat <engine(zv)ropacek(tec)cz>
> Mam jeden spise "kosmeticky" problem. Mam dva obrazky (JPG) - jeden predstavuje
> obycejny napis, druhy predstavuje ten samy napis ale zvyrazneny. V programu je
> standardne ten prvni obrazek, ale kdyz se na nej najede mysi, chci aby se zobrazil
> ten druhy. A tady nastava problem - vzdycky, kdyz se meni obrazek(otazka momentu),
> tak to trochu problikne (behem te zmeny). Zkousel jsem ty obrazky nahrat pri startu
> programu do dvou TPicture a kdyz je treba, tak je predavat Image1 pomoci TGraphic,
> ale nepomohlo to. Normalne by to probliknuti nevadilo, ale tady se jedna o
> multimedialni program, kde by tim zhyckani uzivatele asi nebyli nadceni :-(.
Ahoj,
z popisu jsem pochopil, ze obrazek zobrazujes pomoci TImage. Nevim jak je to
v nizsich verzich Delphi, ale v D5 je to ve VCL udelane tak, ze pokud je
velikost TImage stejna ci mensi nez obrazku, tak se neprekresluje pozadi,
takze by ti to nemelo blikat. Dale muze byt problem v dekomprimaci JPEG, ktera
nejaky cas trva. Zkus je dekomprimovat do bitmap a ty pak prirazovat do TImage.
Petr Vones, amatersky programator
seriova komunikace
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 1.2.2000 22:28:29
From: <lio(zv)email(tec)cz>
> Ve windowsech jsem novacek a muj problem spociva v tom ze potrebuju
> komunikovat pres seriovou linku s 12-ti bit A/D prevodnikem.To vyzaduje
> generovat rastr hodin s jednim pulsem 27 mikrosekund pro
> zajisteni presne vzorkovaci frekvence mereni.
Ahoj,
Takovou presnost ve Windows presne zajistit nelze. Pokud je ten pozadavek tak
velky, je jedina cesta pouzit specialni HW a z neho pak prenaset vysledky do
Windows. Na trhu najdes urcite i plno takovychto hotovych zarizeni.
Jinak na seriovou komunikaci jako takovou muzes pouzit AsyncFree:
http://delphree.clexpert.com/pages/projects/asyncfree/default.htm
Petr Vones, amatersky programator
Nemodalne Forms
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 1.2.2000 22:28:18
From: Miroslav Petrek <petrek(zv)mail.eurotel.sk>
> Mam velky projekt, v ktorom je vela formularov a kazdy
> formular pouziva jednu tabulku.
> Formulare maju byt nemodalne.
> Ako urobit, aby sa vytvarali formulare pocas behu programu?
> Pri akej udalosti a ako ich a tabulku zatvarat aby bolo zatazenie
> pamate co najnizsie?
Ahoj,
Podobny problem se resil tady:
http://www.delphi(tec)cz/soubor.asp?path=\archiv\1999\oct\21\dlfaaacv.htm
Petr Vones, amatersky programator
AVI + analogova hodnota
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 1.2.2000 22:28:13
From: Gadourek <gadourek(zv)centrum(tec)cz>
> neresil jste nekdo jak online dodat do AVI souboru nejake cislo?
> Mam tento problem: snimam pres video kartu do pocitace video signal (25 snimku za
> sekundu) a zaroven merim nejakou velicinu (konkretne tlak) a potrebuji hodnotu tlaku
> primixovat do ukladaneho obrazku. Neresil jste nekdo neco podobneho? Jedinne co me
> napada, je snimat video a hodnoty tlaku samostatne a pak to to ve vlastnim vieweru
> soucasne zobrazovat.
Ahoj,
Reseni s oddelenym ukladanim dat me prijde nejrozumnejsi.
Petr Vones, amatersky programator
CAPI
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 1.2.2000 22:28:35
From: Ing. Lud�k Florian <Ludek.Florian(zv)bluerose(tec)cz>
> muze me nekdo nasmerovat, kde najdu podrobniosti ohledne CAPI ?
Ahoj,
Nejlepe tady:
http://www.capi.org/
Dokumentaci API najdes pak tady:
http://www.capi.org/document/capi20.zip
Problem bude ale v tom, ze potrebne hlavicky nejsou prepsany do Delphi. Dale
je rozdil v tom, jestli to bude pro Win95 nebo novejsi verze Windows. Co jsem
pochopil, tak podpora CAPI na W95 je odlisna. Uvazoval jsem i o zarazeni CAPI
do AsyncFree, ale nemam to kde odzkouset :-)
Petr Vones, amatersky programator
ToolButon
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 1.2.2000 22:29:08
From: Libor Filip <filip(zv)agrokonzulta(tec)cz>
> Mam jednoduchou aplikaci v D5, kde je pouze ToolBar s ToolButtony a ImageList. Problem je v
zobrazeni obrazku na ToolButtonech ve Win95, ale pouze v nekterych instalacich Win95. Zobrazeni
ve Win98 nebo Win NT je spravny.
Ahoj,
Problem muze byt v zastarale verzi knihovny COMCTL32.DLL na tom pocitaci s Win95.
Aktualizovat ji muzes budto instalaci posledniho IE nebo samostatnym updatem teto
knihovny. Ten mas bud na CD s Delphi (comupd40.exe) nebo si muzes posledni verzi
stahnout tady:
http://www.microsoft.com/msdownload/ieplatform/ie/comctrlx86.asp
Petr Vones, amatersky programator
Jak na velke pole ?
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 1.2.2000 22:30:38
From: Infra Red <nezadal(zv)volny(tec)cz>
> potreboval bych v urcitem okamziku pracovat s polem o velikosti 1024x1024x2
> of Single (Fourierova transformace obrazu).
> Hlasi mi to EStackOverflow. Je vubec mozne pracovat s tak velkym polem ?
> Kdyz ano, tak jak ?
Ahoj,
Ve Win32 to jiz nastesti mozne je. Ta chyba ti vznika proto, ze prekladac
alokouje lokalni promenne na stacku a 8M je na nej prece jen trochu moc :-)
Mas tedy minimalne dve moznosti:
1. Alokovat pamet dynamicky:
type
PFourierData = ^TFourierData;
TFourierData = array[0..1023,0..1023,0..1] of Single;
procedure TForm1.Button1Click(Sender: TObject);
var
FData: PFourierData;
begin
New(FData);
try
FData[0, 0, 0] := 1.2;
ShowMessageFmt('%f', [FData[0, 0, 0]]);
finally
Dispose(FData);
end;
end;
2. Zapsat primo jako promennou objektu. Napriklad do formulare, coz ale neni
v praxi idealni reseni, protoze tato pamet bude alokovana po celou dobu behu
aplikace, coz asi neni ve vetsine pripadu nutne. Spise by se to hodilo pro
situace, kde mas nejake vlastni tridy ktere ti zapouzdruji praci s daty.
type
TForm1 = class(TForm)
Button1: TButton;
Button2: TButton;
procedure Button1Click(Sender: TObject);
procedure Button2Click(Sender: TObject);
private
FourierData: array[0..1023,0..1023,0..1] of Single;
public
{ Public declarations }
end;
procedure TForm1.Button2Click(Sender: TObject);
begin
FourierData[0, 0, 0] := 1.2;
ShowMessageFmt('%f', [FourierData[0, 0, 0]]);
end;
Dale pozor na presnost kterou ti poskytuje typ Single (jak uz tu nekdo
upozornoval). Spis budes muset pouzit Double nebo Extended
Petr Vones, amatersky programator
Distribuce COMCTL32
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 1.2.2000 22:30:54
From: Foldyna Ji�� <jiri.f(zv)avizo(tec)cz>
> potrebuji se svou aplikaci distribuovat i COMCTL32. U M$ jsem se dozvedel,
> ze pro distribuci musim pouzit jejich balik 50comupd.exe, v konferenci se
> psalo o tom, ze mohu pouzit instalacni program IS Express - jak je to tedy ?
> Pokud bych musel pouzit 50comupd, slo by to tak, ze bych jej spustil na
> zaver setupu (mam IS Express z D5) - Launch Application Dialog - Run Command
> ? Eh, to jsem se nejak zapletl - proste nemate nekdo nejakou kucharku, jak
> to udelat, aby to spolehlive fungovalo na NT i W9x ? IS Express chci puzit
> kvuli castecne instalaci BDE.
Ahoj,
IS Express pro Delphi neumi spoustet jine aplikace behem instalace. Lze to
ale castecne obejit tim, ze v IS u daneho EXE ve vlastnostech zatrhnes
"Allow Express to self register this file". Dalsi moznost je misto ISX
pouzit MS Installer. Prepis hlavicek je tady:
http://delphi-jedi.org/Jedi:APILIBRARY:712983686
Petr Vones, amatersky programator
Pomale kreslenie na Canvas ... ?
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 1.2.2000 22:30:08
From: J�n Grman <janog(zv)pluto.elf.stuba.sk>
> - jednotlive prvky sa kreslia na CANVAS (bud TImage, alebo TPrinter - podla
> toho ci ide o nahlad alebo tlac)
>
> Problem:
> - u mna na pocitaci chodi vsetko ako na "dratkach" (NT 4.0 Worstation,
> SP5.0, IE5.0)
> - na inom pocitaci vo firme (NT 4.0 Server, SP5.0, IE4.0, s instalaciou
> D3) to tiez slape dobre...
> - u zakaznika1 pri rovnakom pocte zaznamov (skratka zhodnej databaze) cela
> operacia nahladu trva radovo 3-5krat dlhsie... (NT 4.0 Enterprise Server,
> SP6.0, IE (neviem presne ale min. 4.0), DELPHI tam nikdy neboli
> samozrejme...)
> - u zakaznika2 je to to iste - rozdiely SP5
>
> Este som zabudol ze:
> - u mna bezim 1152 x 864x65536 color, na nasom serveri 800x600x65536
> color, zakaznik 1 800x600x16 color!!! a zakaznik 2 na 800x600x65536
> color....
Ahoj,
Barevna hloubka 16barev je uz opravdu hruza. Tam se nedivim ze je to tak
zoufale pomale. Bylo by dobre bud zkontrolovat, jestli neni ta karta jen
spatne nastavena (HighColor 16bitu je uz postacujici) nebo mu pak koupit
novou (nejlevnejsi jsou radove stovky Kc).
Dalsi problem muze byt ve spatne instalaci. Psal jem to tu uz nekolikrat,
kdyz nekdo pouzije "drivery" ktere jsou dodavany primo s Windows, tak se
nesmi divit, ze to temer nefunguje. Tyto drivery jsou urceny jen k tomu
aby bylo mozne nainstalovat drivery od vyrobce karty. V horsim pripade
ty co jsou dodany na CD, lepe je vsak stahnout posledni aktualizaci z
Internetu. Drivery videokaret jsou jednou z nejvice kritickych oblasti
(jak co do vykonu pocitace tak i jeho spolehlivosti) a je dobre si toto
udrzovat v poradku.
Petr Vones, amatersky programator
Pocet vyskytu retezcu v tabulce
[*] Hynek Svato� <svatos(zv)kam(tec)czu(tec)cz> - 1.2.2000 22:42:02
Takze:
Asi bych volil vypocet pres SQL, nechat praci SQL serveru (ten by to mel
zvladnout a pockat na vysledky:
SELECT Pocet=Count(text), text FROM tabulka
GROUP BY text
Nevim jak by se to chovalo v BDE nad paradoxni tabulkou, ale vzhledem k
tomu,
ze se jedna o tabulku s radove miliony vet, ani bych o paradoxu neuvazoval.
Keep mailing :-)
=========================
Hynek Svato�
svatos(zv)kam(tec)czu(tec)cz
hynek.svatos(zv)atlas(tec)cz
=========================
> -----Original Message-----
> From: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz]On Behalf Of
> Roman Fiser
> Sent: Tuesday, February 01, 2000 8:46 PM
> To: delphi-l(zv)fwd(tec)cz
> Subject: Pocet vyskytu retezcu v tabulce
>
>
> Dobry den,
>
> D5 ENT, paradox a Interbase
>
> mam tabulku ktera muze mit radove miliony zaznamu. V teto tabulce mam
> polozku typu string, ktera muze nabyvat libovolnych hodnot.
>
> Potrebuji zjistit kolikrat se mi ktera hodnota v tabulce
> vyskytuje. Prozatim
> se mi nepodarilo dospet k nejakemu
> alespon trochu rychlemu reseni
>
> Dekuji za kazdou radu.
>
> S pozdravem,
> Roman Fiser
> roman(zv)management(tec)cz
>
>
> ---
> P��choz� zpr�va neobsahuje viry.
> Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
> Verze: 6.0.87 / Virov� b�ze: 47 - datum vyd�n�: 1.11.1999
>
---
Odchoz� zpr�va neobsahuje viry.
Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.87 / Virov� b�ze: 47 - datum vyd�n�: 1.11.1999
Web pocitadlo
[*] Lukas Voborsky <xvobl03(zv)vse(tec)cz> - 2.2.2000 00:07:06
On Wed, 2 Feb 2000, Delphy confera na MV SR wrote:
> Jaro, mas k tomu uplne zly pristup.
> Vystupis na stolicku, nohu das dole a xes si zaviazat snurku?
>
> 1 mas index..html, ktore vola ciselko.cgi ktore vola urobpocitadlo.exe a
> nasledne zobrazuje cislo.jpg ktore vypotil ten exe. Xapando? :)))
>
> Werki
Jako vtip, dobry.
Lukas
-==============================================================-
mailto: voborsky(zv)menza.mff.cuni(tec)cz ICQ: 21084410
www: http://come.to/voborsky tel. 8551040-9 l. 393
-==============================================================-
PGP podporovano
Zobrazoani obrazku v TImage
[*] Vaclav Krmela <krmela(zv)ustinadorlici(tec)cz> - 2.2.2000 00:24:43
Ja bych to udelal takto:
Polozil bych dve komponenty TImage pres sebe, spodni s prvnim obrazkem
a horni s druhym obrazkem. Potom staci jenom na tom hornim prepinat
Visible false/true.
Zadne blikani ani na tom nejpomalejsim stroji.
Vaclav Krmela
From: Va�ek N�vrat
Mam jeden spise "kosmeticky" problem. Mam dva obrazky (JPG) - jeden
predstavuje obycejny napis, druhy predstavuje ten samy napis ale zvyrazneny.
V programu je standardne ten prvni obrazek, ale kdyz se na nej najede mysi,
chci aby se zobrazil ten druhy. A tady nastava problem - vzdycky, kdyz se
meni obrazek(otazka momentu), tak to trochu problikne (behem te zmeny).
Zkousel jsem ty obrazky nahrat pri startu programu do dvou TPicture a kdyz
je treba, tak je predavat Image1 pomoci TGraphic, ale nepomohlo to. Normalne
by to probliknuti nevadilo, ale tady se jedna o multimedialni program, kde
by tim zhyckani uzivatele asi nebyli nadceni :-(.
S pozdravem
Vasek Navrat
Nastaveni tiskarny
[*] Roman �ev��k����� �Ȥ�*%�̿ - 2.2.2000 00:48:54
Ahoj,
nevite nekdo jak spustit vlastnosti tiskarny ?
Chci si vytvorit svuj PrintDialog a nevim jak spustit vlastnosti tiskarny.
Dik
Nastaveni tiskarny
[*] Lud�k ZITA - 2.2.2000 03:17:38
> Roman �ev��k
>Ahoj,
>nevite nekdo jak spustit vlastnosti tiskarny ?
>Chci si vytvorit svuj PrintDialog a nevim jak spustit vlastnosti tiskarny.
Zalozka Dialogs komponenta PrinterSetupDialog
a pak pouzij
PrinterSetupDialog1.Execute;
Lud�k ZITA
Pocet vyskytu retezcu v tabulce
[*] Lud�k ZITA - 2.2.2000 03:17:37
> Roman Fiser
> Dobry den,
>
> D5 ENT, paradox a Interbase
>
> mam tabulku ktera muze mit radove miliony zaznamu. V teto tabulce mam
> polozku typu string, ktera muze nabyvat libovolnych hodnot.
>
> Potrebuji zjistit kolikrat se mi ktera hodnota v tabulce
> vyskytuje. Prozatim
> se mi nepodarilo dospet k nejakemu
> alespon trochu rychlemu reseni
Select Distinct JmenoPolozky , Count(*) FROM JmenoTabulky Group BY JmenoP
olozky
Nevim jak Interbasi ale je to standartni SQL prikaz ktery bezne pouzivam.
Lud�k ZITA
dao
[*] Martin <geoplan(zv)pp.sinet.sk> - 2.2.2000 07:02:32
takaze s komponentymi DAO od e.salaje sa neda pomocou SQL dotazu urobiz Master detail ? Tak to som sa zas dostal.
----- Original Message -----
Od: Martin Kuska
Komu: delphi-l(zv)fwd(tec)cz
Odoslan�: 1. febru�r 2000 17:52
Predmet: Re: dao
Cau.
V DAODatasetu od Erika funguje Master-Detail jen pokud je Detail napojen primo na tabulku a ne pres dotaz. Pokud pouzijes dotaz (vlastnost SQL), tak nefungujou ani vlastnosti Filter a Sort.
Martin.
==============================================================
= Ing. Martin Kuska - Amenit s.r.o. =
= Na Valech - budova Dytron, 741 01 Novy Jicin =
= telefon/fax: +420 656 706203 mobil: +420 603 710545 =
= http://www.amenit(tec)cz e-mail: martin.kuska(zv)amenit(tec)cz =
==============================================================
----- Original Message -----
From: Martin
To: delphi-l(zv)fwd(tec)cz
Sent: Tuesday, February 01, 2000 2:55 PM
Subject: RE: dao
dobre, ale ako napojim podriadenu tabulku na hlavnu. POmocou SQL.
Martin
skusam dao komponenty. pomocou daodataset cez daodatabaza na databazu ACCESS. Mam dve tabulky , chcem jednu napoit na druhu ako master. Nejak mi to nechce ist.
Je lepsie pouzit komponentu DAODATASET alebo DAOQERY ?
MArtin
interbase
[*] Martin <geoplan(zv)pp.sinet.sk> - 2.2.2000 07:04:56
ako sa robi v IB spojenie master - detail ? Je to take iste ako pri pouziti obycajnych QUERY (pomocou dotazu s parametrom)napojenych napr. na paradox ?
Martin
Web pocitadlo
[*] sup(zv)svitap(tec)cz - 2.2.2000 7:14:16
>> To vsechno vim, ten exac funguje jako script. Tedka jde o to, jak dostat
>> obrazek z exace.
>>
>> Jaroslav Weiss
>> odd. informatiky
>
>Jaro, mas k tomu uplne zly pristup.
>Vystupis na stolicku, nohu das dole a xes si zaviazat snurku?
>
>1 mas index..html, ktore vola ciselko.cgi ktore vola urobpocitadlo.exe a
>nasledne zobrazuje cislo.jpg ktore vypotil ten exe. Xapando? :)))
>
To je jako skrabat se pravou rukou za levym uchem. Ja chci tohle:
<img src="/cgi-bin/script.exe">
v index.html volam primo ten exac. jede to na NT, tak to jde. Ted jde jen o
to, jaz zobrazit ten obrazek (bez ukladani na disk a jinych podobnych
cinnosti...)
>Drzim palce
>
>Werki
Bye
Jaroslav Weiss
odd. informatiky
SVITAP J.H.J. s.r.o.
Kijevska 6-8
SVITAVY
568 02
tel: ++420-461-568 202
fax: ++420-461-568 300
E-mail: sup(zv)svitap(tec)cz
URL: www.svitap(tec)cz
FTP: ftp.svitap(tec)cz
Prevod vlastnosti z Published do Private, Public c
[*] kchodl(zv)email(tec)cz - 2.2.2000 07:17:33
Obecne,
tvorim potomka nejake tridy, ktera obsahuje nektere vlastnosti v casti
Published (jsou videt v Object Inspectoru). Ja ve svem potomku chci
nektere tyto vlastnosti prevest do casti Private, Public ci Protected
(proste aby nebyli videt v Obj. Insp.). Jak na to?
Progr-Amather -Kchodl-� 1989-2000
--- CREATED BY ATC O..R..G..A..N..I..Z..E..R
--- http://email(tec)cz <--- Get Your Free Email
Cisla uctu
[*] Hole�ek Radek <holecekr(zv)upfm(tec)cz> - 02.2.2000 07:19:25
Dobry den.
Chtel bych Vam zaslat uryvek z dokumentu "Podminky CNB pro predavani
dat platebniho styku na kompatibilnich mediich ve starem formatu v
systemu ABO2".
Jak jiz sam nazev napovida, existuje vice formatu pro predavani dat
na diskete - tot reakce na
mail, ze kazda banka ma svuj format uctu.
Standardni kontrola cisla uctu
Format: UUUUUK-MMMMMOKPPB
UUUUU - druh uctu,
MMMMM - matrika,
O - druh oragnizace
PPB - pobocka CNB,
K - kontrolni cislice
Pokud je predcisli uvedeno, musi mit rozsah 2 az 6 znak� a je
kontrolovano
na modulo 11. Pokud neni uvedeno, neuvadi se ani oddelovaci znak minus.
Cislo komitenta musi mit rozsah 6 az 10 znaku a je kontrolova na
modulo 11. Pokud se jedna o ucet vedeny u jine banky nez CNB, je jeho
minimalni delka 2 znaky.
Kontrola modulo 11 se pocita nasledujicim zpusobem:
x = SUMA An * 2^n
a - cislice z kontrolovaneho retezce,
n - pozice teto cislice (pocitano zprava od nuly)
Pokud je vysledne X delitelne 11-ti, je podminka modulo 11 splnena.
Priklad:
Kontrloa cisla 129621:
X = 1*2^0 + 2*2^1 + 6*2^2 + 9*2^3 + 2*2^4 + 1*2^5
X = 1*1 + 2*2 + 6*4 + 9*8 + 2*16 + 1*32
X = 1 + 4 + 24 + 72 + 32 + 32
X = 165
165 / 11 = 15; zbytek = 0.
Zaver: cislo 129621 vyhovuje kontrole modulo 11.
Tento algoritmus funguje podle mne velice dobre, protoze takto
overuji
spravnost cca 1000 rozdilnych uctu mesicne jiz dva roky. Za celou tu
dobu
mi nebyl z banky vracen ucet, ktery by byl spatne. Vratily se pouze ty
ucty,
ktere mely chyby ve variabilnim nebo specifickem symbolu. Toto bohuzel
kontrolovat
neumim, protoze tady nastupuje jiz kazda banka na svou cestu (alespon si
to myslim).
Pokud bude mit nekdo zajem, muzu mu poskytnout jeste ciselnik nasich
bank, aby
mohl kontrolovat i kod banky.
S pozdravem
Radek Hole�ek
Vysledek SQL SUM do promenne
[*] Ren� Otisk - 2.2.2000 08:05:35
Hi,
Query.Open misto ExecSQL. Ten pouzij pro INSERT, UPDATE, DELETE
Soucet := Query1.Fields[0].AsInteger
NEBO
SELECT SUM(Mnozstvi) as SUMA FROM Prikazy
Soucet := Query1.FieldByNAme['SUMA'].AsInteger
Sroub
> Jak mohu dostat vysledek SQL souctu do promenne
>
> var Soucet: integer;
>
> ...
> SELECT SUM(Mnozstvi) FROM Prikazy ....... ted co, aby to slo do promenne
> Soucet ??????
> ...
>
> Query1.ExecSQL;
>
>
>
> Diky
>
> Ing. Petr Svejda
> software specialist
MDI
[*] Krayzel Libor <Libor.Krayzel(zv)czech-tv(tec)cz> - 2.2.2000 08:09:11
Zdravim,
mam MDI aplikaci a na kazdem MDI childu jeden TEdit. Potrebuju nacist obsah
vsech TEditu ze vsech MDI childu, ale jedine reseni ktere znam je tohle:
for I := 0 to MDIChildCount-1 do
begin
mdichildren[i].BringToFront;
if (ActiveMDIChild as TMDIChild).ReplaceOpen(hledany,nahrazeny) then
begin
Obsah:=Obsah+(ActiveMDIChild as TMDIChild).edtOBSAH;
end;
end;
coz mi nevyhovuje kvuli prepinani mezi temi okny (v pripade otevrenych napr.
50 childu je to dost neprijemne a pomale).
Neni nejaka jina cesta?
Diky.
==[ Libor Krayzel ]================================
http://webhost(tec)cz/elka * mailto:libor.krayzel(zv)czech-tv(tec)cz
http://easypad.fwd(tec)cz * mailto:elka(zv)volny(tec)cz
office: +420-69-620 1375
GSM: +420-603-937 947
============================================== Pocet vyskytu retezcu v tabulce
[*] Ren� Otisk - 2.2.2000 08:11:03
Hi,
SQL dotaz:
SELECT HODNOTA_STRINGPOLE, COUNT(HODNOTA_STRINGPOLE) FROM TABULKA
GROUP BY HODNOTA_STRINGPOLE
Sroub
> Dobry den,
>
> D5 ENT, paradox a Interbase
>
> mam tabulku ktera muze mit radove miliony zaznamu. V teto tabulce mam
> polozku typu string, ktera muze nabyvat libovolnych hodnot.
>
> Potrebuji zjistit kolikrat se mi ktera hodnota v tabulce vyskytuje.
Prozatim
> se mi nepodarilo dospet k nejakemu
> alespon trochu rychlemu reseni
>
> Dekuji za kazdou radu.
>
> S pozdravem,
> Roman Fiser
> roman(zv)management(tec)cz
>MDI
[*] Jezek Petr, Ing. <PETR(zv)sevis.sk> - 2.2.2000 08:23:23
Ale kvuli nacteni hodnoty z editu prece nemusis aktivovat jednotlive MDI
childy.
Petr
-----Original Message-----
From: Krayzel Libor [mailto:Libor.Krayzel(zv)czech-tv(tec)cz]
Sent: Wednesday, February 02, 2000 8:09 AM
To: 'delphi-l(zv)fwd(tec)cz'
Subject: MDI
Zdravim,
mam MDI aplikaci a na kazdem MDI childu jeden TEdit. Potrebuju nacist obsah
vsech TEditu ze vsech MDI childu, ale jedine reseni ktere znam je tohle:
for I := 0 to MDIChildCount-1 do
begin
mdichildren[i].BringToFront;
if (ActiveMDIChild as TMDIChild).ReplaceOpen(hledany,nahrazeny) then
begin
Obsah:=Obsah+(ActiveMDIChild as TMDIChild).edtOBSAH;
end;
end;
coz mi nevyhovuje kvuli prepinani mezi temi okny (v pripade otevrenych napr.
50 childu je to dost neprijemne a pomale).
Neni nejaka jina cesta?
Diky.
==[ Libor Krayzel ]================================
http://webhost(tec)cz/elka * mailto:libor.krayzel(zv)czech-tv(tec)cz
http://easypad.fwd(tec)cz * mailto:elka(zv)volny(tec)cz
office: +420-69-620 1375
GSM: +420-603-937 947
============================================== Ridke matice
[*] Viktor.Lostak(zv)chmi(tec)cz (Viktor Lostak) - 2.2.2000 08:29:02
Nejrozumejsi je pouzit hasovaneho seznamu, hasovaci hodnotu tvori
souradnice. Pristup je i tak velmi rychly a usetri se na pameti. Viktor
----- Original Message -----
From: Petr Fischer <petr.fischer.dk(zv)email(tec)cz>
To: DELPHI-KONFERENCE <delphi-l(zv)fwd(tec)cz>
Sent: Tuesday, February 01, 2000 11:53 AM
Subject: Ridke matice
> Zdravim,
>
> nemate nekdo odkazy, linky, texty, napady na imlpementaci ridkych matic
> (sparse matrices)??? Tzn. kdyz chci matici o rozmerech milion X milion X
> milion, ktera ale obsahuje kuprikladu jen priblblych 12 hodnot a neni
tudiz
> nutne alokovat astronomicke pole pameti + co nejrychlejsi pristup....
>
> Petr Fischer
> E-Mail: petr.fischer(zv)email(tec)cz, ICQ#: 24154715
>
>
>MDI
[*] Martin �ajbik (Marcant) <marcant(zv)sct.sk> - 2.2.2000 08:42:06
Nepochopil som sice celkom co vsetko vlastne robi tvoj kod (je vobec
korektny?) ale nacitat obsahy TEditov mozes predsa uplne jednoducho a aj bez
prepinania okien:
for i:= 0 to MDIChildCount-1 do
Obsah:= Obsah+(MDIChildren[i] as TMDIChild).edtOBSAH.Text;
Alebo som nieco prehliadol ?
----- Original Message -----
From: Krayzel Libor <Libor.Krayzel(zv)czech-tv(tec)cz>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Wednesday, February 02, 2000 8:09 AM
Subject: MDI
> Zdravim,
>
> mam MDI aplikaci a na kazdem MDI childu jeden TEdit. Potrebuju nacist
obsah
> vsech TEditu ze vsech MDI childu, ale jedine reseni ktere znam je tohle:
>
> for I := 0 to MDIChildCount-1 do
> begin
> mdichildren[i].BringToFront;
> if (ActiveMDIChild as TMDIChild).ReplaceOpen(hledany,nahrazeny) then
> begin
> Obsah:=Obsah+(ActiveMDIChild as TMDIChild).edtOBSAH;
> end;
> end;
>
> coz mi nevyhovuje kvuli prepinani mezi temi okny (v pripade otevrenych
napr.
> 50 childu je to dost neprijemne a pomale).
>
> Neni nejaka jina cesta?
>
> Diky.
>
> ==[ Libor Krayzel ]================================
> http://webhost(tec)cz/elka * mailto:libor.krayzel(zv)czech-tv(tec)cz
> http://easypad.fwd(tec)cz * mailto:elka(zv)volny(tec)cz
> office: +420-69-620 1375
> GSM: +420-603-937 947
> ==============================================
>OT:Napoveda
[*] Richard Valny <Richard.Valny(zv)oku-st(tec)cz> - 02.2.2000 08:57:23
>>> Roman �ev��k <r.sevcik(zv)iol(tec)cz> 29.1.2000 21:41:05 >>>
> nevite nekdo kde bych nasel "navod" jak vytvorit napovedu HLP.
http://www.delphi(tec)cz/soubor.asp?path=\archiv\1998\sep\04\dlfaaabz.htm
http://www.delphi(tec)cz/soubor.asp?path=\archiv\1998\sep\04\dlfaaacg.htm
http://www.delphi(tec)cz/soubor.asp?path=\archiv\1998\sep\10\dlfaaadc.htm
http://www.delphi(tec)cz/soubor.asp?path=\archiv\1998\sep\14\dlfaaabj.htm
http://www.delphi(tec)cz/soubor.asp?path=\archiv\1998\oct\02\dlfaaaaj.htm
Ahoj
=========================================
Richard Valny richard.valny(zv)oku-st(tec)cz
Okresni urad Strakonice tel. 0342-441 l. 216
Smetanova 533 fax. 0342-21208
386 22 STRAKONICE FiDoNet 2:423/35
=========================================MDI
[*] Jan Fiala <jan.fiala(zv)iol(tec)cz> - 2.2.2000 08:59:53
----- Original Message -----
From: Krayzel Libor <Libor.Krayzel(zv)czech-tv(tec)cz>> Zdravim,
>
> mam MDI aplikaci a na kazdem MDI childu jeden TEdit. Potrebuju nacist obsah
> vsech TEditu ze vsech MDI childu, ale jedine reseni ktere znam je tohle:
>
> for I := 0 to MDIChildCount-1 do
> begin
Proc primo nepracovat primo s mdichildren[i] ? Napr:
If mdichildren[i].ReplaceOpen(hledany,nahrazeny) then
atd.
> mdichildren[i].BringToFront;
> if (ActiveMDIChild as TMDIChild).ReplaceOpen(hledany,nahrazeny) then
> begin
> Obsah:=Obsah+(ActiveMDIChild as TMDIChild).edtOBSAH;
> end;
> end;
>
> coz mi nevyhovuje kvuli prepinani mezi temi okny (v pripade otevrenych napr.
> 50 childu je to dost neprijemne a pomale).
>
====================
Jan Fiala jan.fiala(zv)iol(tec)cz
Prog-Soft s.r.o. Plzen
====================MDI
[*] Krayzel Libor <Libor.Krayzel(zv)czech-tv(tec)cz> - 2.2.2000 09:10:47
> korektny?) ale nacitat obsahy TEditov mozes predsa uplne
> jednoducho a aj bez
> prepinania okien:
> for i:= 0 to MDIChildCount-1 do
> Obsah:= Obsah+(MDIChildren[i] as TMDIChild).edtOBSAH.Text;
No a to jsem prave nevedel.
Diky moc za radu.CAPI
[*] Ing. Lud�k Florian <Ludek.Florian(zv)bluerose(tec)cz> - 2.2.2000 09:25:19
Cauec,
> Problem bude ale v tom, ze potrebne hlavicky nejsou prepsany do Delphi.
Dale
Prepis z C do Pas by nemel� byt problem. Uz jsem se s jednim prepisem
trapil.
> je rozdil v tom, jestli to bude pro Win95 nebo novejsi verze Windows. Co
jsem
Zatim asi vsechny 3 - 95/98/NT a samozrejme pak i 2000 resp. Millenium
> pochopil, tak podpora CAPI na W95 je odlisna. Uvazoval jsem i o zarazeni
CAPI
> do AsyncFree, ale nemam to kde odzkouset :-)
Staci rict, jen co prijdou s linkou, muzu to zacit trapit.
Bye Ludan
Nastaveni tiskarny-to neni ono
[*] Roman �ev��k����� �Ȥ�*%�̿ - 2.2.2000 09:26:09
no, asi jsem to spatne podal
potrebuji vytvorit novy MujPrintSetupDialog, kde budou navic nejaka dalsi
tlacitka.
V tom dialogu nacpu seznam tiskaren z Printer.Printers, nastav�m kopie,
atd...,ale nevim jak spustit vlastnosti jiz vybrane tiskarny.
----- Original Message -----
From: Lud�k ZITA <konference(zv)sales(tec)cz>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Wednesday, February 02, 2000 3:17 AM
Subject: RE: Nastaveni tiskarny
> Roman �ev��k
>Ahoj,
>nevite nekdo jak spustit vlastnosti tiskarny ?
>Chci si vytvorit svuj PrintDialog a nevim jak spustit vlastnosti tiskarny.
Zalozka Dialogs komponenta PrinterSetupDialog
a pak pouzij
PrinterSetupDialog1.Execute;
Lud�k ZITA
OT - MS SQL 7.0 - predani hodnoty cursorem
[*] mbartone(zv)Synthesia(tec)cz - 2.2.2000 09:28:06
Ahoj,
lze se nejak odkazovat na hodnoty, ktere vraci cursor v procedure aniz by musely
byt vyjmenovany ?
DECLARE abc CURSOR FOR SELECT * FROM MyTable
OPEN abc
FETCH NEXT FROM abc
if abc.sl1 = ...
if abc.sl3 = ..
...
nebo to musim mit jen takto
declare
(zv)sl1 int,
..
(zv)sl40 int
DECLARE abc CURSOR FOR SELECT sl1,.....sl40 FROM MyTable
OPEN abc
FETCH NEXT FROM abc into (zv)sl1,....(zv)sl40
if (zv)sl1 = ..
if (zv)sl3 = ..
...
Milan
BLOB fieldy a BDE
[*] Martin �ajbik (Marcant) <marcant(zv)sct.sk> - 2.2.2000 09:31:43
D4, BDE, ODBC, MSSQL
Nevie mi niekto poradit, ako co najlepsie pracovat s BLOB fieldami v Delphi ?
V podstate by som potreboval iba ich zapis a citanie z tabulky, ale
1) Ak zapisujem BLOB fieldy cez TQuery napriklad
QrySave.ParamByName('Obrazok').Assign(Image1.Picture);
QrySave.ExecSQL;
kde QrySave.SQL je napriklad UPDATE XX Obrazky SET Obrazok = :Obrazok WHERE Id = 1 (ide iba o jednoduchy priklad)
tak je sice vsetko v poriadku, ale MS SQLTrace mi zobrazi, ze bola poslana SQL v tvare
UPDATE XX Obrazky SET Obrazok = 0xFD45... WHERE Id = 1. To znamena ze sa BLOBy posielaju v hexa formate ?
Alebo je to len sposob zobrazenia SQLTrace (dufam) ?
2) Ak zapisujem BLOB fieldy cez TTable (fuj) napriklad
TblObrazky.Open;
TblObrazky.Edit;
TblObrazky.FieldByName('Obrazok').Assign(Image1.Picture);
TblObrazky.Post;
tak mi pri BLOB vacsom ako nastavenie BLOB SIZE v BDE (a to je v rozsahu >32kB <1000kB) vyhodi chybu Invalid BLOB length.
3) Ak citam BLOB fieldy cez TQuery napriklad
QryLoad.Open;
Image1.Picture.Assign(QryLoadObrazok); // QryLoadObrazok je field Obrazok z QryLoad
QryLoad.Close;
tak mi pri BLOB vacsom ako nastavenie BLOB SIZE v BDE bez akejkolvek chybovej spravy oreze tento BLOB na velkost urcenu BLOB SIZE.
4) Ak citam BLOB fieldy cez TTable napriklad
TblObrazky.Open;
Image1.Picture.Assign(TblObrazkyObrazok);
TblObrazky.Close;
tak je opat vsetko v poriadku, az na ten sajrajt ktory TTable posiela do SQL servera.
Vo vysledku to znamena, ze BLOB zapisujem cez TQuery a citam ho cez TTable. Neexistuje nejaky lepsi sposob ?
(Podla moznosti nie v tvare "Vykasli sa na BDE a prejdi na ...")
Bankovni ucty
[*] Agrodat <agrodat(zv)esnet(tec)cz> - 2.2.2000 09:33:04
bankovni ucty kontroluji timto zpusobem:
bankovni ucet ma tuto strukturu XXXXXX-YYYYYYYYYY
kde XXXXXX je predcisli uctu a YYYYYYYYYY je vlastni ucet.
funkce predpoklada, ze vstupni parametr je zarovnan zleva nulou.
napr. ucet "1919-191919"
predcisli = "001919"
ucet = "0000191919"
function Mod11PredcisliUctu(const Predcisli : string) : boolean;
const
CVahyPU : array [1..6] of byte = (10,5,8,4,2,1); // vahy
var
Soucet : longint;
I : byte;
S : String[6];
begin
Result:=false;
S:=Predcisli;
if S = '' then
begin
Result:=true;
exit;
end;
Soucet:=0;
for I:=6 downto 1 do
Soucet:=Soucet+(StrToInt(S[I])*CVahyPU[I]);
Result:=Soucet mod 11 = 0;
end;
function Mod11Ucet(const Ucet : string) : boolean;
const
CVahyU : array [1..10] of byte = (6,3,7,9,10,5,8,4,2,1); // vahy
var
Soucet : longint;
I : byte;
S : string[10];
begin
S:=Ucet;
Result:=false;
Soucet:=0;
for I:=10 downto 1 do
Soucet:=Soucet+(StrToInt(S[I])*CVahyU[I]);
Result:=Soucet mod 11 = 0;
end;
Specificky symbol ma strukturu XXXXXXXXXX, kde prvni tri mista jsou 0
funkce predpoklada, ze vstupni parametr je zarovnan zleva nulou.
nap�. spec. symbol "2222226"
Spec_symboli = "0002222226"
function Mod10Spec_symbol (const Spec_symbol : string) : boolean;
var
S,SKC : string[7];
KC,I : byte;
Soucet : longint;
const
CVahaSS : array [1..6] of byte = (1,3,7,1,3,7); // vahy
begin
result:=false;
if Copy(Spec_symbol,1,3) <> '000' then
Exit;
S:=Copy(Spec_symbol,4,7);
Soucet:=0;
for I:=Length(S) -1 downto 1 do
Soucet:=Soucet+(StrToInt(S[I])*CVahaSS[I]);
SKC:=IntToStr(Soucet);
KC:=10-StrToInt(SKC[Length(SKC)]);
if KC = 10 then KC:=0;
result:=KC = StrToInt(S[Length(S)]);
end;
Ing. Petr Kejval
kejval.jh(zv)agrodat(tec)cz
MDI
[*] viragi(zv)eurotel.sk - 2.2.2000 10:27:17
Puvodni zprava
>mam MDI aplikaci a na kazdem MDI childu jeden TEdit. Potrebuju nacist obsah
>vsech TEditu ze vsech MDI childu, ale jedine reseni ktere znam je tohle:
>
> for I := 0 to MDIChildCount-1 do
> begin
> mdichildren[i].BringToFront;
> if (ActiveMDIChild as TMDIChild).ReplaceOpen(hledany,nahrazeny) then
> begin
> Obsah:=Obsah+(ActiveMDIChild as TMDIChild).edtOBSAH;
> end;
> end;
Zdravim
Nevim, jestli mas na tech childech pouze TEdit. Predpokladam, ze ne.
for i := 0 to MDIChildCount-1 do begin
for j := 0 to MDIChildren[i].ComponentCount - 1 do begin
if MDIChildren[i].Components[j] is TEdit then begin
Obsah:=Obsah+TEdit(MDIChildren[i].Components[j]).Text;
end;
end;
end;
Ivan Virag
MDI
[*] Ren� Otisk - 2.2.2000 10:44:43
Hi,
for I := 0 to MDIChildCount-1 do
ShowMessage(ActiveMDIChild as TMDIChild).TamtenEdit.Text
Sroub
> Zdravim,
>
> mam MDI aplikaci a na kazdem MDI childu jeden TEdit. Potrebuju nacist
obsah
> vsech TEditu ze vsech MDI childu, ale jedine reseni ktere znam je tohle:
>
> for I := 0 to MDIChildCount-1 do
> begin
> mdichildren[i].BringToFront;
> if (ActiveMDIChild as TMDIChild).ReplaceOpen(hledany,nahrazeny) then
> begin
> Obsah:=Obsah+(ActiveMDIChild as TMDIChild).edtOBSAH;
> end;
> end;
>
> coz mi nevyhovuje kvuli prepinani mezi temi okny (v pripade otevrenych
napr.
> 50 childu je to dost neprijemne a pomale).
>
> Neni nejaka jina cesta?
>
> Diky.
>
> ==[ Libor Krayzel ]================================
> http://webhost(tec)cz/elka * mailto:libor.krayzel(zv)czech-tv(tec)cz
> http://easypad.fwd(tec)cz * mailto:elka(zv)volny(tec)cz
> office: +420-69-620 1375
> GSM: +420-603-937 947
> ==============================================Ridke matice
[*] Pavel ZIDEK <kopr(zv)kopr(tec)cz> - 2.2.2000 10:47:51
Ridke matice jsem resil pred n-lety. Podklae mi byla cesky psana kniha od
nejakeho ruskeho matematika.
Teorie je velice jednoducha.
Mohu ti poslat zitra nazev knihy a autora. Mozna nekde v knihovne najdes tu
knihu. Nevim, jestli bych mohl naskenovat danou stranku a posleat mailem.
Neporuisim tim nejake autorske prava na tuto knihu?
Pavel
kopr(zv)kopr(tec)cz
> Zdravim,
>
> nemate nekdo odkazy, linky, texty, napady na imlpementaci ridkych matic
> (sparse matrices)??? Tzn. kdyz chci matici o rozmerech milion X milion X
> milion, ktera ale obsahuje kuprikladu jen priblblych 12 hodnot a neni
tudiz
> nutne alokovat astronomicke pole pameti + co nejrychlejsi pristup....
>
> Petr Fischer
> E-Mail: petr.fischer(zv)email(tec)cz, ICQ#: 24154715
>
>
>Mocnina
[*] Dan Rejchrt <rejchrt(zv)ssakhk(tec)cz> - 2.2.2000 10:51:14
Mam mozna banalni problem, ale potrebuju :
uUmocnit cislo A (bude zadano) na B (bude zadano).
Zkousel jsem sqr, ale to jenom umocni na druhou.
Ja potrebuju i napr. 25 na 1,59
S pozdravem
*********************************************
* Dan Rejchrt "BaldA"
* E-mail: rejchrt(zv)ssakhk(tec)cz
* ICQ# 23131562
* Internet: http://balda.web-page.net
*********************************************ToolButon
[*] Pavel ZIDEK <kopr(zv)kopr(tec)cz> - 2.2.2000 10:56:23
Podobny problem jsem mel, ale s grafickyma kartama. Jestli na masine je S3,
mozna budou problemy.
pavel
----- Original Message -----
From: Libor Filip <filip(zv)agrokonzulta(tec)cz>
To: Konference Delphi (el. adresa) <delphi-l(zv)fwd(tec)cz>
Sent: Tuesday, February 01, 2000 3:24 PM
Subject: ToolButon
> Mam jednoduchou aplikaci v D5, kde je pouze ToolBar s ToolButtony a
ImageList. Problem je v zobrazeni obrazku na ToolButtonech ve Win95, ale
pouze v nekterych instalacich Win95. Zobrazeni ve Win98 nebo Win NT je
spravny.
> Pokud tu samou aplikaci kompiluji v D3 a spustim na stroji s Win95, kde
byl problem, tak je zobrazeni spravne.
> Nevi nekdo, kde je problem?
>Mocnina
[*] Viktor.Lostak(zv)chmi(tec)cz (Viktor Lostak) - 2.2.2000 11:14:30
x^y = e^ (y*ln(x))
----- Original Message -----
From: Dan Rejchrt
To: delphi-l(zv)fwd(tec)cz
Sent: Wednesday, February 02, 2000 10:51 AM
Subject: Mocnina
Mam mozna banalni problem, ale potrebuju :
uUmocnit cislo A (bude zadano) na B (bude zadano).
Zkousel jsem sqr, ale to jenom umocni na druhou.
Ja potrebuju i napr. 25 na 1,59 S pozdravem
*********************************************
* Dan Rejchrt "BaldA"
* E-mail: rejchrt(zv)ssakhk(tec)cz
* ICQ# 23131562
* Internet: http://balda.web-page.net
*********************************************Mocnina
[*] Jan Fiala <jan.fiala(zv)iol(tec)cz> - 2.2.2000 11:19:10
Funkce Power
====================
Jan Fiala jan.fiala(zv)iol(tec)cz
Prog-Soft s.r.o. Plzen
====================
----- Original Message -----
From: Dan Rejchrt
To: delphi-l(zv)fwd(tec)cz
Sent: Wednesday, February 02, 2000 10:51 AM
Subject: Mocnina
Mam mozna banalni problem, ale potrebuju :
uUmocnit cislo A (bude zadano) na B (bude zadano).
Zkousel jsem sqr, ale to jenom umocni na druhou.
Ja potrebuju i napr. 25 na 1,59 S pozdravem
*********************************************
* Dan Rejchrt "BaldA"
* E-mail: rejchrt(zv)ssakhk(tec)cz
* ICQ# 23131562
* Internet: http://balda.web-page.net
*********************************************Web pocitadlo
[*] voltrr1.epr(zv)mail.cez(tec)cz - 2.2.2000 11:20:03
Mohu poskytnout rozpracovanou verzi Delphree WebProvidera (stale neni cas
na to aby se z toho udela distribucni
verze) ktera toto umi (a je tam source pocitadla jako sample)
Radek Voltr
Delphree WebProvider Coordinator
Mocnina
[*] Martin �ajbik (Marcant) <marcant(zv)sct.sk> - 2.2.2000 11:26:12
function Power(Base, Exponent: Extended): Extended;
----- Original Message -----
From: Dan Rejchrt
To: delphi-l(zv)fwd(tec)cz
Sent: Wednesday, February 02, 2000 10:51 AM
Subject: Mocnina
Mam mozna banalni problem, ale potrebuju :
uUmocnit cislo A (bude zadano) na B (bude zadano).
Zkousel jsem sqr, ale to jenom umocni na druhou.
Ja potrebuju i napr. 25 na 1,59 S pozdravem
*********************************************
* Dan Rejchrt "BaldA"
* E-mail: rejchrt(zv)ssakhk(tec)cz
* ICQ# 23131562
* Internet: http://balda.web-page.net
*********************************************Query a RecordCount
[*] Michal Hlavac <7hlavac(zv)st.fmph.uniba.sk> - 2.2.2000 11:28:07
Zdravim,
mam D3, Sybase SQL, W95. Ked pouzijem query a mam vytvoreny vlastny
DBNavigator tak potrebujem zistit, kolko zaznamov je v query a aktualny
zaznam. Samotna query to nepodporuje. Da sa to riesit nejako cez SQLScript?
Potrebujem to pouzit na enable alebo disable buttons v DbNavigator. Da sa to
aj nejak Inak?
Dik, Miso
dao
[*] Martin Kuska <martin.kuska(zv)amenit(tec)cz> - 2.2.2000 11:56:41
Sice jsem to nezkousel, ale rekl bych, ze to bude problem pristupu pres DAO. Asi to neumi rozseparovat ten SQL dotaz a pripojit prislusne podminky do WHERE. Takze budes asi muset zavrit dataset, zmenit SQL, otervit dataset. Vetsinou to delam na stisk tlacitka. Nebo, v nekterych pripadech, pripojit dataset na tabulku a ostatni potrebna pole dotahat jako lookupy. Pak bude MasterDetail fungovat.
Martin.
==============================================================
= Ing. Martin Kuska - Amenit s.r.o. =
= Na Valech - budova Dytron, 741 01 Novy Jicin =
= telefon/fax: +420 656 706203 mobil: +420 603 710545 =
= http://www.amenit(tec)cz e-mail: martin.kuska(zv)amenit(tec)cz =
==============================================================
----- Original Message -----
From: Martin
To: delphi-l(zv)fwd(tec)cz
Sent: Wednesday, February 02, 2000 7:02 AM
Subject: RE: dao
takaze s komponentymi DAO od e.salaje sa neda pomocou SQL dotazu urobiz Master detail ? Tak to som sa zas dostal.Web pocitadlo
[*] Miroslav �ipel <Miroslav.Cipel(zv)oku-tu(tec)cz> - 2.2.2000 12:06:21
stahni si z www.cgiexpert.com "CGI Expert free" - je to freeware
M.
>
> Ale jak udelat aby fungovalo <img src="script.exe">
>
>
> Jaroslav Weiss
> odd. informatiky
>
> SVITAP J.H.J. s.r.o.
> Kijevska 6-8
> SVITAVY
> 568 02
>
> tel: ++420-461-568 202
> fax: ++420-461-568 300
> E-mail: sup(zv)svitap(tec)cz
> URL: www.svitap(tec)cz
> FTP: ftp.svitap(tec)cz
>
Mocnina
[*] psojka(zv)els.ln.skoda(tec)cz - 2.2.2000 12:07:23
> Mam mozna banalni problem, ale potrebuju :
> uUmocnit cislo A (bude zadano) na B (bude zadano).
> Zkousel jsem sqr, ale to jenom umocni na druhou.
> Ja potrebuju i napr. 25 na 1,59
Zdravim.
Pokud A bude vetsi nez 0 tak muzes
pouzit fintu s logaritmem.
A^B = exp(B*ln(A))
>>Jackal<<
> S pozdravem
> *********************************************
> * Dan Rejchrt "BaldA"
> * E-mail: rejchrt(zv)ssakhk(tec)cz
> * ICQ# 23131562
> * Internet: http://balda.web-page.net
> *********************************************
Re(?x): Web pocitadlo
[*] sup(zv)svitap(tec)cz - 2.2.2000 12:12:40
>> To je jako skrabat se pravou rukou za levym uchem. Ja chci tohle:
>> <img src="/cgi-bin/script.exe">
>> v index.html volam primo ten exac. jede to na NT, tak to jde. Ted jde jen
>o
>> to, jaz zobrazit ten obrazek (bez ukladani na disk a jinych podobnych
>> cinnosti...)
>
>No..img=obrazok a exe obrazok nie je....no neviem, dufam ze nesiahnes
pravou
>rukou do prazdna.
>
CGI scripty fungujou tak, ze zavolas script, v tomto pripade <img src="/cgi-
bin/script.exe">, ten vygeneruje obrazek a ten se zobrazi... Bez meziskladu
na disku, primo ve WebStreamu... Xapando???
Jaroslav Weiss
odd. informatiky
SVITAP J.H.J. s.r.o.
Kijevska 6-8
SVITAVY
568 02
tel: ++420-461-568 202
fax: ++420-461-568 300
E-mail: sup(zv)svitap(tec)cz
URL: www.svitap(tec)cz
FTP: ftp.svitap(tec)cz
Web pocitadlo
[*] Delphy confera na MV SR <delphi(zv)minv.sk> - 2.2.2000 12:20:28
> Dobry den. Delam webovsky pocitadlo.
> Neni mi jasny, jak dostanu vygenerovany obrazek z programu.
>
> x:=inttostr(i); // i je cislo navstevnika
> s:=copy('000000',1,6-length(x))+x;
> xp:=TPicture.Create;
> xp.bitmap.canvas.font.name:='Lucida Console';
> xp.bitmap.canvas.font.Size:=-20;
> xp.bitmap.canvas.font.Style:=[fsbold];
> xp.bitmap.canvas.font.Color:=clGreen;
> xp.bitmap.canvas.brush.Color:=$00DDE4D8;
> xp.bitmap.height:=xp.bitmap.canvas.TextHeight(s);
> xp.bitmap.width:=xp.bitmap.canvas.TextWidth(s);
> xp.bitmap.canvas.textout(0,0,s);
> xj:=TJPEGImage.create;
> xj.Assign(xp.bitmap);
> .... Jak dal? Zatim to resim tak, ze to ulozim:
> xj.savetofile('d:\wwwroot\number.jpg');
> a zobrazim na dalsi strance.
Vsetko zalezi od pohladu na vec.
Depends...aky web server pouzivas, na akej platforme.
Kazdopadne spustanie exacov sa deje najjednoduxsie cez cgi scripty, ktore si
napises
a spublikujes. Potom ix volas napr. takymto primityvnym sposobom.
<A><img src=/cgi-bin/nph-count?width=6&link=http://hehe.hohoh.hu/homepag.htm
border=0 ALIGN=right></A>
alebo:
<img src="/cgi-bin/Count.cgi?df=pocitadlo.dat">
kde vecicky za ? znamenaju premenne...na ich zaklade sa vypoti obrazok.
Kazdpopadne, ked uz raz pouzijes cgi, nepotrebujes to ani kodit/prekladat do
nejakeho exe.
cgi=klasicky shellovsky jazyk, nakodis vsetko aj v nom
Werki
More questions?
jendris(zv)minv.sk
(nepis na adresu hore)Mocnina
[*] garalda <garalda(zv)mail(tec)cz> - 2.2.2000 12:33:21
Zkus pouzit funkci Power z unity Math
Pr.:
uses
Math;
var
j : Extended;
begin
j := power(25, 1.59);
...
Mam mozna banalni problem, ale potrebuju :
uUmocnit cislo A (bude zadano) na B (bude zadano).
Zkousel jsem sqr, ale to jenom umocni na druhou.
Ja potrebuju i napr. 25 na 1,59
S pozdravem
*********************************************
* Dan Rejchrt "BaldA"
* E-mail: rejchrt(zv)ssakhk(tec)cz
* ICQ# 23131562
* Internet: http://balda.web-page.net
*********************************************
Mocnina
[*] Bosnis <bosnis(zv)atlas(tec)cz> - 2.2.2000 12:38:31
vzorec je e^(ln(zaklad)*mocnina)
cili v tomto pripade e^(ln(25)*1.59)
v programovacich jazycich bude zapis vypadat takto EXP(LN(25)*1.59)
Pavel SPEJTEK
e-mail: bosnis(zv)atlas(tec)cz
www: http://freeweb.coco(tec)cz/ps/index.html
-----P�vodn� zpr�va-----
Od: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz]za u�ivatele Dan
Rejchrt
Odesl�no: 2. �nora 2000 10:51
Komu: delphi-l(zv)fwd(tec)cz
P�edm�t: Mocnina
Mam mozna banalni problem, ale potrebuju :
uUmocnit cislo A (bude zadano) na B (bude zadano).
Zkousel jsem sqr, ale to jenom umocni na druhou.
Ja potrebuju i napr. 25 na 1,59
S pozdravem
*********************************************
* Dan Rejchrt "BaldA"
* E-mail: rejchrt(zv)ssakhk(tec)cz
* ICQ# 23131562
* Internet: http://balda.web-page.net
*********************************************
Thready
[*] Lukas Voborsky <xvobl03(zv)vse(tec)cz> - 2.2.2000 12:44:12
Ahojte,
nevite, jestli jde v multhreadove aplikaci natvrdo odstrelit nejaky thread?
Neco jako kill. Proste, kdyz se mi thread brutalne zasekne...
dik
Lukas
-==============================================================-
mailto: voborsky(zv)menza.mff.cuni(tec)cz ICQ: 21084410
www: http://come.to/voborsky tel. 8551040-9 l. 393
-==============================================================-
PGP podporovano
Prevod vlastnosti z Published do Private, Public c
[*] Tomas Bihary <tomas.bihary(zv)vslib(tec)cz> - 2.2.2000 11:49:21 -0000
Jednoduse je deklarujes v te sekci ve ktere potrebujes,
ale v nove deklaraci uz pouzijes jenom jejich jmeno:
TPredek = class(Txyz)
private
FVlastnost: Integer;
procedure SetVlastnost(Value: Integer);
publised
property Vlastnost: Integer read FVlastnost write SetVlastnost;
end;
TPotomek = class(TPredek)
public
property Vlastnost; {to ze je to integer atd. si tady odpustis}
end;
a je to
ahoj
Tomas Bihary
----- P�vodn� zpr�va -----
Obecne,
tvorim potomka nejake tridy, ktera obsahuje nektere vlastnosti v casti
Published (jsou videt v Object Inspectoru). Ja ve svem potomku chci
nektere tyto vlastnosti prevest do casti Private, Public ci Protected
(proste aby nebyli videt v Obj. Insp.). Jak na to?
Progr-Amather -Kchodl-� 1989-2000
Ot: Seznam prikazu Delphi
[*] caoperator(zv)ozjc.cpost(tec)cz - 2.2.2000 12:54:24
Zdravim vas,
mam dotaz - existuje nejaky uplny seznam prikazu Delphi IV s jejich popisem (vstupni/vystupni parametry, funkce...)?
Diky za tip
David Viktora (038/7010362, 0603/844618)
region�ln� oper�tor certifika�n� autority
�esk� po�ta s.p., o.z. VTJ�
Nemanick� 16
370 20 �esk� Bud�jovice
hot-line 07:00 - 11:30, 12:00 - 15:00
---
Odchoz� zpr�va neobsahuje viry.
Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.116 / Virov� b�ze: 55 - datum vyd�n�: 10.1.2000
Mocnina
[*] Tomas Bihary <tomas.bihary(zv)vslib(tec)cz> - 2.2.2000 11:56:32 -0000
Plati jednoducha matematicka rovnost:
X^Y = e^(Y*ln(X))
takze ... := Exp(Y * Ln (X))
musis dat akorat pozor aby X nebylo zaporny
Ahoj
Tomas Bihary
----- P�vodn� zpr�va -----
Od: Dan Rejchrt
Komu: delphi-l(zv)fwd(tec)cz
Odesl�no: 2. �nora 2000 9:51
P�edm�t: Mocnina
Mam mozna banalni problem, ale potrebuju :
uUmocnit cislo A (bude zadano) na B (bude zadano).
Zkousel jsem sqr, ale to jenom umocni na druhou.
Ja potrebuju i napr. 25 na 1,59
S pozdravem
OT - MS SQL 7.0 - predani hodnoty cursorem
[*] Hynek Svatos <svatos(zv)kam(tec)czu(tec)cz> - 2.2.2000 13:01:03
Nevim, ale podivej se do helpu k MSSQL na heslo CREATE PROCEDURE,
je tam popis, ze OUTPUT parametr lze udat s prepinacem VARYING:
Specifies the result set supported as an output parameter (constructed
dynamically by the stored procedure and whose contents can vary). Applies
only to cursor parameters.
Mnoho zdaru ...
Keep mailing :-)
=========================
Hynek Svato�
svatos(zv)kam(tec)czu(tec)cz
hynek.svatos(zv)atlas(tec)cz
=========================
> -----Original Message-----
> From: owner-delphi-l(zv)fwd(tec)cz [mailto:owner-delphi-l(zv)fwd(tec)cz]On
> Behalf Of mbartone(zv)Synthesia(tec)cz
> Sent: Wednesday, February 02, 2000 9:28 AM
> To: delphi-l(zv)fwd(tec)cz
> Subject: OT - MS SQL 7.0 - predani hodnoty cursorem
>
>
>
> Ahoj,
> lze se nejak odkazovat na hodnoty, ktere vraci cursor v procedure
> aniz by musely
> byt vyjmenovany ?
>
> DECLARE abc CURSOR FOR SELECT * FROM MyTable
>
> OPEN abc
> FETCH NEXT FROM abc
> if abc.sl1 = ...
> if abc.sl3 = ..
> ...
>
> nebo to musim mit jen takto
>
> declare
> (zv)sl1 int,
> ..
> (zv)sl40 int
>
> DECLARE abc CURSOR FOR SELECT sl1,.....sl40 FROM MyTable
>
> OPEN abc
> FETCH NEXT FROM abc into (zv)sl1,....(zv)sl40
> if (zv)sl1 = ..
> if (zv)sl3 = ..
> ...
>
> Milan
>
>
> ---
> P��choz� zpr�va neobsahuje viry.
> Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
> Verze: 6.0.87 / Virov� b�ze: 47 - datum vyd�n�: 1.11.1999
>
---
Odchoz� zpr�va neobsahuje viry.
Zkontrolov�no antivirov�m syst�mem AVG (http://www.grisoft(tec)cz).
Verze: 6.0.87 / Virov� b�ze: 47 - datum vyd�n�: 1.11.1999
Re(?x): Web pocitadlo
[*] Polak Jiri <Jiri.Polak(zv)tconsult(tec)cz> - 2.2.2000 13:04:06
> -----P�vodn� zpr�va-----
> Od: sup(zv)svitap(tec)cz [mailto:sup(zv)svitap(tec)cz]
> Odesl�no: 2. �nora 2000 12:13
> Komu: delphi-l(zv)fwd(tec)cz
> P�edm�t: Re(?x): Web pocitadlo
>
>
> > >No..img=obrazok a exe obrazok nie je....no neviem, dufam ze
> > nesiahnes pravou rukou do prazdna.
To je zakladni nepochopeni fungovani sluzby WWW. tady ten pisatel si ji
plete
s lokalnim souborovym systemem s asociovanymi priponami :-))
>
> CGI scripty fungujou tak, ze zavolas script, v tomto pripade
> <img src="/cgi-
> bin/script.exe">, ten vygeneruje obrazek a ten se zobrazi...
> Bez meziskladu
> na disku, primo ve WebStreamu... Xapando???
Myslim, ze Ti jde o to, jak rict, ze ten stream, ktery poustis
z web serveru, je typu obrazek. K tomu mohu rici pouze ze na MS IIS
je k tomu v objektu Response promenna ContentType.
Ta obsahuje string 'typ/subtyp', napr.
'text/HTML' //defaultni hodnota
'text/xml'
'image/GIF'
'image/JPEG'
'image/PNG'
Jine webservery neznam.
HTH
Jura
Distribuce COMCTL32
[*] Tomas Bihary <tomas.bihary(zv)vslib(tec)cz> - 2.2.2000 12:11:11 -0000
Muzu doporucit IS for M$ VC++, ktery se dodava s M$ VStudiem,
tahle verze umoznuje psat instalacni skripty a z nich napriklad
spousted uzivatelska DLL (a znich muzes spustit jiny program),
taky se z toho skriptu muzes treba hrabat v registrech a zjistit, co z toho,
co potrebujes, je uz v systemu nainstalovany a co ne...
Tomas Bihary
----- P�vodn� zpr�va -----
From: Foldyna Ji�� <jiri.f(zv)avizo(tec)cz>
> potrebuji se svou aplikaci distribuovat i COMCTL32. U M$ jsem se dozvedel,
...
> kvuli castecne instalaci BDE.
Ahoj,
IS Express pro Delphi neumi spoustet jine aplikace behem instalace. Lze to
ale castecne obejit tim, ze v IS u daneho EXE ve vlastnostech zatrhnes
"Allow Express to self register this file". Dalsi moznost je misto ISX
pouzit MS Installer. Prepis hlavicek je tady:
http://delphi-jedi.org/Jedi:APILIBRARY:712983686
Petr Vones, amatersky programator
Kontrola spravnosti ICO
[*] Tomas Holan <HOLAN(zv)ksvi.mff.cuni(tec)cz> - 2.2.2000 14:13:45
> Ako sa kontroluje spravnost identifikacneho cisla organizacie ICO?
Treba dotazem na http://wwwinfo.mfcr(tec)cz/ares/ares_nj.html
( :-), ale nakonec, proc ne?)
Tom
C do delphi
[*] Josef Dodek <dodek(zv)cbmi.cvut(tec)cz> - 2.2.2000 13:23:13
zdravim,
muze mi nekdo prosim poradit s nasledujicjim:
mam C-ckovskej file (v nem nejaky funkce atd) a ten bych potreboval dostat
do delphi. Vim ze je do delphi mozno prilinkovat *.OBJ file vytvorenej z
toho Cckovskyho zdrojaku ale problem je v tom ze ty funkce pozivaji dalsi
standardni Cckovsky funkce (napr. pro praci se soubory, retezci apd.) a ty
se mi do toho *.OBJ souboru neprikompiluji.
ma nekdo nejako radu co s tim
predem diky vsem
pepa dodek
sdileni databazi Paradox na TCP/IP pod Delphi3
[*] K N L <buthrakaur(zv)angelfire(tec)com> - 02.2.2000 13:33:23
Zdar!
Nemuzete mi nekdo poradit?? Potrebuju sdilet databaze na siti s OS WIN98. V siti jsou zapojeny jen 4 stanice. Na jedne z nich jsou umisteny databaze. Pri pristupu k nim mam neustale problemy s hlaskou "directory is controlled by another PDOXUSER.NET".
Co s tim??? Nepomohl by nejaky serverovy system, ktery by narozdil od WIN98 umoznil otevrit soubor pro vic uzivatelu??
Angelfire for your free web-based e-mail. http://www.angelfire.com