Archív konference Delphi
Zpět na výběr roku archívu nebo přejít na fulltextové vyhledávání v konferenci.
Kresleni na Canvas tiskarny II.
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 22.8.1999 22:35:10
Petr Brant wrote:
>
> Ahoj vsem,
>
> diky za dosavadni rady, uz to jde dobre, uz umim ridit velikost obrazku
> v pohode, ale porad je tu jeste nedostatek: Vsechny cary, jako kruznice,
> primky apod. se zobrazuji spravne, ale texty, ktere jsou take soucasti
> obrazku, jsou porad stejne velke. Mam samozrejme v pameti zaznamenany
Ahoj,
Problem muze byt v chybnem nastaveni Font.PixelsPerInch, viz:
http://www.borland.com/devsupport/delphi/ti/TI1547D.html
--
Petr Vones, amatersky programator
Nacteni dat ze zobrazene tabulky
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 22.8.1999 22:35:02
Petr Ga�ourek wrote:
>
> Ahoj,
>
> nevite nekdo jak vytahnout udaje zobrazene v tabulce jineho programu?
> Podrobneji: mam cizi program, ktery v tabulce (zrejme modifikovany
> TDBGrid) zobrazuje udaje - oznacit lze pouze jen jedna bunka tabulky.
> Chtel bych udelat program, ktery by precetl a ulozil data zobrazena v
> tabulce.
> Myslim, ze by to melo jit udelat. Napr. program Open Pass umi precist
> udaje z libovolneho TEdit v nejakem jinem okne.
Ahoj,
Tezko, u EDITu je to neco jineho, to je zakladni ovl.prvek Windows se
kterym komunikujes vyhradne pomoci zprav. TDBGrid je Delphi komponenta
ktera by musela mit zavedene vlastni zpravy ktere by toto umoznily.
Kdyz se ale jedna o DBGrid, co treba rovnou pristupovat k te databazi ?
--
Petr Vones, amatersky programator
Aplikace bez formulare
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 22.8.1999 22:35:21
Tomas Rosa wrote:
>
> Ahoj Delphisti,
>
> nevite nahodou nekdo, jak udelat aplikaci bez zadnych formularu.
Ahoj,
Priklad takove opravdu jednoduche aplikace najdes tady:
ftp://ftp.mlp(tec)cz/pub/misc/Delphi/konference/D4/API/HelloWorld.zip
--
Petr Vones, amatersky programator
ADO + D5
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 22.8.1999 22:37:05
Zbysek Hlinka wrote:
>
> Erik Salaj wrote:
> > dalsie) ADO komponenty sa znacne podielali aj na tom, ze Borland vobec
> > urobil ADOExpress (je to konkurencny produkt pre jeho MIDAS) a
>
> uzivatelske rozhrani. Jakym zpusobem by tohle mely delat
> komponenty z ADOExpress?
ADO RDS ??
> Mno, celkem zajimave (na prvni pohled) vypada vylepseny datovy
> modul, jsou tam jeste prime komponenty pro IB, zajimave jsou
> take "zalozky" ToDo (poznamky ve zdrojaku, na co je treba se v
> budoucnu jeste podivat) a lokalizacni nastroje. Ostatni mi uz
> pripada spise jako drobne vylepseni.
Pro "nedatabazove" programovani a vyvojare komponent je tam toho myslim
malinko vic ...
> Takze jak vidno, Inprise si zavira i zadni vratka a nechava
> konkurenci volne pole pusobnosti. :-))) Sice se mi to na jedne
> strane libi, protoze mohu dal bezstarostne nabizet svuj Lokalizator,
> ale na druhe strane se mi to nelibi, protoze takhle asi neprilakaji
> mnozstvi dalsich vyvojaru, takze mam obavy o budoucnost Delphi
> (a tedy tim padem i o budoucnost svou). Fakt to nechapu.
Kdyz uz se to tu propira, tak jeste nutno poznamenat, ze dle dosavadnich
informaci nema D5 Standart _zadnou_ podporu pro praci s databazemi (viz
Tabulka vlastnosti), tedy ani BDE na Paradox tabulky. Opravdu nechapu co
tim sleduji, pokud ma byt Standart jakousi "learning edition" vylepsenou
o moznost distribuovat aplikace v ni vytvorene a Delphi je stale propagovano
i jako databazovy nastroj, tak ten "learning" prinos se z toho tak trochu
vytraci. A obava ze snad dnes nekdo vydela balik s aplikacemi na Paradoxu
ci DBasi je taky pomerne zvlastni ....
> > Mali by rozhodne do Delphi viac investovat. Zda sa mi ale, ze sa chcu
> > venovat Linux-u, co nepovazujem za rozumne (unixy su podla mna uz
> > davno prekonane systemy a ich uplatnenie je velmi obmedzene, pozitivne
^^^^^^^^^^^^^^^^^^^^^^^
No ...
> > CE, EPOC 32, ...) a procesory by vsak bolo velmi prospesne. Takisto by
> > mali uplne prerobit VCL tak, aby to nebolo mnohomegabajtove monstrum,
> > ale pokial mozno skladacka z malych, binarne kompatibilnych
> > komponentov (podobne ako su ActiveX).
To snad radsi ani ne, protoze pak by jsi musel s aplikacemi sirit plno
ruznych ActiveX komponent, navic nativni pristup je podle mne pruznejsi.
Ono by ale uplne stacilo, kdyby byla k VCL dokumentace. Ohledne zmenseni
velikosti aplikace, muzes prece pouzivat balicky. Problem je ale i jinde,
v nekterych pripadech importuje VCL az prilis zbytecne funkce z nekterych
DLL.
--
Petr Vones, amatersky programator
Prima konektivita do SQL Anywhere
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 22.8.1999 22:37:18
"bc.Svoboda Jarom�r" wrote:
>
> Kdyz uz byla rec o prime konektivite do databazi,
> zajimalo by me jak a kde lze ziskat primy konekt
> do SQL Adaptive Serveu Aniwhere 6.0, abych obesel
> ODBC.
Ahoj,
O SQL Anywhere nevim temer nic, ale da se predpokladat ze budou muset
poskytovat OLE DB Provider, pak uz je pripojeni pomerne snadne pomoci
libovolnych ADO ci OLE DB komponent.
--
Petr Vones, amatersky programator
COM Ports
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 22.8.1999 22:38:14
Ivan Pavelka wrote:
>
> Nevite nekdo, jestli existuje jednoducha free komponenta pro D1, ktera
> Popripade existuje-li neco jako AsyncFree pro D1 (16bit).
Ahoj,
AsyncFree v 16bit rozhodne nebude, protoze obsluha seriove komunikace je
ve Win32 zcela odlisna, takze by musely vlastne existovat dve knihovny.
Pokud ti ale staci jednoducha komponenta, tak se podivej na
http://kuchyn.delphi(tec)cz a tam hledej PortoBello.
--
Petr Vones, amatersky programator
WAB (Was: Format *.dbx souboru)
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 22.8.1999 22:39:44
"I.C. - Delphi Support" wrote:
> > Dobry den.
> > Nevite prosim nekdo jaky je format *.dbx souboru, a pripadne jak je mozne
> s nimi pracovat?
> > Chtel bych udelat aplikaci ve ktere chci pouzivat soubor kontaktu z
> Outlook Express.
> Problem jhe v tom, ze Outlook Express nema kontakty v *.dbx, ale
> pouziva Windows Address Book a jeho kontakty, ktery jsou v soubory *.wab.
Ahoj,
Funkce pro praci WAB jsou obsazeny v knihovne WAB32.DLL a jak uz byva u
Microsoftu dobrym zvykem, nejsou zdokumetovane. Vysledkem je, ze ziskas
IAddrBook. Neco vice se o tom lze docist tady:
http://www.geocities.com/SiliconValley/Heights/5286/wab.html
--
Petr Vones, amatersky programator
Neviditelne sdilene slozky (Was: IP Adresa & detek
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 22.8.1999 22:40:26
Jan Fiala wrote:
> Sdilenou slozku, ktera neni videt neni problem vytvorit. Staci, kdyz
> sdilene jmeno zacina znakem $.
Ahoj,
To jo, ale takto sdilena slozka je neviditelna pro ostatni v Siti, a
ty ji vidis v Pruzkumniku s takovou tou modrou packou v ikone. Jenze
existuje moznost, kdy lze vytvorit sdilenou slozku, aniz by jsi ji na
svem pocitaci jakkoli videl (tedy ani v Pruzkumniku). Pak ti muze nekdo
v pohode sdilet treba cely disk a dokud si nespustis NetWatch, tak o tom
nebudes vedet. Toho prave vyuzivaji nektere viry na "dalkovou spravu".
--
Petr Vones, amatersky programator
Drag & drop
[*] Petr Vones <pvones(zv)mbox.vol(tec)cz> - 22.8.1999 22:42:28
Tom� Br�dle wrote:
>
> Zdravim vsechny,
>
> nevite nekdo proc mi spadne a kousne se aplikace (acces violation) pri Drag
> & Drop tazen�? Pouzivam (v D4 prof.) dva TListView, z jednoho chci
Ahoj,
Mam pocit ze se to tu uz snad kdysi probiralo. Mas posledni UpdatePack #3 ?
--
Petr Vones, amatersky programator
Prima konektivita do SQL Anywhere
[*] Radim Kunz <rkunz(zv)ova(tec)comp(tec)cz> - 22.8.1999 23:07:50
Zkus
http://www.sqldirect-soft.com/
Radim Kunz
>Kdyz uz byla rec o prime konektivite do databazi,
>zajimalo by me jak a kde lze ziskat primy konekt
>do SQL Adaptive Serveu Aniwhere 6.0, abych obesel
>ODBC.
>
>svoboda(zv)okfas(tec)cz
>www.okfas(tec)cz
Integer to Binary
[*] Tomas Plevak <vamp(zv)sol(tec)cz> - 22.8.1999 23:14:03
Hello,
mame nejakou jednoduchou moznost v Delphi prevadet
Integer do binarniho tvaru a taky obracene?
Se srdecnym pozdravem Tomas Plevak
E-mail : vamp(zv)sol(tec)cz
ICQ : 6621919
ADO + D5
[*] Ing. Jaroslav �ke��k - 23.8.1999 00:13:40
> Kdyz uz se to tu propira, tak jeste nutno poznamenat, ze dle dosavadnich
> informaci nema D5 Standart _zadnou_ podporu pro praci s databazemi (viz
> Tabulka vlastnosti), tedy ani BDE na Paradox tabulky. Opravdu nechapu co
> tim sleduji, pokud ma byt Standart jakousi "learning edition" vylepsenou
> o moznost distribuovat aplikace v ni vytvorene a Delphi je stale
propagovano
> i jako databazovy nastroj, tak ten "learning" prinos se z toho tak trochu
> vytraci. A obava ze snad dnes nekdo vydela balik s aplikacemi na Paradoxu
> ci DBasi je taky pomerne zvlastni ....
........
Standard evidentne neni stvoren za ucelem tvorby databazovych aplikaci.
K cemu by potom byl profesional?
Jaro
Neviditelne sdilene slozky (Was: IP Adresa & detek
[*] Jan Fiala <fiala(zv)infos(tec)cz> - 23.8.1999 06:20:27
> > Sdilenou slozku, ktera neni videt neni problem vytvorit. Staci, kdyz
> > sdilene jmeno zacina znakem $.
>
> Ahoj,
>
> To jo, ale takto sdilena slozka je neviditelna pro ostatni v Siti, a
> ty ji vidis v Pruzkumniku s takovou tou modrou packou v ikone. Jenze
> existuje moznost, kdy lze vytvorit sdilenou slozku, aniz by jsi ji na
> svem pocitaci jakkoli videl (tedy ani v Pruzkumniku). Pak ti muze nekdo
> v pohode sdilet treba cely disk a dokud si nespustis NetWatch, tak o tom
> nebudes vedet. Toho prave vyuzivaji nektere viry na "dalkovou spravu".
>
> --
>
> Petr Vones, amatersky programator
A neni to jenom tim, ze ji k tomu priradi standardni ikonu ? Viz napr. DeskTop.INI v adresari Dokumenty. V tomto souboru jde mimo jine i pro adresar priradit ikonu.
Jan Fiala
Integer to Binary
[*] Ing. Miroslav Ondrisek, BONNEL TECHNOLOGIE, s.r.o. <bonnel(zv)telecom(tec)cz> - 23.8.1999 07:12:13
Prevod z N:Integer do Bin:String treba nasledovne:
N:=<prevadene cislo>;
s:='';
Repeat
if odd(N) then
s:='1'+s
else
s:='0'+s;
N := N shr 1;
Until N=0;
Nebo pro nekoho ponekud jinak, mozna srozumitelneji:
Function IntToBinary(Value : integer) : string;
begin
Result := '';
while Value <> 0 do begin
if Odd(Value) then result := '1' + Result else Result := '0' +
Result;
Value := Value div 2;
end;
end;
Cau Mira
----- P�vodn� zpr�va -----
Od: Tomas Plevak <vamp(zv)sol(tec)cz>
Komu: <delphi-l(zv)fwd(tec)cz>
Odesl�no: 22. srpna 1999 23:14
P�edm�t: Integer to Binary
> Hello,
> mame nejakou jednoduchou moznost v Delphi prevadet
> Integer do binarniho tvaru a taky obracene?
>
> Se srdecnym pozdravem Tomas Plevak
> E-mail : vamp(zv)sol(tec)cz
> ICQ : 6621919
>
>
>OffTopic: Licencni politika - mala poznamka (was:
[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 23.8.1999 07:37:54
Ing. Jaroslav ke �k wrote:
> Takhle me vsak natolik nastvali, ze
> > >jsem IB opustil z duvodu nevypocitatelnosti budouciho vyvoje, a
> > >musel jsem predelat program na Paradox a MS SQL (protoze tohle meli
> ---------------------------------
> To je pravda. Ucit se novy server je zalozitost, ktera se pocita na
> mnoho mesicu i na roky. Je to casto vetsi investice nez je cena
> vlastniho serveru. Ovsem kdyz uz nekdo tuto cestu podstoupi, tak se uz
> asi tezko vrati. Myslim si tez, ze to byl omyl. Jenomze POZOR - to
> bylo jeste za ery Borlandu, kdy se tam stridali reditele a pod. Bylo
Coz me ovsem jakozto zakaznika naprosto nezajima...
> to asi jejich nejtezsi obdobi. Nakonec je lepsi pozde nez nikdy. Ja si
> vsak nemylim, ze neni jeste pozde. Stale vznikaji nove vyvojove tymy a
> stale je a bude dost vyvojaru, kteri se znovu rozhoduji. Ja jsem prave
Ano. A mnoho tymu se rozhodlo napriklad pro Visual Basic, Visual
C a podobne. Byl jsem toho v rade pripadu temer primym svedkem.
Jaka je nadeje, ze se zase preorientuji? :-)) BTW - naucit se
ovladat poradne nejaky nastroj je take otazka dlouhych mesicu az
let, takze co se rychle ztrati, tezko a dlopuho se ziskava zpet.
K tomu "pozde": ekonomika veci je pro urcity (a troufam si rici ze
vetsinovy) okruh aplikaci jasna. Pet pripojeni na siti s SQL databazi
zdarma mi pokryje vetsinu zakazniku. Kdo ma vetsi sit, ma obvykle
i na zakoupeni plne licence databaze, a v podstate ji uz vlastne i
potrebuje. Srovnam-li to napriklad s jednou licenci pro IB (Delphi 1),
stale mi vychazi vyrazne lepe MSDE. Pripominam, ze se
pohybujeme u databazi velikosti radove desitky, mozna stovky
mega. Pro gigabajtove rozsahy bych stejne sahnul jinam nez k MS
SQL nebo IB.
> cekal na D5, abych zjistil jak je to s primou konektivitou na IB.
:-) Ja jsem nemohl cekat. Musel jsem se rozhodnout v danou chvili.
Takze lze spolehat pouze na zacinajici vyvojare, kteri se teprve
mohou rozhodovat, nebo za ktere jeste celkem bez nasledku muze
rozhodnout nekdo jiny. Ale to je beh na dlouhe trate a vysledek by
mohl byt videt tak nejdrive za dva, tri roky, jenze to bude Microsoft
zase o kus dal a IB to podle meho nazoru prohraje. Tyhle dva roky
prave Borland prohral svou hloupou strategii - ted mohl byt na koni
on, mohl mit hromadu penez na vyvoj IB. Vzdal to, a ted uz IMHO
nema sanci to dohnat.
> Rovnez jsem zvazoval prechod k MS SQL. Ale ted po vyjiti D5 a IB6 se
> vahy asi prikloni trochu zpatky k IB. Kdyby k tomu jeste Inprise
> uvolnil single verzi IB6, tak to by asi na svou stranu zisal zase vice
> vyvojaru. Penize, ktere se takto ztrati se mnohem vice vrati na mnoha
> multilicencich a upgradech.
Vtip je prave v tom, ze takto zadne penize nelze ztratit. Protoze
urcita cast zakazniku databazi stejne nekoupi, mozna pozdeji.
Jestlize se u nich tedy dnes zahackuji s nejakym sikovnym
resenim s nejakou databazi, az budou kupovat, tak nejspis tu, na
ktere jim uz dlouho cosi spolehlive bezi. Ted to vidim tak, ze
zakaznici budou zahlceni MSDE ze vsech moznych stran. Takze
budou provozovat 3 aplikace nad MSDE, a mozna nekteri z nich
jednu nad IB, Sybase (drive verze Anywhere) a podobne. Opacnych
pripadu bude jako safranu, a procentuelne jich nebude pribyvat.
Prachy tedy nakonec zase shrabne Bill. A ja se ted musim
rozhodnout, co mi bude fungovat za dalsi 3 roky.
> Kdyz projekt jednou existuje, tak vzhledem
> k vyssi kvalite C/S projektu se k nemu brzy prikloni i vetsi firmy,
> kteri potrebuji sitovy provoz. Vyvojari by tak mohli zcela opustit
> Paradox tabulky, ktere jsou stejne take zadarmo a neprinasi zadny
> uzitek a pritom by se postupne vytvarela mohutna zakladna projektu
> vytorenych na single IB. Tim by velmi vzrustal projektovy i znalostni
> potencial pro vyuziti IB v siti a na Internetu. Pokud se tak nestane
> tak tuto platformu oladne MS SQL a Acces. Jako-by tuto snahu Inprise
> chtel Microsoftu usnadnit - uvidime.
Souborove databaze by uz konecne mely odejit do muzea, na siti
jsou s nimi jen problemy. Bill udelal jedinecny krok, aby se tak
stalo. Aby se tomuhle monstru dalo konkurovat, musela by byt v
Delphi nejaka "lepsi" licence na IB. Protoze lze predpokladat, ze
by se to tykalo pouze verze Enterprise (ostatne licence na MSDE
take neni vsude), stale by se nevyplatilo kupovat kvuli tomu tu
nejdrazsi verzi Delphi. K tomu by jeste musela prijit volna licence
na MIDAS. Za stavajiciho stavu se mi vyplati daleko spise koupit
Professional, k tomu licenci na MSDE (treba v Office, s cimz
ziskam jeste radu dalsich zajimavych veci) a ADO komponenty
(kdybych nechtel delat sve OLE DB). A pak jsem v situaci, kdy se
mohu rozhodovat, zda se mi vyplati delat vicevrstvou aplikaci, a
pokud ano, mohu to udelat i bez MIDAS, primo nad OLE DB. Ma
to pouze jedno omezeni, a to ze musim zustat se vsim vsudy ve
svete Windows. Coz ale na druhe strane nevadi, protoze Wokna
jsou stejne temer vsude. Jako bych uz slysel namitky, ze bysme
chteli pokud mozno vsechno zadarmo (a ze jsem je uz slysel). :-)
Jenze lide nejsou blbi a umeji si spocitat pomer cena/uzitna
hodnota. Delphi Enterprise zde zadnou vyhodu v dnesni dobe
neprinasi.
> Inprise dela asi tu chybu, ze uvolnuje stare verze. Jenze technologie
> jde dopredu rychle a stare verze jsou nepotrebne. Kdyby naopak uvolnil
> nejnovejsi single verzi, tak by podporil vyvojare a ti by asi rychleji
> primeli sve zakazniky k upgrade sitovych verzi.
Tak, podpora vyvojaru. Bill sice nahlas obcas repta, ale v principu
je asi rad, ze se Windows kradly a kradou. Protoze nekdo dnes
ukradne, zvykne si, a pozdeji koupi. Jde jen o to primet ho
nejakym zpusobem, aby to "pozdeji" jednou prislo. Microsoft
rozdava beta verze dulezitych produktu na potkani. To je IMHO
skvely tah. Americky Inprise namisto toho radeji vymysli
nesmyslne ochrany a sestavuje ceniky na vsechno mozne a
zapomina na jednu dulezitou vec - ze mene znamena casto vice, a
kdo chce hodne, obvykle dostane malo.
Delphi ma sanci jenom jako masovka, a ne jako nastroj pro elitni
klub vyvojaru - to by brzo zasel na nedostatek zajmu. Proto bych
na jejich miste sice oficialne brblal proti kradeni Delphi, ale v
tichosti bych byl spokojen, kdyby lide Delphi kradli (takto vlastne
uspel Turbo Pascal). Kdo si bude vyvijet pro sebe, toho bych
nechal v klidu spat, honil bych pouze ty, kteri by prodavali
programy napsane v Delphi nebo sirili vykradene zdrojaky. Protoze
z programatoru-amateru se jednou mohou stat profici. A lze
predpokladat, ze budou pokracovat na tom, na cem se vyucili a ze
stejne nakonec koupi.
> Je to tedy velmi vyhodna investice do budoucna. V dobach, kdy byl
> Borland v cervenych cislech a slo i o preziti je pochopitelne, ze se
> spise hledelo na prijmy pristiho ctvrtleti. Ted je tomu doufam jiz
> jinak a Inprise snad hledi za rok 2000. Mohlo by se to projevit i v
> jeho licencni politice. Mirne snizeni ceny D5 pri relativne vetsim
> narustu novych objektu a vlastnosti (porovnej D3-D4-D5) naznacuje, ze
> by tomu tak mohlo byt. Nechme se prekvapit.
Dulezite jsou dolarove ceny, a ty IMHO zustaly stejne (jestli se
mylim, opravte me nekdo). U ceskych cen pouze klesla obrovska
disproporce mezi oficialnim a Inprise kursem k dolaru.
S pozdravem
Zbysek Hlinka
E-mail: zhlinka(zv)login(tec)cz, localizator(zv)localizator.com
Tel.: 02/795 29 56; GSM: 0603 551 282
Krystofova 1016, 149 00 Praha 4
CZ
Thready a parametry - prepis z C do PAS
[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 23.8.1999 07:37:54
Ing. Ludek Florian wrote:
> 1) predavana hodnota novemu threadu nesedi.
>
> C:
> int modevalue;
> ...
> modevalue=RM_SR8|MD_PCM|MD_NOGAIN|EV_SYNC; // (integer)
>
> recordh = CreateThread(NULL,0,record_thread, &modevalue,
> CREATE_SUSPENDED,&threadid);
> SetThreadPriority(recordh, THREAD_PRIORITY_NORMAL);
> ResumeThread(recordh);
>
> DWORD WINAPI record_thread(int *mode)
> {
>
> printf("...record_thread: Inside the thread\n");
>
> switch(*mode){
> case(RM_SR6|MD_ADPCM|MD_GAIN|EV_SYNC):
> printf("...record_thread: Rec at
> RM_SR6|MD_ADPCM|MD_GAIN|EV_SYNC\n"); break;
> } // end switch
> :
> :
> }
>
>
>
> PAS: (pokus)
>
> function record_thread(mode: pinteger): dword;
"int *mode" je spise "var mode:integer". A hlavicku bych doplnil o
stdcall nebo cdecl.
> begin
> case mode^ of
pak samozrejme bude "case mode of"
> RM_SR8 or MD_ADPCM or MD_GAIN or EV_SYNC:
> Writeln('blabla...');
> end;
>
> result:=0;
> end;
>
>
>
> modevalue := RM_SR8 or MD_ADPCM or MD_GAIN or EV_SYNC; //
> (integer)
>
> recordh := CreateThread(NIL,0,(zv)record_thread,(zv)modevalue,
> CREATE_SUSPENDED,threadid);
> Writeln('Thread ID: ' + IntToStr(threadid));
> SetThreadPriority(recordh, THREAD_PRIORITY_NORMAL);
> ResumeThread(recordh);
>
> I kdyz je hodnota pred predanim 16384 a adresa treba $584745, ve
> funkci record_thread uz mam hodnotu mode jinou a adresu taky.
>
>
> 2) s tim souvisi dalsi - predavani parametru funkci
>
> C:
> int chdev; /* channel descriptor */
> DV_TPT tpt; /* termination parameter table */.
>
> /* Set to terminate play on 1 digit */
> tpt.tp_type = IO_EOT;
> tpt.tp_termno = DX_MAXDTMF;
> tpt.tp_length = 1;
> tpt.tp_flags = TF_MAXDTMF;
>
> if (dx_playvox(chdev,&tpt,"HELLO.VOX",NULL,0) == -1) {
> printf("Error playing file - %s\n", ATDV_ERRMSGP(chdev));
> exit(4);
> }
>
> V dalsi knihovne je DV_TPT definovan nasledovne:
>
> typedef struct dv_tpt DV_TPT;
>
> /*
> * DV_TPT: Termination Parameter Table Entry Structure.
> */
> struct dv_tpt {
> unsigned short tp_type; /* Flags Describing this Entry */
> unsigned short tp_termno; /* Termination Parameter Number */
> unsigned short tp_length; /* Length of Terminator */ unsigned
> short tp_flags; /* Termination Parameter Attributes Flag */
> unsigned short tp_data; /* Optional Additional Data */ unsigned
> short rfu; /* reserved */ DV_TPT *tp_nextp; /* Ptr to
> next DV_TPT if IO_LINK set */
> };
>
> a funkce dx_playvox:
>
> extern int dx_playvox( int ChDev, const char * fNamep, const DV_TPT
> *tptp,
> const DX_XPB * xpbp,unsigned short
> mode);
>
> v helpu:
> Name: SHORT dx_playvox(chdev, filenamep, tptp, xpbp, mode)
> Inputs: int chdev . valid device handle
> char *filenamep . pointer to name of file to play
> DV_TPT *tptp . pointer to termination parameter block
> DX_XPB *xpbp . pointer to I/O transfer parameter block
> unsigned short mode . play mode
> Returns: 0 if successful
> -1 if failure
> Mode: synchronous
>
>
> PAS:
> type DV_TPT = ^Tdv_tpt;
Podle vypisu neni DV_TPT odkaz na pointer, ale primo na strukturu.
> Tdv_tpt = record
> tp_type: ShortInt; // Flags Describing this Entry
unsigned short je word
> tp_termno: ShortInt; // Termination
> Parameter
> Number
> tp_length: ShortInt; // Length of
> Terminator tp_flags: ShortInt; //
> Termination Parameter
> Attributes Flag
> tp_data: ShortInt; // Optional Additional
> Data rfu: ShortInt; // reserved
> tp_nextp: DV_TPT; // Ptr to next DV_TPT
> if
> IO_LINK set
> end;
>
> function dx_playvox(chdev: integer; fnamep: PChar; tptp, xpbp:
> pointer; mode: integer): integer; cdecl; external 'LIBDXXMT.DLL';
>
> procedure TForm1.PlayVOX(Channel: integer; VOX: string);
> var tpt: DV_TPT;
Zde ma byt tdv_tpt, podle tve deklarace
> begin
> new(tpt);
> with tpt^ do begin
> tp_type := IO_EOT;
> tp_termno := DX_MAXDTMF;
> tp_length := 1;
> tp_flags := TF_MAXDTMF;
> tp_data := 0;
> rfu := 0;
> tp_nextp := NIL;
> end;
>
> if dx_playvox(ChannelID[Channel], PChar(VOX), (zv)tpt, NIL, 0) = -1
Pokud jsi udelal z tpt pointer (coz v principu spatne neni), nemuzes
v teto funkci na nej odkazovat jako na pointer, ale musel bys ho
uvest bez (zv).
> then
> showmessage('Chyba');
> dispose(tpt);
> end;
>
>
> V helpu je i tento priklad:
>
> // universal DV_TPT used for playing files
> DV_TPT tptplay[] = {{IO_CONT, DX_MAXDTMF, 1, TF_MAXDTMF},
> {IO_EOT, DX_LCOFF, 1, TF_LCOFF}};
>
> takze to vypada na pole zaznamu.
Ano, to je.
> Pokud ve funkci dx_playvox dam misto (zv)tpt NIL, tak je to v pohode. Ale
> s (zv)tpt mi to nechodi. Urcite je to spatne, ale nedari se mi ani s
> "kurzem C".
Ja byl na poslednim kursu C nekdy v roce 89 (to se jeste delal
nasucho, bez pocitacu :-O) a vystacim si s tim dodnes. :-)
S pozdravem
Zbysek Hlinka
E-mail: zhlinka(zv)login(tec)cz, localizator(zv)localizator.com
Tel.: 02/795 29 56; GSM: 0603 551 282
Krystofova 1016, 149 00 Praha 4
CZ
packal7 a pII
[*] Pavel ZIDEK <kopr(zv)kopr(tec)cz> - 23.8.1999 07:40:51
Z http://www.kopr(tec)cz/demo.htm si stahni TPPATCH.EXE, kterym svoje PASCALovske programy spravis. Neni to zasluha Win, ale rychlosti procesoru. PASCAL 7 byl dovyvijen v dobe, kdy jeste rychle procesory nebyly na svete.
----------
> Odes�latel: tmara(zv)itsys(tec)cz
> Komu: delphi-l(zv)fwd(tec)cz
> P�edm�t: OT: packal7 a pII
> Datum: 20. srpna 1999 9:15
>
> Hezky den,
> Omlouvam se za OT...
> Jakykoliv programek napsany v�Borland Pascalu 7 a
> spusteny na Pentiu II / W98 mi hodi V�DY chybu : "Error 200: Division by
> zero."
> N�co jsem zaslechl o spatnych knihovnach BP7, ale
> nen� toto spise chyba W98? Mohu s�tim n�co delat? (tedy krome nespousteni
> t�chto programku...)
>
> Thx...ByE.
>
> P.S. kde bych mohl sehnat zaplaty na tyto udajne
> chybne knihovny?primitiv
[*] Karel D�d�k - 23.8.1999 07:46:02
Uplne primitivni dotaz:
Na formular (v D4) je vlozen Timer, Label a Graph z ActiveX.
V Label.Caption se data z random meni, ale v Graphu ne. Tento se prepise pouze pri zmene
velikosti Formulare (okno max/normal).
Poradite blbcovi?
Toto asi vsichni znaji, tak snad radeji primo mne, at se v diskuzi nemele brak.
diky
seat(zv)mail.cybernet(tec)cz
function a : single;
begin
a := random(100);
end;
procedure TForm1.Timer1Timer(Sender: TObject);
begin
Label1.Caption := FloatToStr(a);
Graph1.GraphData := a;
end;
MDI Child
[*] Martin Lasevic <vyvoj(zv)atlascon(tec)cz> - 23.8.1999 07:47:57
> > protoze to prirovnani opet vyvola udalost OnResize;
>
> Co teda s tim?
Zkus pred prirazenim priradit udalosti onResize NIL a a po poioazeni mu zase vrat tu metodu
napr :
......
Form1.OnResize := nil;
Form1.OnResize := Form1FormResize;
.......
Preji hezky den .....
============================================
ML Software - Martin Lasevic
Budovatelska 459,
708 00 Ostrava - Poruba
tel.: + 420 (69) 691 85 11, 0603 338 765
mailto:ml_software(zv)email(tec)cz
mailto:+420603338765(zv)sms.paegas(tec)cz
http://cement.fmi(tec)cz/ml_software
ICQ:33630882
============================================
GetCurrentDir
[*] Martin Lasevic <vyvoj(zv)atlascon(tec)cz> - 23.8.1999 07:51:24
ExtractFilePath( Application.ExeName) nebo ExtractFilePath( Params(0))
Preji hezky den .....
============================================
ML Software - Martin Lasevic
Budovatelska 459,
708 00 Ostrava - Poruba
tel.: + 420 (69) 691 85 11, 0603 338 765
mailto:ml_software(zv)email(tec)cz
mailto:+420603338765(zv)sms.paegas(tec)cz
http://cement.fmi(tec)cz/ml_software
ICQ:33630882
============================================
> -----Puvodni zprava-----
> Od: Petr Reichl [SMTP:meap(zv)seznam(tec)cz]
> Odeslano: 20. srpna 1999 21:46
> Komu: ListServ - Delphi
> Poedmit: GetCurrentDir
>
> Tato funkce vraci aktualni pracovni adresar, ale v pripade, ze pracuji jeste
> v podadresari tak pri pristim volani teto procedury vrati predeslou hodnotu.
> Ja, ale potrebuji funkci, ktera me vzdy vrati hodnotu adresare, kde je
> umisten zkompilovany exe program.
>
>
>
> Muzete mi prosim poradit?
>
> --
> Petr Reichl
> E-mail: reichl(zv)seznam(tec)cz
> <<Soubor: ATT00003.htm>> �ESK� FONTY
[*] Maixner Adam <Adam.Maixner(zv)pvt(tec)cz> - 23.8.1999 08:39:19
Ahoj,
nev�te kde sehnat n�jak� �ESK� fonty ? V Corelu jsou fonty sice p�kn�,
ale moc s nimi nenad�l�m.
D�kuji.
=======================================
Adam Maixner, mailto:adam.maixner(zv)pvt(tec)cz
Pernerova 444, 530 02 Pardubice
tel : 040/6048267
MDI a maximalizace
[*] Krayzel Libor <Libor.Krayzel(zv)czech-tv(tec)cz> - 23.8.1999 08:55:27
Zdravim,
pri maximalizovani MDI childu mi "zesedne" ikona pro uzavreni "X".
Nevi nekdo proc?==[ Libor Krayzel ]================================
http://webhost(tec)cz/elka * mailto:libor.krayzel(zv)czech-tv(tec)cz
http://easypad.fwd(tec)cz * mailto:elka(zv)seznam(tec)cz
office: +420-69-620 1375
GSM: +420-603-937 947
============================================== Chyba s BDE
[*] Martin Lasevic <vyvoj(zv)atlascon(tec)cz> - 23.8.1999 09:34:41
Cau Delfini,
pred casem jsem tu poslal chybu s BDE. Castecne jsme ji vyresili vlastnimi silami, ale nastal jeden problem.
Volame ze staticky linkovane DLL form, ktery je navazany i na databazi PARADOX. Pokud spoustime jen
nasi aplikaci, tak to vse chodi O.K.. Pokud ale bezi i s nasi aplikaci jeste neco jineho, co vyuziva BDE, tak po
zavolani tohoto formu se jeste stale nic nedeje, ale az po ukonceni nasi aplikace se vyskytne chyba v IDAPI32.DLL
a nasleduje restart Woken, protoze ten chybovy dialog se uz neda odstranit.
Uz jste se tim nekdo setkali? Podotykam, ze predavame v parametrech exportovanych funkci i stringy,
ale jako ShortString.
Diky za kazdou radu - uz jsem z toho zoufaly.
Martin Lasevic
primitiv
[*] Pavol Kaka�ka <paka(zv)aktis(tec)cz> - 23.8.1999 09:41:03
Ahoj!
musis si nastavit Graph1.AutoInc na gphOff (0), ak to mas na On a davas hodnotu do GraphData vzdy Ti to urobi novy stlpec, ak je to Off tak pri naplneni hodnoty sa meni GraphData sa Ti meni len jeden.
Viac v helpe.
Kaka�ka Pavol
paka(zv)aktis(tec)cz
( kapas(zv)post(tec)cz )
----- P�vodn� zpr�va -----
Od: Karel D�d�k
Komu: Delphi
Odesl�no: 23. srpna 1999 7:46
P�edm�t: primitiv
Uplne primitivni dotaz:
Na formular (v D4) je vlozen Timer, Label a Graph z ActiveX.
V Label.Caption se data z random meni, ale v Graphu ne. Tento se prepise pouze pri zmene
velikosti Formulare (okno max/normal).
Poradite blbcovi?
Toto asi vsichni znaji, tak snad radeji primo mne, at se v diskuzi nemele brak.
diky
seat(zv)mail.cybernet(tec)cz
function a : single;
begin
a := random(100);
end;
procedure TForm1.Timer1Timer(Sender: TObject);
begin
Label1.Caption := FloatToStr(a);
Graph1.GraphData := a;
end;
Seminar o Delphi 5
[*] Marian Jonas <jonas(zv)ji(tec)cz> - 23.8.1999 08:48:19
Kde zjistim vice informaci o chystanem seminari
o Delphi 5, ktery se bude konat 14.9.1999 ?
Koukal jsem se na borland(tec)cz a nikde nic.
Marian Jonas
jonas(zv)ji(tec)cz
Problem s tabulkama PDOX
[*] Jirka <jnagy(zv)nh-trans(tec)cz> - 23.8.1999 09:50:49
Minuly tyden se mi dvakrat stalo, ze nejakym zpusobem se mi prepsala
hlavica nektere tabulky (format PDOX 5) nesmyslnymi udaji a ke vsemu
se velikost souboru zmensila na 120 bytu (z asi 2.8, resp. 2.1 MB).
Nevite nekdo, v cem by to mohlo byt?
Aplikace funguji bez takovych priznaku uz 2, resp 4 roky, na siti se
mesic nedelalo nic, pocitace jsou stale stejne.
Jde to na Novell IntranetWare, Win95 a Win98 na klientech, aplikace 1x
v Delphi 1, 1x v Delphi 3, sitovy klient od Novell, vetsinou 3.0,
sem-tam 2.5. BDE je vsude naistaveny v poradku.
Prosim neradte, ze to mam predelat do SQL. Uz se to predelava do SAPu,
ale musim to jeste udrzovat.
Dekuji.
Jirka
�ESK� FONTY
[*] Ivan Kodaj <kodaj(zv)datalock.sk> - 23.8.1999 09:57:10
> Ahoj,
> nev�te kde sehnat n�jak� �ESK� fonty ? V Corelu jsou fonty sice p�kn�,
> ale moc s nimi nenad�l�m.
>
> D�kuji.
>
Kup si CD Pisma, Loga, Symboly II od DTP Studia. Stoji to par drobnych
i.k.Advantage Database Server
[*] Ivan Kodaj <kodaj(zv)datalock.sk> - 23.8.1999 09:59:38
Zdravim!!!
Neviete niekto, ci sa da k Delfom 4 napojit Advantage Database Server a
ci existuju nejake komponenty na pristup k zmienenemu serveru.
Vdaka za odpoved!
i.k.OffTopic: Licencni politika - mala poznamka (was:
[*] Tom� Vin� <T.Vins(zv)Aquasoft(tec)cz> - 23.8.1999 10:16:45
jen mala poznamka k citaci:
" Pripominam, ze se
pohybujeme u databazi velikosti radove desitky, mozna stovky
mega. Pro gigabajtove rozsahy bych stejne sahnul jinam nez k MS
SQL nebo IB."
pod mssql 7 (drive 6.5) provozujeme u zakaznika bez problemu databazi
o velikosti okolo 50ti GB (vetsi tabulky maji okolo 20ti milionu vet)
online pripojenych nekolik desitek delsich dotazu a nekolik stovek dotazu
na primarni klice, v prubehu toho bezi nacitani do tech samych tabulek.
donedavna byla konfigurace mssql 6.5, dell, 2xppro200, 20GB na diskovem poli
+ 40 GB a pridavnych discich, ted rozchazime mssql 7+sp1 na vetsim stroji,
az to bude fungovat poradne, mohu napsat o zkusenostech.
< Masa(zv)Aquasoft(tec)cz >
Tomas Vins, Aquasoft spol. s r.o.
ICQ 23139360
Nacteni dat ze zobrazene tabulky
[*] Petr =?iso-8859-2?Q?Ga=EFourek?= <geta(zv)telecom(tec)cz> - 23.8.1999 11:15:17
> nevite nekdo jak vytahnout udaje zobrazene v tabulce jineho programu?
> Ahoj,
>
> Tezko, u EDITu je to neco jineho, to je zakladni ovl.prvek Windows se
> kterym komunikujes vyhradne pomoci zprav. TDBGrid je Delphi komponenta
> ktera by musela mit zavedene vlastni zpravy ktere by toto umoznily.
> Kdyz se ale jedna o DBGrid, co treba rovnou pristupovat k te databazi ?
>
> Petr Vones, amatersky programator
Diky z odezvu, ale databaze je zakodovana.
Jeste me napadlo nejake key makro, kterym by se prochazela tabulka a bunka
po bunce vkladala do schranky, ale nevim jak to udelat.
Petr Gadourek
DBGRID Resize
[*] Martin Bab�k <M.Babik(zv)mus(tec)cz> - 23.8.1999 11:31:40
Zdrav�m!
M�j dotaz:
/Nev�te p�i jak�m eventu, nebo jak jinak zjist�m zm�nu rozm�ru sloupce a kter�ho, zkr�tka, �e si u�ivatel hr�l s my�� a tro�ku rozt�hl sloupce ani� bych musel st�le sledovat "with" jednotliv�ch sloupc�. D4/
bohu�el nebyl zodpov�zen, nev�te tedy alespo� ��m DBGrid nahradit, aby to bylo mo�n� zjistit, nebo jak na n�m (i na scroll barech) odchyt�vat klik�n� my��. D�ky za n�m�ty. M&B
TStrings
[*] Kvasar, spol. s r.o. <kvasar(zv)kvasar(tec)cz> - 23.8.1999 11:34:16
Potreboval bych radu ohledne %subj%. Zjistil jsem, ze Trida TStrings ma
omezenou kapacitu. Vsiml jsem si property capacity, ale prepsanim se nic
nezmeni. Zkousel jsem to i na TStringList a vysledek byl stejny. Navic, kdyz
pridavam pomoci metody Add(), tak mi ani nezarve na preteceni. Muze mi
prosim nekdo poradit, jak tam nactu vetsi obsah?
Dik
Honza Fiala
Ulozenie prace
[*] Pavel �im��ek - 23.8.1999 11:57:42
Existuje RX komponenta TFormStorage.
Pavel
-----P�vodn� zpr�va-----
Od: Michal.Hlavac(zv)st.fmph.uniba.sk <Michal.Hlavac(zv)st.fmph.uniba.sk>
Komu: delphi-l(zv)fwd(tec)cz <delphi-l(zv)fwd(tec)cz>
Datum: 23. srpna 1999 11:34
P�edm�t: Ulozenie prace
>Zdravim,
>chcem sa spytat, ze ci existuje nieco na ulozenie dat z Formu do
>binarneho suboru. Ten form obsahuje napr. list box, editbox, richedit,
>atd.... Ide len o data. Alebo to musim cele po jednom ukladat az do
>zblbnutia?
>
> Dik moc
>
> Michal Hlavac
>Spolocnost priatelov deti z detskych domovov
> Usmev ako dar
>
>e-mail: 7hlavac(zv)nw.fmph.uniba.sk
>TStrings
[*] Pavol Kaka�ka <paka(zv)aktis(tec)cz> - 23.8.1999 12:00:35
Cau!
Nie som si isty ci TStrings ma omezenenu kapacitu poctom poloziek. Neviem to
iste ale myslim ze nie. Podla propety Capacity si alokuje pamat, preto ju
mozes zadat, ale v pripade ze sa pocetm poloziek zvysi nad alokovanu pamat
potom za zvysi Capacity a TStrings si dalsiu pamat, ak je to mozne
prialokuje. - preto to nehlasi pretecenie
Co sa tyka poctu poloziek tak je TStrings optimalny do 10.000 potom zacina
byt pomaly!
Co je vacsie mnozstvo ? :-)
btw: TStrings je abstrakna classa
Kaka�ka Pavol
paka(zv)aktis(tec)cz
( kapas(zv)post(tec)cz )
> Potreboval bych radu ohledne %subj%. Zjistil jsem, ze Trida TStrings ma
> omezenou kapacitu. Vsiml jsem si property capacity, ale prepsanim se nic
> nezmeni. Zkousel jsem to i na TStringList a vysledek byl stejny. Navic,
kdyz
> pridavam pomoci metody Add(), tak mi ani nezarve na preteceni. Muze mi
> prosim nekdo poradit, jak tam nactu vetsi obsah?
>
> Dik
> Honza Fiala
>TStrings
[*] Pavel Cisar <pcisar(zv)aktis(tec)cz> - 23.8.1999 12:11:56
Haj hou!
> Potreboval bych radu ohledne %subj%. Zjistil jsem, ze Trida TStrings ma
> omezenou kapacitu. Vsiml jsem si property capacity, ale prepsanim se nic
> nezmeni. Zkousel jsem to i na TStringList a vysledek byl stejny. Navic,
kdyz
> pridavam pomoci metody Add(), tak mi ani nezarve na preteceni. Muze mi
> prosim nekdo poradit, jak tam nactu vetsi obsah?
Jak moc stringu potrebujes do *subj* ulozit ? Kapacita TStrings je cca
2147483647 ruznych retezcu ! Ale driv ti spise dojde pamet :-) Zkus popsat
ceho ches dosahnout a zkusime najit adekvatni reseni.
Hodne zdaru.Ulozenie prace
[*] Michal.Hlavac(zv)st.fmph.uniba.sk - 23.8.1999 10:20:28 met
Zdravim,
chcem sa spytat, ze ci existuje nieco na ulozenie dat z Formu do
binarneho suboru. Ten form obsahuje napr. list box, editbox, richedit,
atd.... Ide len o data. Alebo to musim cele po jednom ukladat az do
zblbnutia?
Dik moc
Michal Hlavac
Spolocnost priatelov deti z detskych domovov
Usmev ako dar
e-mail: 7hlavac(zv)nw.fmph.uniba.sk Prima konektivita do SQL Anywhere
[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 23.8.1999 12:22:35
Petr Vones wrote:
> > Kdyz uz byla rec o prime konektivite do databazi,
> > zajimalo by me jak a kde lze ziskat primy konekt
> > do SQL Adaptive Serveu Aniwhere 6.0, abych obesel
> > ODBC.
>
> O SQL Anywhere nevim temer nic, ale da se predpokladat ze budou muset
> poskytovat OLE DB Provider, pak uz je pripojeni pomerne snadne pomoci
> libovolnych ADO ci OLE DB komponent.
Cimz obejdes BDE, ale ne ODBC.
S pozdravem
Zbysek Hlinka
E-mail: zhlinka(zv)login(tec)cz, localizator(zv)localizator.com
Tel.: 02/795 29 56; GSM: 0603 551 282
Krystofova 1016, 149 00 Praha 4
CZ
ADO + D5
[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 23.8.1999 12:22:35
Petr Vones wrote:
> > > dalsie) ADO komponenty sa znacne podielali aj na tom, ze Borland
> > > vobec urobil ADOExpress (je to konkurencny produkt pre jeho MIDAS)
> > > a
> >
> > uzivatelske rozhrani. Jakym zpusobem by tohle mely delat
> > komponenty z ADOExpress?
>
> ADO RDS ??
Marne ziram do sve Bety, kde tam je RDS. Nebo tohle si uz musi
kazdy dodelat sam?
> > Mno, celkem zajimave (na prvni pohled) vypada vylepseny datovy
> > modul, jsou tam jeste prime komponenty pro IB, zajimave jsou
> > take "zalozky" ToDo (poznamky ve zdrojaku, na co je treba se v
> > budoucnu jeste podivat) a lokalizacni nastroje. Ostatni mi uz
> > pripada spise jako drobne vylepseni.
>
> Pro "nedatabazove" programovani a vyvojare komponent je tam toho
> myslim malinko vic ...
Mohl jsi doplnit. Ja si nedelam narok na uplny vycet.
S pozdravem
Zbysek Hlinka
E-mail: zhlinka(zv)login(tec)cz, localizator(zv)localizator.com
Tel.: 02/795 29 56; GSM: 0603 551 282
Krystofova 1016, 149 00 Praha 4
CZ
Thready a parametry - prepis z C do PAS
[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 23.8.1999 12:22:35
Petr Vones wrote:
> > PAS:
> > type DV_TPT = ^Tdv_tpt;
> > Tdv_tpt = record
> ^^^^^^ packed record
Packed je sice vhodny, ale vzhledem k pouzitym typum bude
vysledek stejny.
S pozdravem
Zbysek Hlinka
E-mail: zhlinka(zv)login(tec)cz, localizator(zv)localizator.com
Tel.: 02/795 29 56; GSM: 0603 551 282
Krystofova 1016, 149 00 Praha 4
CZ
MS SQL 7 & Create Table
[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 23.8.1999 12:22:35
Tom� Br�dle wrote:
> jeste me napadla takova zvrhlost :
>
> zkusit v SQL procedure vytvorit objekt (napr. ADO nebo OLE DB), ktery
> vytvori tabulku "mimo SQL", jakoby zvenci, jestli mi rozumis -
> vytvoreni ve vyssim jazyce, ktere zpetne vola SQL prikaz... Nevim sice
> presne jak se to dela, ale melo by to nejak jit.
>
> Je to hodne krkolomny, ale treba to pujde. A kdyz toto nepujde, zkusit
> jeste to same, ale z volani externi procedury (extended stored
> procedures) - tam ten CREATE TABLE treba nepozna - previt.
Coz o to, za vyzkouseni by to mozna stalo, ale program je
"masovka" a je otazka, jak by se nekterym spravcum databaze
libilo, kdybych jim primo k serveru uhnizdil neco takoveho. Jde mi i
o to, aby transakce vzdy probehla cela nebo vubec. Kdyz to z
nejakych duvodu spadne mezi mezi ulozenim zaznamu a
vytvorenim tabulky, je to problem. To abych neustale kontroloval,
zda tabulka existuje... :-(
S pozdravem
Zbysek Hlinka
E-mail: zhlinka(zv)login(tec)cz, localizator(zv)localizator.com
Tel.: 02/795 29 56; GSM: 0603 551 282
Krystofova 1016, 149 00 Praha 4
CZ
Integer to Binary
[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 23.8.1999 12:22:35
Tomas Plevak wrote:
> mame nejakou jednoduchou moznost v Delphi prevadet
> Integer do binarniho tvaru a taky obracene?
Co mas na mysli? Integer je v binarnim tvaru. Jen je treba se na nej
"spravne" podivat.
S pozdravem
Zbysek Hlinka
E-mail: zhlinka(zv)login(tec)cz, localizator(zv)localizator.com
Tel.: 02/795 29 56; GSM: 0603 551 282
Krystofova 1016, 149 00 Praha 4
CZ
Vektorov� grafika - text
[*] Robert Holovsky <robert.holovsky(zv)seznam(tec)cz> - 23.8.1999 12:59:29
Ahoj delphini,
�e�im n�jakou vektorovou aplikaci v Delphi, a cht�l jsem se zeptat, jestli
m�te n�kdo zku�enosti s kreslen�m text�.
A to poku� mo�no pomoc� WinAPI :
1) kreslen� obrysov�m p�smem a� u� s v�pln� nebo bez(pr�hl�dn� s kontury)
2) kreslen� textu podle n�jak� k�ivky
3) jak nejl�pe uskete�nit v�b�r nakreslen� textu - m��e b�t i
rotovan�(0-360)
Poku� jste to n�kdo �e�il nebo m�te k tomu n�jak� inforamace, byl bych r�d
kdyby jste se se mnou o n� pod�lili.
P�edem d�kuji
Robert
robert.holovsky(zv)seznam(tec)cz - soukrom�
robert.holovsky(zv)gefos(tec)cz - do pr�ce
Ulozenie prace
[*] Jan Poslusny <pazout(zv)hotmail(tec)com> - 23.8.1999 11:26:44 cest
//unit1
procedure TForm1.Button1Click(Sender: TObject);
begin
WriteComponentResFile('Filename',self);
end;
V tom Filename by pak melo byt obsazeno totez, co se uklada v unit1.dfm -
zalezi na objektech, co si tam ulozi.
Pazout
>From: Michal.Hlavac(zv)st.fmph.uniba.sk
>Reply-To: delphi-l(zv)fwd(tec)cz
>To: delphi-l(zv)fwd(tec)cz
>Subject: Ulozenie prace
>Date: Mon, 23 Aug 1999 10:20:28 MET
>
>Zdravim,
>chcem sa spytat, ze ci existuje nieco na ulozenie dat z Formu do
>binarneho suboru. Ten form obsahuje napr. list box, editbox, richedit,
>atd.... Ide len o data. Alebo to musim cele po jednom ukladat az do
>zblbnutia?
>
> Dik moc
>
> Michal Hlavac
>Spolocnost priatelov deti z detskych domovov
> Usmev ako dar
>
>e-mail: 7hlavac(zv)nw.fmph.uniba.sk
______________________________________________________
Get Your Private, Free Email at http://www.hotmail.com
Historie...
[*] tmara(zv)itsys(tec)cz - 23.8.1999 13:37:57
Hezky den,
existuje nejaka komponenta, nebo jak mohu zjistit, kter� soubor byl prave
ted spusten, zavren...etc.
Chtel bych si udelat jakousi podrobnou historii a tam tak� potrebuji vedet,
kdy byl jaky soubor spusten, jak dlouho bezel, kdy byl zavren,
prejmenovan...etc. Byla by to samozrejme rezidentni apl.
A tak� by me zajimalo, zda by takovato aplikace neubirala zbytecne mnoho
sys. prostredku... Nez st�le zkouset, jestli bylo n�co noveho
spusteno...jestli by nebylo lepsi, aby ka�d� spusteny program vratil nejakou
hodnotu...ja zkratka nevim, jak bych n�co podobneho mohl udelat...
Nevim, zda jsem to vysvetlil dost srozumitelne, ci jestli nemam "zvracene"
predstavy, ale toto by mne opravdu dosti zajimalo...
Predem thx.
TMa
Potreboval bych to bud do D3 C/S, nebo D4 Prof.
TStrings
[*] Tom� Vin� <T.Vins(zv)Aquasoft(tec)cz> - 23.8.1999 13:42:29
capacity se snad pouziva pro aktualni velikost alokovane pameti pro seznam
ukazatelu. pokud se dojde na "capacity", pamet se prealokuje na vetsi
velikost
< Masa(zv)Aquasoft(tec)cz>
Tomas Vins, Aquasoft spol. s r.o.
ICQ 23139360
Haj hou!
> Potreboval bych radu ohledne %subj%. Zjistil jsem, ze Trida TStrings ma
> omezenou kapacitu. Vsiml jsem si property capacity, ale prepsanim se nic
> nezmeni. Zkousel jsem to i na TStringList a vysledek byl stejny. Navic,
kdyz
> pridavam pomoci metody Add(), tak mi ani nezarve na preteceni. Muze mi
> prosim nekdo poradit, jak tam nactu vetsi obsah?
Jak moc stringu potrebujes do *subj* ulozit ? Kapacita TStrings je cca
2147483647 ruznych retezcu ! Ale driv ti spise dojde pamet :-) Zkus popsat
ceho ches dosahnout a zkusime najit adekvatni reseni.
Hodne zdaru.OffTopic: Licencni politika - mala poznamka (was:
[*] Zden�k B�hm - 23.8.1999 14:03:29
Jednu vlastni cerstvou zkusenost pridam,
MS SQL 7.0 ma byt (diky neustale snaze Microsoftu zariznout konkurenci a
vsechno sezrat sam) do objemu dat 2GB zdarma.
Tak nam na strane IB pomalu zustava uz jen ta nechut cpat Billovi do huby
konska vejce.
Zajimalo by me, co na to Inprise, ale predpokladam, ze vysledek bude jen
dalsi snaha vytriskat z kazdyho smudly posledni halir.
Zdar Zdenek
----- Original Message -----
From: Zbysek Hlinka <zhlinka(zv)login(tec)cz>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Monday, August 23, 1999 7:37 AM
Subject: Re: OffTopic: Licencni politika - mala poznamka (was: Delphi 5 -
namet na horror)
Ing. Jaroslav ke �k wrote:
> Takhle me vsak natolik nastvali, ze
> > >jsem IB opustil z duvodu nevypocitatelnosti budouciho vyvoje, a
> > >musel jsem predelat program na Paradox a MS SQL (protoze tohle meli
> ---------------------------------
> To je pravda. Ucit se novy server je zalozitost, ktera se pocita na
> mnoho mesicu i na roky. Je to casto vetsi investice nez je cena
> vlastniho serveru. Ovsem kdyz uz nekdo tuto cestu podstoupi, tak se uz
> asi tezko vrati. Myslim si tez, ze to byl omyl. Jenomze POZOR - to
> bylo jeste za ery Borlandu, kdy se tam stridali reditele a pod. Bylo
Coz me ovsem jakozto zakaznika naprosto nezajima...
> to asi jejich nejtezsi obdobi. Nakonec je lepsi pozde nez nikdy. Ja si
> vsak nemylim, ze neni jeste pozde. Stale vznikaji nove vyvojove tymy a
> stale je a bude dost vyvojaru, kteri se znovu rozhoduji. Ja jsem prave
Ano. A mnoho tymu se rozhodlo napriklad pro Visual Basic, Visual
C a podobne. Byl jsem toho v rade pripadu temer primym svedkem.
Jaka je nadeje, ze se zase preorientuji? :-)) BTW - naucit se
ovladat poradne nejaky nastroj je take otazka dlouhych mesicu az
let, takze co se rychle ztrati, tezko a dlopuho se ziskava zpet.
K tomu "pozde": ekonomika veci je pro urcity (a troufam si rici ze
vetsinovy) okruh aplikaci jasna. Pet pripojeni na siti s SQL databazi
zdarma mi pokryje vetsinu zakazniku. Kdo ma vetsi sit, ma obvykle
i na zakoupeni plne licence databaze, a v podstate ji uz vlastne i
potrebuje. Srovnam-li to napriklad s jednou licenci pro IB (Delphi 1),
stale mi vychazi vyrazne lepe MSDE. Pripominam, ze se
pohybujeme u databazi velikosti radove desitky, mozna stovky
mega. Pro gigabajtove rozsahy bych stejne sahnul jinam nez k MS
SQL nebo IB.
> cekal na D5, abych zjistil jak je to s primou konektivitou na IB.
:-) Ja jsem nemohl cekat. Musel jsem se rozhodnout v danou chvili.
Takze lze spolehat pouze na zacinajici vyvojare, kteri se teprve
mohou rozhodovat, nebo za ktere jeste celkem bez nasledku muze
rozhodnout nekdo jiny. Ale to je beh na dlouhe trate a vysledek by
mohl byt videt tak nejdrive za dva, tri roky, jenze to bude Microsoft
zase o kus dal a IB to podle meho nazoru prohraje. Tyhle dva roky
prave Borland prohral svou hloupou strategii - ted mohl byt na koni
on, mohl mit hromadu penez na vyvoj IB. Vzdal to, a ted uz IMHO
nema sanci to dohnat.
> Rovnez jsem zvazoval prechod k MS SQL. Ale ted po vyjiti D5 a IB6 se
> vahy asi prikloni trochu zpatky k IB. Kdyby k tomu jeste Inprise
> uvolnil single verzi IB6, tak to by asi na svou stranu zisal zase vice
> vyvojaru. Penize, ktere se takto ztrati se mnohem vice vrati na mnoha
> multilicencich a upgradech.
Vtip je prave v tom, ze takto zadne penize nelze ztratit. Protoze
urcita cast zakazniku databazi stejne nekoupi, mozna pozdeji.
Jestlize se u nich tedy dnes zahackuji s nejakym sikovnym
resenim s nejakou databazi, az budou kupovat, tak nejspis tu, na
ktere jim uz dlouho cosi spolehlive bezi. Ted to vidim tak, ze
zakaznici budou zahlceni MSDE ze vsech moznych stran. Takze
budou provozovat 3 aplikace nad MSDE, a mozna nekteri z nich
jednu nad IB, Sybase (drive verze Anywhere) a podobne. Opacnych
pripadu bude jako safranu, a procentuelne jich nebude pribyvat.
Prachy tedy nakonec zase shrabne Bill. A ja se ted musim
rozhodnout, co mi bude fungovat za dalsi 3 roky.
> Kdyz projekt jednou existuje, tak vzhledem
> k vyssi kvalite C/S projektu se k nemu brzy prikloni i vetsi firmy,
> kteri potrebuji sitovy provoz. Vyvojari by tak mohli zcela opustit
> Paradox tabulky, ktere jsou stejne take zadarmo a neprinasi zadny
> uzitek a pritom by se postupne vytvarela mohutna zakladna projektu
> vytorenych na single IB. Tim by velmi vzrustal projektovy i znalostni
> potencial pro vyuziti IB v siti a na Internetu. Pokud se tak nestane
> tak tuto platformu oladne MS SQL a Acces. Jako-by tuto snahu Inprise
> chtel Microsoftu usnadnit - uvidime.
Souborove databaze by uz konecne mely odejit do muzea, na siti
jsou s nimi jen problemy. Bill udelal jedinecny krok, aby se tak
stalo. Aby se tomuhle monstru dalo konkurovat, musela by byt v
Delphi nejaka "lepsi" licence na IB. Protoze lze predpokladat, ze
by se to tykalo pouze verze Enterprise (ostatne licence na MSDE
take neni vsude), stale by se nevyplatilo kupovat kvuli tomu tu
nejdrazsi verzi Delphi. K tomu by jeste musela prijit volna licence
na MIDAS. Za stavajiciho stavu se mi vyplati daleko spise koupit
Professional, k tomu licenci na MSDE (treba v Office, s cimz
ziskam jeste radu dalsich zajimavych veci) a ADO komponenty
(kdybych nechtel delat sve OLE DB). A pak jsem v situaci, kdy se
mohu rozhodovat, zda se mi vyplati delat vicevrstvou aplikaci, a
pokud ano, mohu to udelat i bez MIDAS, primo nad OLE DB. Ma
to pouze jedno omezeni, a to ze musim zustat se vsim vsudy ve
svete Windows. Coz ale na druhe strane nevadi, protoze Wokna
jsou stejne temer vsude. Jako bych uz slysel namitky, ze bysme
chteli pokud mozno vsechno zadarmo (a ze jsem je uz slysel). :-)
Jenze lide nejsou blbi a umeji si spocitat pomer cena/uzitna
hodnota. Delphi Enterprise zde zadnou vyhodu v dnesni dobe
neprinasi.
> Inprise dela asi tu chybu, ze uvolnuje stare verze. Jenze technologie
> jde dopredu rychle a stare verze jsou nepotrebne. Kdyby naopak uvolnil
> nejnovejsi single verzi, tak by podporil vyvojare a ti by asi rychleji
> primeli sve zakazniky k upgrade sitovych verzi.
Tak, podpora vyvojaru. Bill sice nahlas obcas repta, ale v principu
je asi rad, ze se Windows kradly a kradou. Protoze nekdo dnes
ukradne, zvykne si, a pozdeji koupi. Jde jen o to primet ho
nejakym zpusobem, aby to "pozdeji" jednou prislo. Microsoft
rozdava beta verze dulezitych produktu na potkani. To je IMHO
skvely tah. Americky Inprise namisto toho radeji vymysli
nesmyslne ochrany a sestavuje ceniky na vsechno mozne a
zapomina na jednu dulezitou vec - ze mene znamena casto vice, a
kdo chce hodne, obvykle dostane malo.
Delphi ma sanci jenom jako masovka, a ne jako nastroj pro elitni
klub vyvojaru - to by brzo zasel na nedostatek zajmu. Proto bych
na jejich miste sice oficialne brblal proti kradeni Delphi, ale v
tichosti bych byl spokojen, kdyby lide Delphi kradli (takto vlastne
uspel Turbo Pascal). Kdo si bude vyvijet pro sebe, toho bych
nechal v klidu spat, honil bych pouze ty, kteri by prodavali
programy napsane v Delphi nebo sirili vykradene zdrojaky. Protoze
z programatoru-amateru se jednou mohou stat profici. A lze
predpokladat, ze budou pokracovat na tom, na cem se vyucili a ze
stejne nakonec koupi.
> Je to tedy velmi vyhodna investice do budoucna. V dobach, kdy byl
> Borland v cervenych cislech a slo i o preziti je pochopitelne, ze se
> spise hledelo na prijmy pristiho ctvrtleti. Ted je tomu doufam jiz
> jinak a Inprise snad hledi za rok 2000. Mohlo by se to projevit i v
> jeho licencni politice. Mirne snizeni ceny D5 pri relativne vetsim
> narustu novych objektu a vlastnosti (porovnej D3-D4-D5) naznacuje, ze
> by tomu tak mohlo byt. Nechme se prekvapit.
Dulezite jsou dolarove ceny, a ty IMHO zustaly stejne (jestli se
mylim, opravte me nekdo). U ceskych cen pouze klesla obrovska
disproporce mezi oficialnim a Inprise kursem k dolaru.
S pozdravem
Zbysek Hlinka
E-mail: zhlinka(zv)login(tec)cz, localizator(zv)localizator.com
Tel.: 02/795 29 56; GSM: 0603 551 282
Krystofova 1016, 149 00 Praha 4
CZ
TStrings
[*] Honza Fiala <kvasar(zv)kvasar(tec)cz> - 23.8.1999 14:07:19
pocet polozek bude cca. 10000
tady je vypis casti kodu, ktery nefunguje tak, jak ma
procedure TForm1.Button1Click(Sender: TObject);
var
i : Integer;
s : TStringList;
begin
s := TStringList.Create;
s.Capacity := 1000000;
memo1.Lines := s;
For i := 0 to 10000 do
memo1.Lines.Add(IntToStr(i)+'sdfsdfdafddddddddddddddddddddddddddddd');
end;
S pozdravem
Honza Fiala
fala(zv)email(tec)cz
http://members.xoom.com/falasoft
TStrings
[*] Pavol Kaka�ka <paka(zv)aktis(tec)cz> - 23.8.1999 14:16:19
A co Ti to vlastne robi/nerobi ? ak sa Ti nezobrazia vsetky polozky z
TStringu do Mema, je to v pohode, lebo Memo zobrazuje obmedzeny pocet,
myslim ASI max 65536 byte. (nie poloziek ale byte !! )
Kaka�ka Pavol
paka(zv)aktis(tec)cz
( kapas(zv)post(tec)cz )
> pocet polozek bude cca. 10000
> tady je vypis casti kodu, ktery nefunguje tak, jak ma
>
> procedure TForm1.Button1Click(Sender: TObject);
>
> var
>
> i : Integer;
>
> s : TStringList;
>
> begin
>
> s := TStringList.Create;
>
> s.Capacity := 1000000;
>
> memo1.Lines := s;
>
> For i := 0 to 10000 do
>
> memo1.Lines.Add(IntToStr(i)+'sdfsdfdafddddddddddddddddddddddddddddd');
>
> end;
>
TStrings
[*] Michal Leinweber <M.Leinweber(zv)sh.cvut(tec)cz> - 23.8.1999 14:30:11
> pocet polozek bude cca. 10000
> tady je vypis casti kodu, ktery nefunguje tak, jak ma
> procedure TForm1.Button1Click(Sender: TObject);
> var
> i : Integer;
> s : TStringList;
> begin
> s := TStringList.Create;
> s.Capacity := 1000000;
> memo1.Lines := s;
> For i := 0 to 10000 do
> memo1.Lines.Add(IntToStr(i)+'sdfsdfdafddddddddddddddddddddddddddddd');
> end;
1) Do toho Memo1.Lines nemusis ten stringlist vytvaret a prirazovat, protoze
ten uz tam je
(tim prirazenim si vlastne jen zkopiroval obsah toho S do Memo1.Lines)
2) Nefunguje to proto ze Memo1.Lines je sice typu Strings ale je to jen
zabaleni WinAPI funkci a Memo ma ve Win95 omezeni na 32kb znaku. Proto ti to
asi nefunguje.
Pokud bys to cpal jen do toho S tak by to asi proslo.
McLEI
MDI a focus
[*] Krayzel Libor <Libor.Krayzel(zv)czech-tv(tec)cz> - 23.8.1999 14:31:46
Zdravim,
mam MDI parent a v nem se oteviraji childy. Mimo to v tom parentu mam TPanel
a v nem TDirectoryListBox. Problem nastane, jakmile kliknu do toho
TDirectoryListBoxu. TRichedit v tom childu jakoby ztratil focus. Normalne v
nem muzu oznacovat blok, ale kurzor tam neni a ani nejde psat. Pomuze az
otevreni noveho childu.
Netusi nekdo co s tim?==[ Libor Krayzel ]================================
http://webhost(tec)cz/elka * mailto:libor.krayzel(zv)czech-tv(tec)cz
http://easypad.fwd(tec)cz * mailto:elka(zv)seznam(tec)cz
office: +420-69-620 1375
GSM: +420-603-937 947
============================================== Hvezdicky a otazniky
[*] Viktor.Lostak(zv)chmi(tec)cz (Viktor Lostak) - 23.8.1999 14:33:27
Nevite nekdo o nejakem zdrojaku, ktery by resil "hvezdickovou konvenci" pri
porovnavani retzcu, tj. takove to "*.exe" ? Nejlepe v C++, ale muze to byt v
Delphi nebo v necem jinem. Nechce se mi to delat, kdyby se to dalo nekde
stahnout. Dik. Viktor
Listbox & Ok
[*] mkotaska(zv)post(tec)cz - 23.8.1999 14:59:34
Hi.
Prosim o pomoc s nasledujicim problemem.
Mam formular, ve kterem je tlacitko otevirajici dalsi formular
(Form1.ShowModal).
V tomto formulari mam dve tlacitka OK a Zrusit a ListBox.
Potrebuji, aby po dblclicku v listboxu se provedla akce shodna s reakci na
tlacitko OK.
U tlacitka mam nastavenou vlastnost ModalResult na mrOk, ktera je vracena po
ukonceni formulare.
Tu samou hodnotu tedy potrebuji po dblclicku v listboxu.
Dekuji.
mkotaska(zv)post(tec)cz
Listbox & Ok
[*] Pavol Kaka�ka <paka(zv)aktis(tec)cz> - 23.8.1999 15:06:14
skus do doubleclick Eventu na ListBoxe dat: Form1.ModalResult := mrOK
Kaka�ka Pavol
paka(zv)aktis(tec)cz
( kapas(zv)post(tec)cz )
> Hi.
> Prosim o pomoc s nasledujicim problemem.
>
> Mam formular, ve kterem je tlacitko otevirajici dalsi formular
> (Form1.ShowModal).
> V tomto formulari mam dve tlacitka OK a Zrusit a ListBox.
> Potrebuji, aby po dblclicku v listboxu se provedla akce shodna s reakci na
> tlacitko OK.
> U tlacitka mam nastavenou vlastnost ModalResult na mrOk, ktera je vracena
po
> ukonceni formulare.
> Tu samou hodnotu tedy potrebuji po dblclicku v listboxu.
>
> Dekuji.
>
> mkotaska(zv)post(tec)cz
>
>
>
>
>SetFocus - dynamicky
[*] Zden�k B�hm - 23.8.1999 15:09:07
Ahoj vsem,
potreboval bych pouzit metodu SetFocus nejak, rekl bych dynamicky.
Vysvetlim situaci.
Mam nekolik Buttonu. Pri OnClick na libovolnem z nich vyberu SetFocusem ListBox, kde se hrabu atd. a pri stisku ESC se potrebuju prepnout zpet na ten Button, ktery predtim prepnul na ListBox.
Kdyby slo treba v osetreni OnClick Buttonu nacpat do Tagu ListBoxu pointer na Sendera (tudiz na Button). A potom v osetreni OnKeyDown u ListBoxu, toto vyzrat a zavolat SetFocus.
Diky Zdenek (D3 Prof. W95)Hvezdicky a otazniky
[*] Pavel Cisar <pcisar(zv)aktis(tec)cz> - 23.8.1999 15:55:35
Haj hou!
> Nevite nekdo o nejakem zdrojaku, ktery by resil "hvezdickovou konvenci"
pri
> porovnavani retzcu, tj. takove to "*.exe" ? Nejlepe v C++, ale muze to byt
v
> Delphi nebo v necem jinem. Nechce se mi to delat, kdyby se to dalo nekde
> stahnout. Dik. Viktor
Na to mame funkci Matche v unite NxString v projektu Nexus.
http://delphree.clexpert.com/pages/projects/nexus/default.htm
Hodne zdaru
Listbox & Ok
[*] Pavel Cisar <pcisar(zv)aktis(tec)cz> - 23.8.1999 15:57:29
Haj hou!
> Mam formular, ve kterem je tlacitko otevirajici dalsi formular
> (Form1.ShowModal).
> V tomto formulari mam dve tlacitka OK a Zrusit a ListBox.
> Potrebuji, aby po dblclicku v listboxu se provedla akce shodna s reakci na
> tlacitko OK.
> U tlacitka mam nastavenou vlastnost ModalResult na mrOk, ktera je vracena
po
> ukonceni formulare.
> Tu samou hodnotu tedy potrebuji po dblclicku v listboxu.
Muzes nastavit v eventu OnDblClick hodnotu property formu ModalResult :=
mrOk ale lepe je vyvolat metodu Click na butonu pro OK (co kdyz do handleru
kliknuti za cas neco dopises ?).
Hodne zdaru
SetFocus - dynamicky
[*] Pavel Cisar <pcisar(zv)aktis(tec)cz> - 23.8.1999 15:59:39
Haj hou!
Proc se ptas, kdyz si sam odpovidas :-)))))))
Ahoj vsem,
potreboval bych pouzit metodu SetFocus nejak, rekl bych dynamicky.
Vysvetlim situaci.
Mam nekolik Buttonu. Pri OnClick na libovolnem z nich vyberu SetFocusem ListBox, kde se hrabu atd. a pri stisku ESC se potrebuju prepnout zpet na ten Button, ktery predtim prepnul na ListBox.
Kdyby slo treba v osetreni OnClick Buttonu nacpat do Tagu ListBoxu pointer na Sendera (tudiz na Button). A potom v osetreni OnKeyDown u ListBoxu, toto vyzrat a zavolat SetFocus.Vektorov� grafika - text
[*] Petr Brant <p.brant(zv)samo(tec)cz> - 23.8.1999 15:02:36
Ahoj,
resil jsem take neco vektoroveho, ale byl v tom jen text urcite barvy a
velikosti, nerotovany. Takze uplne nejzakladnejsi kresleni textu. Pokud
by ti byly me informace k necemu, ozvi se.
**************************************************
Petr Brant [p.brant(zv)samo(tec)cz], programator v MSVC++,
obcas Delphi nebo Visual Basic
**************************************************
> -----P�vodn� zpr�va-----
> Od: Robert Holovsky [SMTP:robert.holovsky(zv)seznam(tec)cz]
> Odesl�no: 23. srpna 1999 12:59
> Komu: delphi-l(zv)fwd(tec)cz
> P�edm�t: Vektorov� grafika - text
>
> Ahoj delphini,
>
> �e�im n�jakou vektorovou aplikaci v Delphi, a cht�l jsem se zeptat,
> jestli
> m�te n�kdo zku�enosti s kreslen�m text�.
> A to poku� mo�no pomoc� WinAPI :
> 1) kreslen� obrysov�m p�smem a� u� s v�pln� nebo bez(pr�hl�dn� s
> kontury)
> 2) kreslen� textu podle n�jak� k�ivky
> 3) jak nejl�pe uskete�nit v�b�r nakreslen� textu - m��e b�t i
> rotovan�(0-360)
>
> Poku� jste to n�kdo �e�il nebo m�te k tomu n�jak� inforamace, byl bych
> r�d
> kdyby jste se se mnou o n� pod�lili.
>
> P�edem d�kuji
> Robert
> robert.holovsky(zv)seznam(tec)cz - soukrom�
> robert.holovsky(zv)gefos(tec)cz - do pr�ce
>
>
> Hvezdicky a otazniky
[*] Miloslav Sk�cel <kastner(zv)infos(tec)cz> - 23.8.1999 16:24:59
>Nevite nekdo o nejakem zdrojaku, ktery by resil "hvezdickovou konvenci" pri
>porovnavani retzcu, tj. takove to "*.exe" ? Nejlepe v C++, ale muze to byt
v
>Delphi nebo v necem jinem. Nechce se mi to delat, kdyby se to dalo nekde
>stahnout. Dik. Viktor
Zkus Masks.pas primo z Delphi
function MatchesMask(const Filename, Mask: string): Boolean;
S pozdravem
Miloslav Skacel
info(zv)stereo(tec)cz
www.stereo(tec)cz
TStrings
[*] Honza Fiala <kvasar(zv)kvasar(tec)cz> - 23.8.1999 16:33:52
tak uz jsem na to prisel. Vsechny problemy jsou spojene se tridou TMemo.
Takze TStrings funguje, ale TMemo zobrazi jenom urcity pocet znaku. Kolik
jsem nepocital, ale zase nastava problem jestli se to da nastavit, nebo
pouzivat TRichEdit?
S pozdravem
Honza Fiala
fala(zv)email(tec)cz
http://members.xoom.com/falasoft
SetFocus - dynamicky
[*] Martin Ocenas <ocenas(zv)proces.sk> - 23.8.1999 16:34:07
Na TForm si deklaruj private premennu C:TWinControl a pri OnClick do nej
prirad Sender.
Pri OnExit z ListBox zavolas C.SetFocus a je to.
Hi.
M.
-----Original Message-----
From: Zden�k B�hm [mailto:bohm(zv)gacc(tec)cz]
Sent: Monday, August 23, 1999 3:16 PM
To: delphi-l(zv)fwd(tec)cz
Subject: SetFocus - dynamicky
Ahoj vsem,
potreboval bych pouzit metodu SetFocus nejak, rekl bych dynamicky.
Vysvetlim situaci.
Mam nekolik Buttonu. Pri OnClick na libovolnem z nich vyberu SetFocusem
ListBox, kde se hrabu atd. a pri stisku ESC se potrebuju prepnout zpet na
ten Button, ktery predtim prepnul na ListBox.
Kdyby slo treba v osetreni OnClick Buttonu nacpat do Tagu ListBoxu pointer
na Sendera (tudiz na Button). A potom v osetreni OnKeyDown u ListBoxu, toto
vyzrat a zavolat SetFocus.
Diky Zdenek (D3 Prof. W95)
- att-1.htm
primitiv
[*] Karel D�d�k - 23.8.1999 16:39:30
Diky, ale to vim a stejne se stale prekresluje jen pri zmene velikosti.
----- Original Message -----
From: Pavol Kaka�ka
To: delphi-l(zv)fwd(tec)cz
Sent: Monday, August 23, 1999 9:41 AM
Subject: Re: primitiv
Ahoj!
musis si nastavit Graph1.AutoInc na gphOff (0), ak to mas na On a davas hodnotu do GraphData vzdy Ti to urobi novy stlpec, ak je to Off tak pri naplneni hodnoty sa meni GraphData sa Ti meni len jeden.
Viac v helpe.
Kaka�ka Pavol
paka(zv)aktis(tec)cz
( kapas(zv)post(tec)cz )
----- P�vodn� zpr�va -----
Od: Karel D�d�k
Komu: Delphi
Odesl�no: 23. srpna 1999 7:46
P�edm�t: primitiv
Uplne primitivni dotaz:
Na formular (v D4) je vlozen Timer, Label a Graph z ActiveX.
V Label.Caption se data z random meni, ale v Graphu ne. Tento se prepise pouze pri zmene
velikosti Formulare (okno max/normal).
Poradite blbcovi?
Toto asi vsichni znaji, tak snad radeji primo mne, at se v diskuzi nemele brak.
diky
seat(zv)mail.cybernet(tec)cz
function a : single;
begin
a := random(100);
end;
procedure TForm1.Timer1Timer(Sender: TObject);
begin
Label1.Caption := FloatToStr(a);
Graph1.GraphData := a;
end;
zadny subject] < - konference VC
[*] MIKE� P�emysl <premysl.mikes(zv)otr.br.ds.mfcr(tec)cz> - 23.8.1999 17:03:28
Zkus
cpb(zv)gvid(tec)cz
Premek
> ahojte,
>
> nerad otravuji s offtopic, ale nevite nekdo o nejake konferenci o MS
> Visual C ( v cestine ).
> dik martin
> MS SQL 7 - was:RE: OffTopic: Licencni politika
[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 23.8.1999 17:18:33
Tom� Vin wrote:
> " Pripominam, ze se
> pohybujeme u databazi velikosti radove desitky, mozna stovky
> mega. Pro gigabajtove rozsahy bych stejne sahnul jinam nez k MS
> SQL nebo IB."
>
> pod mssql 7 (drive 6.5) provozujeme u zakaznika bez problemu databazi
> o velikosti okolo 50ti GB (vetsi tabulky maji okolo 20ti milionu vet)
> online pripojenych nekolik desitek delsich dotazu a nekolik stovek
> dotazu na primarni klice, v prubehu toho bezi nacitani do tech samych
> tabulek. donedavna byla konfigurace mssql 6.5, dell, 2xppro200, 20GB
> na diskovem poli + 40 GB a pridavnych discich, ted rozchazime mssql
> 7+sp1 na vetsim stroji, az to bude fungovat poradne, mohu napsat o
> zkusenostech.
No vida, a jak se to chova? Neni to lenive?
S pozdravem
Zbysek Hlinka
E-mail: zhlinka(zv)login(tec)cz, localizator(zv)localizator.com
Tel.: 02/795 29 56; GSM: 0603 551 282
Krystofova 1016, 149 00 Praha 4
CZ
Chyba s BDE
[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 23.8.1999 17:18:33
Martin Lasevic wrote:
> Volame ze staticky linkovane DLL form, ktery je navazany i na databazi
>
> Uz jste se tim nekdo setkali? Podotykam, ze predavame v parametrech
> exportovanych funkci i stringy, ale jako ShortString.
A co je zkusit predavat jako PChar?
S pozdravem
Zbysek Hlinka
E-mail: zhlinka(zv)login(tec)cz, localizator(zv)localizator.com
Tel.: 02/795 29 56; GSM: 0603 551 282
Krystofova 1016, 149 00 Praha 4
CZ
primitiv
[*] Martin Tichacek <martin_t(zv)mrp(tec)cz> - 23.8.1999 18:26:20
jaaa to asi zase nechapu .
graph1.refresh nebo (v horsim pripadku) form1.refresh ....?
Label se treba stihne prekreslit, ale na ten graph uz nedojde...
Jestli toto nefunguje ...tak nevim. (a nebo to opravdu nechapu) Mti.
-----P�vodn� zpr�va-----
>Diky, ale to vim a stejne se stale prekresluje jen pri zmene velikosti.
>>musis si nastavit Graph1.AutoInc na gphOff (0), ak to mas na On a
>>davas hodnotu do GraphData vzdy Ti to urobi novy stlpec, ak je to
Off
>>tak pri naplneni hodnoty sa meni GraphData sa Ti meni len jeden.
>>Viac v helpe.
>>>Uplne primitivni dotaz:
>>>Na formular (v D4) je vlozen Timer, Label a Graph z ActiveX.
>>>V Label.Caption se data z random meni, ale v Graphu ne. Tento
se
>>>prepise pouze pri zmene
>>>velikosti Formulare (okno max/normal).
>>>Poradite blbcovi?
>>>Toto asi vsichni znaji, tak snad radeji primo mne, at se v
diskuzi
>>>nemele brak.
>>>
>>>atd ...SetFocus - dynamicky
[*] Ing. Jaroslav �ke��k - 23.8.1999 18:30:15
Reseni je asi vic. Nejjednodu��� je zalozit promennou typu TWinControl a do ni si uloz Sender
pri OnClick. Potom muzes v ListBox treba na OnExit dat Promenna.SetFocus nebo tu promennou
vlozis do vlastnosti Form1.ActiveControl.
Dalsi moznosti je nastavit si hodnotu Tag (jak pises) treba na 1 a projit ty butony a testovat hodnotu jejich Tag.
Kdyz to pretypujes, tak si opet vystacis s jednou procedurou. Je to malinko pracnejsi, ale fungovat by to melo
---
for i := 0 to ComponentCount - 1 do begin
SelectNext(ActiveControl, true, true);
if ActiveControl is TButton then
if TButton(ActiveControl).Tag = 1 then begin
ShowMessage('BINGO');
Exit;
end;
end
nebo
---
if Button1 Enabled then Button1.SetFocus;
while not (ActiveControl is TListBox) do begin
if ActiveControl is TButton then
if TButton (ActiveControl).Text = 1 then begin;
ShowMessage('BINGO');
Exit;
end;
SelectNext(ActiveControl, true, true);
end;
Jaro
From: Zdenek Bohm
To: delphi-l(zv)fwd(tec)cz
Sent: Monday, August 23, 1999 3:09 PM
Subject: SetFocus - dynamicky
Ahoj vsem,
potreboval bych pouzit metodu SetFocus nejak, rekl bych dynamicky.
Vysvetlim situaci.
Mam nekolik Buttonu. Pri OnClick na libovolnem z nich vyberu SetFocusem ListBox, kde se hrabu atd. a pri stisku ESC se potrebuju prepnout zpet na ten Button, ktery predtim prepnul na ListBox.
Kdyby slo treba v osetreni OnClick Buttonu nacpat do Tagu ListBoxu pointer na Sendera (tudiz na Button). A potom v osetreni OnKeyDown u ListBoxu, toto vyzrat a zavolat SetFocus.
Diky Zdenek (D3 Prof. W95)MS SQL 7 - was:RE: OffTopic: Licencni politika
[*] Tom� Vin� <T.Vins(zv)Aquasoft(tec)cz> - 23.8.1999 18:52:11
lenive to moc neni, dotazy na jakkoli velke tabulky pres primarni klic jsou
v setinach az desetinach vteriny (i za soubezneho behu okolo 100 klientu -
virtualnich, kteri to cpou do servru horem dolem - testovaci aplikace
napsana pred tim, nez jsme uverili, ze to pujde) soucasny stav je asi 200
techto klientu, kteri se vsak ptaji poodstatne mene casto. soucasne se
nacita - denni prisun dat okolo 10ti MB, z toho jsou asi polovina zmeny dat,
polovina prirustek. klienti jsou pres WAN, zcasti online, zcasti satelitem.
dalsi soubezny provoz jsou analyticke dotazy. tady mohu odezvu jen ztezka
popsat, podle slozitosti dotazu je ruzna. docela spatne se chovaji joiny
vetsiho mnozstvi tabulek, nekdy to musime obchazet. nicmene techto dotazu
probehne za den nekolik desitek.
to vsechno plati pro mssql 6.5, se 7 zatim nejsou vetsi zkusenosti, jen ze
pri komplikovanejsich dotazech je o dost sviznejsi (spis neni tak lina)
pri uvodnich testech jsme to zkouseli proti oraclu (uz nevim jake verzi ale
byla pred 2.5 roky ta aktualni, stejne jako mssql 6.5) ktery bezel na
novellu - stejny HW a chovalo se to podobne. musim ovsem zcela zaujate
podotknout ze podpora mistniho zastupeni MS byla proti oraclu excelentni
(nezapominejme ze slo o velkou a pomerne dulezitou zakazku ve statni sprave)
nicmene i pote nas ma MS docela rad a kdyz muze, pomuze. nez jsme to
napsali, malokdo veril, ze to na tom umrnenem pececku pujde :)
< Masa(zv)Aquasoft(tec)cz >
Tomas Vins, Aquasoft spol. s r.o.
ICQ 23139360
Tom� Vin wrote:
> " Pripominam, ze se
> pohybujeme u databazi velikosti radove desitky, mozna stovky
> mega. Pro gigabajtove rozsahy bych stejne sahnul jinam nez k MS
> SQL nebo IB."
>
> pod mssql 7 (drive 6.5) provozujeme u zakaznika bez problemu databazi
> o velikosti okolo 50ti GB (vetsi tabulky maji okolo 20ti milionu vet)
> online pripojenych nekolik desitek delsich dotazu a nekolik stovek
> dotazu na primarni klice, v prubehu toho bezi nacitani do tech samych
> tabulek. donedavna byla konfigurace mssql 6.5, dell, 2xppro200, 20GB
> na diskovem poli + 40 GB a pridavnych discich, ted rozchazime mssql
> 7+sp1 na vetsim stroji, az to bude fungovat poradne, mohu napsat o
> zkusenostech.
No vida, a jak se to chova? Neni to lenive?
S pozdravem
Zbysek Hlinka
E-mail: zhlinka(zv)login(tec)cz, localizator(zv)localizator.com
Tel.: 02/795 29 56; GSM: 0603 551 282
Krystofova 1016, 149 00 Praha 4
CZ
primitiv
[*] Karel D�d�k - 23.8.1999 19:22:21
Ja to nechapu taky, ale nechodi - nevadi, necham to plavat.
----- Original Message -----
From: Martin Tichacek <martin_t(zv)mrp(tec)cz>
To: <delphi-l(zv)fwd(tec)cz>
Sent: Monday, August 23, 1999 6:26 PM
Subject: Re: primitiv
> jaaa to asi zase nechapu .
> graph1.refresh nebo (v horsim pripadku) form1.refresh ....?
>
> Label se treba stihne prekreslit, ale na ten graph uz nedojde...
>
> Jestli toto nefunguje ...tak nevim. (a nebo to opravdu nechapu)
>
TStrings
[*] Tomas Matousek <matousek(zv)havit(tec)cz> - 23.8.1999 20:35:10
Drobny detail:
ad 1) To prirazeni nic nekopiruje. Jenom zmeni ukazatel S na Memo1.Lines.
Kopiruje se metodou Assign.
Je to videt i z assembleru:
A:=B; dela
mov EAX, [A]
mov [B], EAX
To je vse.
Tomas Matousek
matousek(zv)havit(tec)cz
>1) Do toho Memo1.Lines nemusis ten stringlist vytvaret a prirazovat,
protoze
>ten uz tam je
>(tim prirazenim si vlastne jen zkopiroval obsah toho S do Memo1.Lines)
>
>2) Nefunguje to proto ze Memo1.Lines je sice typu Strings ale je to jen
>zabaleni WinAPI funkci a Memo ma ve Win95 omezeni na 32kb znaku. Proto ti
to
>asi nefunguje.
>
>Pokud bys to cpal jen do toho S tak by to asi proslo.
>
> McLEI
>
>TStrings
[*] Michal Leinweber <M.Leinweber(zv)sh.cvut(tec)cz> - 23.8.1999 21:14:56
Oprava drobneho detailu:
> Drobny detail:
> ad 1) To prirazeni nic nekopiruje. Jenom zmeni ukazatel S na Memo1.Lines.
> Kopiruje se metodou Assign. TCustomMemo = class(TCustomEdit)
.
property Lines: TStrings read FLines write SetLines;
.
procedure TCustomMemo.SetLines(Value: TStrings);
begin
FLines.Assign(Value);
end;
Takze prirazeni opravdu kopiruje !
McLEI
OffTopic: Licencni politika - mala poznamka (was:
[*] Ing. Jaroslav �ke��k - 23.8.1999 23:10:33
> Coz me ovsem jakozto zakaznika naprosto nezajima...
Ja to vidim trochu jinak. Pokud mam v rukou dobrou technologii, tak od ni
neutikam
pri prvnich problemech firmy a pockam chvili, jak se situace vyvine dal.
> Ano. A mnoho tymu se rozhodlo napriklad pro Visual Basic, Visual
> C a podobne. Byl jsem toho v rade pripadu temer primym svedkem.
> Jaka je nadeje, ze se zase preorientuji? :-)) BTW - naucit se
> ovladat poradne nejaky nastroj je take otazka dlouhych mesicu az
> let, takze co se rychle ztrati, tezko a dlopuho se ziskava zpet.
Mozna i jejich chyba. Videl jsem nekolik produktu ve Visual Basic -
zejmena od PVT. Dekuji nechci. Zelva je proti tomu frajer.
Uz jen ta jejich zavislost na dodanych objektech ... brrr
To by byla dlouha diskuse. Myslim, ze kdo zustal u Delphi,
tak udelal lepe.
>
> K tomu "pozde": ekonomika veci je pro urcity (a troufam si rici ze
> vetsinovy) okruh aplikaci jasna. Pet pripojeni na siti s SQL databazi
> zdarma mi pokryje vetsinu zakazniku. Kdo ma vetsi sit, ma obvykle
> i na zakoupeni plne licence databaze, a v podstate ji uz vlastne i
> potrebuje. Srovnam-li to napriklad s jednou licenci pro IB (Delphi 1),
> stale mi vychazi vyrazne lepe MSDE. Pripominam, ze se
> pohybujeme u databazi velikosti radove desitky, mozna stovky
> mega. Pro gigabajtove rozsahy bych stejne sahnul jinam nez k MS
> SQL nebo IB.
SOUHLASIM..
> :-) Ja jsem nemohl cekat. Musel jsem se rozhodnout v danou chvili.
> Takze lze spolehat pouze na zacinajici vyvojare, kteri se teprve
> mohou rozhodovat, nebo za ktere jeste celkem bez nasledku muze
> rozhodnout nekdo jiny. Ale to je beh na dlouhe trate a vysledek by
> mohl byt videt tak nejdrive za dva, tri roky, jenze to bude Microsoft
> zase o kus dal a IB to podle meho nazoru prohraje. Tyhle dva roky
> prave Borland prohral svou hloupou strategii - ted mohl byt na koni
> on, mohl mit hromadu penez na vyvoj IB. Vzdal to, a ted uz IMHO
> nema sanci to dohnat.
Proc jen na zacinajici vyvojare? Jednou nebo i dvakrat za rok zahajuji
nejaky projekt. Myslim, ze vetsina vyvojaru pouze neoprasuje stare programy,
ale obcas take zacinaji nove projekty.
>
> Tak, podpora vyvojaru. Bill sice nahlas obcas repta, ale v principu
> je asi rad, ze se Windows kradly a kradou. Protoze nekdo dnes
> ukradne, zvykne si, a pozdeji koupi. Jde jen o to primet ho
> nejakym zpusobem, aby to "pozdeji" jednou prislo. Microsoft
> rozdava beta verze dulezitych produktu na potkani. To je IMHO
> skvely tah. Americky Inprise namisto toho radeji vymysli
> nesmyslne ochrany a sestavuje ceniky na vsechno mozne a
> zapomina na jednu dulezitou vec - ze mene znamena casto vice, a
> kdo chce hodne, obvykle dostane malo.
To je Biluv stary a uzasne uspesny trik - nikoliv vsak neznamy
ze sveta jinych technologii. Je to urcity zpusob levne reklamy.
Lidi se div neporvou o veci, ktere jsou zadarmo. Tim se ale zahackuji.
Nakonec jim to Bill proda levne, ale po milionech. Ja nechapu, jak
je mozne, ze to ostatni uz davno neodkoukali a nekopiruji.
Jaro
FONTY
[*] I.C. - Delphi Support <incomp.delphi(zv)post(tec)cz> - 23.8.1999 23:40:35
Mail od Adama Maixnera ( subj. CESKE FONTY ) me pripomel muj odvekej
problem.
Nevite nekdo, kde sehnat nejaky rozumny fonty 'FIXED PITCH',
ktery pobere editor v Delphi.
Jeden cas jsem se po tom pidil, par jsem jich sehnal, ale zadnej neni
dostatecnej.
Vyzkousel jsem pouzivat vsechny co mam, momentalne pouzivam FW Terminal,
ale ten zase neumi cesky.
Vzdycky to skonci tak ze se vratim k Fixedsys.
Potreboval bych, ale neco co umi size 8 a pokud mozno bezpatkovy ( a
czech ).
Mozna jsem moc narocnej.
I.C.
Pavel Vodicka - InComp
e-mail: vodicka(zv)incomp(tec)cz, incomp.delphi(zv)post(tec)cz
homepage: www.incomp(tec)cz
ICQ: 36252507
Hvezdicky a otazniky
[*] Ing. Jaroslav Ske��k - 24.8.1999 00:04:14
> Nevite nekdo o nejakem zdrojaku, ktery by resil "hvezdickovou konvenci"
pri porovnavani retzcu, tj. takove to "*.exe" ? Nejlepe v C++, ale muze to
byt
v Delphi nebo v necem jinem. Nechce se mi to delat, kdyby se to dalo nekde
stahnout. Dik. Viktor
-----------
Podle prikladu na DeleteAllFiles muzes jednoduchou upravou
vytvorit podobne funkce na cokoliv.
procedure DeleteAllFiles(const Path, FileSpec: string);
....
procedure DeleteAllFiles(const Path, FileSpec: string);
{ procedure searches Path subdir for files matching filespec }
var
SR: TSearchRec;
Fs,S: string[72];
begin
S := FileSpec;
repeat
if Pos(';', S) <> 0 then
begin
Fs := copy(S, 1, Pos(';', S)-1);
S := copy(S, Pos(';', S)+1, length(S));
end else
begin
Fs := S;
S := '';
end;
{ Najde prvn� soubor }
if FindFirst(Path + Fs, faArchive, SR) = 0 then
repeat
// SearchFile(Path + SR.Name); { process file }
DeleteFile(Path + SR.Name);
Application.ProcessMessages; { take a deep breath }
until (FindNext(SR) <> 0) ;
until S = '';
SysUtils.FindClose(SR); { need for Win32 compatibility }
end;.......
volani
DeleteAllFiles('System\','*.tmp');
Jaro
TStrings
[*] I.C. - Delphi Support <incomp.delphi(zv)post(tec)cz> - 24.8.1999 00:05:53
----- Original Message -----
From: Michal Leinweber <M.Leinweber(zv)sh.cvut(tec)cz>
To: <delphi-l(zv)fwd(tec)cz>
Sent: 23. srpna 1999 22:14
Subject: RE: TStrings
> Oprava drobneho detailu:
>
.
.
.
Co kdyby jste se proste smirily s tim, ze TMemo neumi vic nez 64kb znaku
a prestali se hadat o tom, jak funguje prirazovani.
Co takhle pouzit TRichEdit a nastavit mu PlainText na True?
I.C.
Pavel Vodicka - InComp
e-mail: vodicka(zv)incomp(tec)cz, incomp.delphi(zv)post(tec)cz
homepage: www.incomp(tec)cz
ICQ: 36252507
Integer to Binary
[*] Tomas Plevak <vamp(zv)sol(tec)cz> - 24.8.1999 00:15:11
> > mame nejakou jednoduchou moznost v Delphi prevadet
> > Integer do binarniho tvaru a taky obracene?
>
> Co mas na mysli? Integer je v binarnim tvaru. Jen je treba se na nej
> "spravne" podivat.
A to jakpak?
Se srdecnym pozdravem Tomas Plevak
E-mail : vamp(zv)sol(tec)cz
ICQ : 6621919
primitiv
[*] I.C. - Delphi Support <incomp.delphi(zv)post(tec)cz> - 24.8.1999 00:15:48
----- Original Message -----
From: Martin Tichacek <martin_t(zv)mrp(tec)cz>
To: <delphi-l(zv)fwd(tec)cz>
Sent: 23. srpna 1999 19:26
Subject: Re: primitiv
> jaaa to asi zase nechapu .
> graph1.refresh nebo (v horsim pripadku) form1.refresh ....?
>
> Label se treba stihne prekreslit, ale na ten graph uz nedojde...
>
> Jestli toto nefunguje ...tak nevim. (a nebo to opravdu nechapu)
Jestli to mas v nejakym silenym cyklu, kterej nenecha tu aplikaci
vydechnout, tak se nedivym.
Zkus pouzit Form1.Invalidate nebo rovnou Form1.Repaint , ale bude to
pomalejsi.
Nechce se mi to zkouset ale, jestli je to v cyklu, tak zkus
Application.ProcessMessagess.
I.C.
Pavel Vodicka - InComp
e-mail: vodicka(zv)incomp(tec)cz, incomp.delphi(zv)post(tec)cz
homepage: www.incomp(tec)cz
ICQ: 36252507
Advantage Database Server
[*] Jan Najvarek <najvarek(zv)seznam(tec)cz> - 23.8.1999 21:47:40 -0400
Co vim, tak na www.advantagedatabase.com/apps.html nabizeji nejake
komponenty pro pripojeni na Advantage (potomek TDataSetu, API nebo ODBC)
Jan Najvarek
> Neviete niekto, ci sa da k Delfom 4 napojit Advantage Database Server
a
> ci existuju nejake komponenty na pristup k zmienenemu serveru.
pristup na ftp.mlp.cz
[*] Mari�nHatala<emha(zv)mailbox.sk> - 24.8.1999 07:00:07
Zdravim.
Chcem sa spytat, pod akym uzivatelom (a pripadne ake je k nemu heslo) je mozne pristupovat na ftp server konferencie - ftp.mlp(tec)cz
Pozeral som do archivu konferencie, ale nic som nenasiel.
Vdaka.
eMHa
Ulozenie prace
[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 24.8.1999 07:13:06
Pavel im� ek wrote:
> Existuje RX komponenta TFormStorage.
> Pavel
A nestacilo by se podivat, jak to dela samotny formular? Vzdyt
DFM je vlastne resource obsahu okna.
> -----P vodn� zpr�va-----
> Od: Michal.Hlavac(zv)st.fmph.uniba.sk <Michal.Hlavac(zv)st.fmph.uniba.sk>
> Komu: delphi-l(zv)fwd(tec)cz <delphi-l(zv)fwd(tec)cz> Datum: 23. srpna 1999 11:34 P
> edm t: Ulozenie prace
>
>
> >Zdravim,
> >chcem sa spytat, ze ci existuje nieco na ulozenie dat z Formu do
> >binarneho suboru. Ten form obsahuje napr. list box, editbox,
> >richedit, atd.... Ide len o data. Alebo to musim cele po jednom
> >ukladat az do zblbnutia?
> >
> > Dik moc
> >
> > Michal Hlavac
> >Spolocnost priatelov deti z detskych domovov
> > Usmev ako dar
> >
> >e-mail: 7hlavac(zv)nw.fmph.uniba.sk
> >
>
S pozdravem
Zbysek Hlinka
E-mail: zhlinka(zv)login(tec)cz, localizator(zv)localizator.com
Tel.: 02/795 29 56; GSM: 0603 551 282
Krystofova 1016, 149 00 Praha 4
CZ
IB vs MS SQL - was: Re: OffTopic: Licencni politik
[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 24.8.1999 07:13:06
Zden k B�hm wrote:
> Jednu vlastni cerstvou zkusenost pridam,
>
> MS SQL 7.0 ma byt (diky neustale snaze Microsoftu zariznout konkurenci
> a vsechno sezrat sam) do objemu dat 2GB zdarma. Tak nam na strane IB
> pomalu zustava uz jen ta nechut cpat Billovi do huby konska vejce.
> Zajimalo by me, co na to Inprise, ale predpokladam, ze vysledek bude
> jen dalsi snaha vytriskat z kazdyho smudly posledni halir.
Nechuti mohu mit treba 1000, ale kdyz jen asi 20% zakazniku je
ochotno si koupit s programem i databazi (a ti me urcite neuzivi),
tak musim vybrat takove reseni, kterym pokryji i tech zbyvajicich
80% a pritom nebudu muset mit dve verze programu.
Mno, aspon nemusim utracet cas rozhodovanim mezi vice
moznostmi, kdyz mam jen jednu. :-)
S pozdravem
Zbysek Hlinka
E-mail: zhlinka(zv)login(tec)cz, localizator(zv)localizator.com
Tel.: 02/795 29 56; GSM: 0603 551 282
Krystofova 1016, 149 00 Praha 4
CZ
pristup na ftp.mlp.cz
[*] Gebauer Lukas <gebylist(zv)mlp(tec)cz> - 24.8.1999 07:32:06
> Chcem sa spytat, pod akym uzivatelom (a pripadne ake je k nemu heslo)
> je mozne pristupovat na ftp server konferencie - ftp.mlp(tec)cz Pozeral
> som do archivu konferencie, ale nic som nenasiel. Vdaka.
na cteni ti staci obycejny anonymous.
Pokud tam chces neco zapisovat, musis se prihlasit jako user:
delphi a heslo: konference
Louci se Lukas Gebauer.
E-mail: gebauerl(zv)mlp(tec)cz
Integer to Binary
[*] Polak Jiri <Jiri.Polak(zv)tconsult(tec)cz> - 24.8.1999 07:40:27
> -----Original Message-----
> From: Tomas Plevak [mailto:vamp(zv)sol(tec)cz]
> Sent: Tuesday, August 24, 1999 12:15 AM
> To: delphi-l(zv)fwd(tec)cz
> Subject: Re: Integer to Binary
>
>
> > > mame nejakou jednoduchou moznost v Delphi prevadet
> > > Integer do binarniho tvaru a taky obracene?
> >
> > Co mas na mysli? Integer je v binarnim tvaru. Jen je treba
> se na nej
> > "spravne" podivat.
:-)
Tazatel je asi zmaten, ze Delphi konvertuji pri zobrazovani
cisla do desitkove soustavy. Nezobrazuji cislo, ale pouze jeho textovou
reprezentaci.
I kdybych zobrazoval rimske cislice, Integer by byl vzdycky binarni hodnota.
>
> A to jakpak?
>
Nejakou formatovaci funkci. Zkusim sesmolit, jde to treba takhle:
//formatuje long pro zaklady 2..16
function IntToStrB (Val: longint; Base: integer): string;
var
Sign: string;
const
NumChars = '0123456789ABCDEF';
begin
Sign := '';
Result := '';
if Val < 0 then begin
Sign := '-';
Val := - Val;
end;
while Val > 0 do begin
Result := NumChars[Val mod Base + 1] + Result;
Val := Val div Base;
end;
if Result = '' then Result := '0';
Result := Sign + Result;
end;
Funkci pro obraceny smer snad ani nebudu psat, myslim, ze by ji mel
zvladnout
kazdy student se zakladni znalosti matematiky po pochopeni cyklu for.
Jura
-------------
Email: Jiri.Polak(zv)tconsult(tec)cz
Co mne nastvalo a na co si dejte pozor:
http://freeweb.coco(tec)cz/jpolak/cernalistina/ADO bez DataSet
[*] Matula M <asexrm(zv)telecom(tec)cz> - 24.8.1999 07:54:48
Chci se pripojit k nazoru Zbyska Hlinky o nepouzivani DataSetu v aplikacich,
ktere pracuji s ADO. Ubiram se stejnym smerem a tak mne zajima jestli je tu
vice takovych lidi a v jakem stavu maji komponety typu GRID,EDIT atd.
Pouzil nekdo DataGrid, MSHFlefGrid atd. (ActiveX od Microsoftu ) a s jakym
vysledkem ?
Mirek M.
Integer to Binary
[*] Jan Fiala <fiala(zv)infos(tec)cz> - 24.8.1999 08:13:12
A nebo se neskrabat levou rukou na pravem uchu a pouzit primo funkci Format.
HexString := Format('%x', [IntegerNumber]);
Pro zpetny prevod muzes pouzit neco jako
IntegerNumber := StrToInt('$' + HexString);
=============================
ing. Jan Fiala fiala(zv)infos(tec)cz
Member of Out of business group CR
=============================
----- P�vodn� zpr�va -----
Od: Polak Jiri <Jiri.Polak(zv)tconsult(tec)cz>>
> Nejakou formatovaci funkci. Zkusim sesmolit, jde to treba takhle:
>
> file://formatuje long pro zaklady 2..16
> function IntToStrB (Val: longint; Base: integer): string;
> var
> Sign: string;
> const
> NumChars = '0123456789ABCDEF';
> begin
> Sign := '';
> Result := '';
>
> if Val < 0 then begin
> Sign := '-';
> Val := - Val;
> end;
>
> while Val > 0 do begin
> Result := NumChars[Val mod Base + 1] + Result;
> Val := Val div Base;
> end;
>
> if Result = '' then Result := '0';
> Result := Sign + Result;
> end;
>
> Funkci pro obraceny smer snad ani nebudu psat, myslim, ze by ji mel
> zvladnout
> kazdy student se zakladni znalosti matematiky po pochopeni cyklu for.
>
> Jura
Zpravy uzivatelum v ramci sdilene aplikace
[*] Ren� Otisk - 24.8.1999 09:07:45
Hi,
W95, D3 C/S
Potreboval bych nakopnout s nasledujicim problemem: mam svoji aplikaci, ktera je ve sdilenem adresari na serveru (vsichni spousti jednu a tutez aplikaci). V nejakem momentu potrebuji dat ze zacatku vsem (az bych si to otukal tak nekterym) uzivatelum hlasku (nejake to blablabla), ale tak, aby, i kdyz maji program jen minimalizovany, jim to aktivovalo form se zpravou jako aktivni (on top).
Predem dekuji
Sroub
Table.Delete a Table.Recall
[*] Petr Sadovsky <petr(zv)slunce(tec)cz> - 24.8.1999 09:07:07
Ahojte,
Nedavno tady byla debata o packovani tabulky.a byl tam nazor, ze pro
sitove aplikace je vyhodne tabulku se zaznamy oznacenymi ke smazani
nepackovat, ale zaznam ke smazani nahradit novym zaznamem, protoze pri
packovani je ttreba vylucny pristup k tabulce.
Chtel bych to nejak provadet, ale potrebuji zjistovat zda jsou najake
zaznamy vymazane, potrebuji se dostat na vetu oznacenou k vymazu a obnovit
ji (RERCALL). Poradte mi, prosim, fce, kterymi to zjistim.V helpu jsem je
nenasel.
Delam to pres TTable a BDE v D4 C/S .
Predem dekuji.
Petr Sadovsk�
p.sadovsky(zv)atlas(tec)cz
ICQ 37042001
Historie...
[*] Radek Pospisil <radek.pospisil(zv)sprinx(tec)cz> - 24.8.1999 09:45:52
Zkus se podivat na http://www.sysinternals.com/filemon.htm treba je tam to
co potrebujes uz hotove ....
R.
-----Original Message-----
From: tmara(zv)itsys(tec)cz [mailto:tmara(zv)itsys(tec)cz]
Sent: Monday, August 23, 1999 1:38 PM
To: delphi-l(zv)fwd(tec)cz
Subject: Historie...
Hezky den,
existuje nejaka komponenta, nebo jak mohu zjistit, kter� soubor byl prave
ted spusten, zavren...etc.
Chtel bych si udelat jakousi podrobnou historii a tam tak� potrebuji vedet,
kdy byl jaky soubor spusten, jak dlouho bezel, kdy byl zavren,
prejmenovan...etc. Byla by to samozrejme rezidentni apl.
A tak� by me zajimalo, zda by takovato aplikace neubirala zbytecne mnoho
sys. prostredku... Nez st�le zkouset, jestli bylo n�co noveho
spusteno...jestli by nebylo lepsi, aby ka�d� spusteny program vratil nejakou
hodnotu...ja zkratka nevim, jak bych n�co podobneho mohl udelat...
Nevim, zda jsem to vysvetlil dost srozumitelne, ci jestli nemam "zvracene"
predstavy, ale toto by mne opravdu dosti zajimalo...
Predem thx.
TMa
Potreboval bych to bud do D3 C/S, nebo D4 Prof.
ADO, MS SQL 7.0 a DBF
[*] delphi(zv)dingo(tec)cz - 24.8.1999 07:52:08 gmt
Ahojte,
jak byste nejrychleji pomoci ADO komponent od Adonisu, nebo pomoci Zbyskovi
komponenty OLE DB prenesly lokalni tabulku *.dbf, *.db do MS SQL.
Podminka - nepouzit BDE.
Diky moc.
Bob
DBGrig
[*] delphi(zv)dingo(tec)cz - 24.8.1999 07:55:07 gmt
Jak se dostat jako ke komponente k rozbalovacimu seznamu v TDBGridu,
abych ho mohl zabalit, rozbalit, vnutit mu stisk klavesy atd.
Snad to neni az tak blbej dotaz.
Dik
Bob
IB vs MS SQL - was: Re: OffTopic: Licencni politik
[*] Pavel Cisar <pcisar(zv)aktis(tec)cz> - 24.8.1999 10:01:58
Haj hou!
From: Zbysek Hlinka <zhlinka(zv)login(tec)cz>
>Nechuti mohu mit treba 1000, ale kdyz jen asi 20% zakazniku je
>ochotno si koupit s programem i databazi (a ti me urcite neuzivi),
>tak musim vybrat takove reseni, kterym pokryji i tech zbyvajicich
>80% a pritom nebudu muset mit dve verze programu.
Zbysku, Zbysku. Neni kazdy ve tve kuzi a pozici. Dost lidi na tehle
konferenci pracuje ve firmach a/nebo na projektech, kde je IB i pres cenovou
politiku zajimava (a mnohdy ta nejlepsi) volba. To, oc tu predevsim bezi, je
macessky pristup Borlandu ke svemu vlastnimu produktu. IB je vskutku dobra
databaze a ackoli je soucasti Delphi od prvni verze, nativniho pristupu z
dilny Borlandu se dockame az nyni, a to jeste diky iniciative z venci
(IBExpress je zalozen na FreeIB, coz je Open Source).
BTW, pokud se domnivas, ze jsi to s MS a MSDE vyhral, budiz, ale nebyl bych
si tak jisty. Cenove je to mozna vyhodne (zatim), ale MSDE a SQLServer (i ve
verzi 7) neni jednoznacnym vytezem na cele care (jen v nekterech oblastech a
pripadech pouziti), a ma rovnez sve vlastni problemy. Totez se tyka ADO a
OLE DB. Je to sice lepsi nez BDE, ale mezi slepymi je i jednooky kralem.
Bude to trvat jeste nejmene dva roky, nez to bude opravdu dobre, snadno
pouzitelne a vubec. Je jen fajn, ze jsi se za nas chopil role prukopnika,
vubec ti to nezavidim :-) Doufam ze mas pravdu (pro sebe) alespon do te
miry, ze uspejes a ze nezazenes sam sebe do rohu. Nicmene, bylo by fer kdyby
jsi uznal, ze jsou i jine moznosti, jine situace a potreby, ve kterych tve
premisy neplatni bud vubec nebo jen z casti.
Hodne zdaru.
Pavel Cisar
TekMetrics Certified Master Delphi Developer
http://www.tekmetrics.com/transcript.shtml?pid=76711
Web aplikace pomoci Delphi
[*] Linhart Petr <Petr(zv)manwe.mius(tec)cz> - 24.8.1999 10:07:31
Zdravim,
jeden zakaznik by rad ziskal informace, zda se nekde realne poziva ve vetsim
nasazeni WEB aplikace psana pomoci Delphi. Ja s tim zadne zkusenosti nemam,
proto se ptam touto cestou. Chci mit pouze prehled o pouzitelnosti.
Diky
Petr
Petr Linhart, System developer (mailto://Petr.Linhart(zv)mius(tec)cz)
Mius a.s. (http://www.mius(tec)cz)
Dlouha 2940
415 01 TEPLICE
Czech Republic
Zpravy uzivatelum v ramci sdilene aplikace
[*] Vaclav_Lukes(zv)EUROTEL.CZ - 24.8.1999 10:23:23
Hi,
mysl�m, �e by jsi mohl vyu��t slu�eb Woken - Messenger Service - p��kaz NET
SEND.
NET SEND <jm�no stroje nebo IP adresa> <zpr�va>
nap�.
NET SEND xxx.xxx.xxx.xx No a tahle v�ta se objev� v mal�m okn� u dan�ho
u�ivatele.
Va�ek
Odpov�zte pros�m u�ivateli: delphi-l(zv)fwd(tec)cz
Komu: delphi-l(zv)fwd(tec)cz
Kopie: (Na v�dom�: Vaclav Lukes/IT/EuroTel)
P�edm�t zpr�vy: Zpravy uzivatelum v ramci sdilene aplikace
Hi,
W95, D3 C/S
Potreboval bych nakopnout s nasledujicim problemem: mam svoji aplikaci, ktera je
ve sdilenem adresari na serveru (vsichni spousti jednu a tutez aplikaci). V
nejakem momentu potrebuji dat ze zacatku vsem (az bych si to otukal tak
nekterym) uzivatelum hlasku (nejake to blablabla), ale tak, aby, i kdyz maji
program jen minimalizovany, jim to aktivovalo form se zpravou jako aktivni (on
top).
Predem dekuji
Sroub
nove BDE, verze 5.10
[*] Tomas =?iso-8859-2?Q?Michal=EDk?= <michalik(zv)proca(tec)cz> - 24.8.1999 09:36:43
Ahoj,
neni zadna zprava o novinkach, takze zasilam primy link
ftp://ftp.borland.com/pub/bde/devsupport/updates/bde510en.exe
Tom
Integer to Binary
[*] Polak Jiri <Jiri.Polak(zv)tconsult(tec)cz> - 24.8.1999 10:39:13
> -----Original Message-----
> From: Jan Fiala [mailto:fiala(zv)infos(tec)cz]
> Sent: Tuesday, August 24, 1999 8:13 AM
> To: Delphi forum
> Subject: Re: Integer to Binary
>
>
> A nebo se neskrabat levou rukou na pravem uchu a pouzit primo
> funkci Format.
> HexString := Format('%x', [IntegerNumber]);
>
> Pro zpetny prevod muzes pouzit neco jako
> IntegerNumber := StrToInt('$' + HexString);
>
:-)))
Takze zatimco ty ziskas pro 255 (dec cislo) 'FF',
ja po poskrabani na pravem uchu muzu spravne odpovedet
na puvodni dotaz,
jak to cislo vypada ve dvojkove soustave: '11111111'
Jiri Polak
-------------
Email: Jiri.Polak(zv)tconsult(tec)cz
Co mne nastvalo a na co si dejte pozor:
http://freeweb.coco(tec)cz/jpolak/cernalistina/DBGrid:Translate Error. Value out of bounds.
[*] Ren� Otisk - 24.8.1999 11:14:32
Hi,
tohle mi to hlasi ("Translate Error. Value out of bounds.") kdyz posunu horiz. scrollbar dbgridu (ten je pres query napichnuty na DBase databazi). dival jsem se ze to neprojde na pole typu Date ani z jedne strany.Integer to Binary
[*] Jan Fiala <fiala(zv)infos(tec)cz> - 24.8.1999 11:15:30
>
> Takze zatimco ty ziskas pro 255 (dec cislo) 'FF',
> ja po poskrabani na pravem uchu muzu spravne odpovedet
> na puvodni dotaz,
> jak to cislo vypada ve dvojkove soustave: '11111111'
>
> Jiri Polak
Omlouvam se, mel jsem rychlejsi ruce a zadavani zakladu soustavy ve tvem prikladu jsem si vsiml az potom. Taky me napadlo, zda tazatel treba nechtel vedet, jak je integer ulozeny na disku.
=============================
ing. Jan Fiala fiala(zv)infos(tec)cz
Member of Out of business group CR
=============================predefinovani metody unvitr procedury
[*] Jaroslav ��pek <jaroslav.sipek(zv)idea(tec)cz> - 24.8.1999 11:50:05
Ahoj,
poradil by mi nekdo, jak mam v procedure, ve ktere vytvarim za behu
programu formular a na nem mam StringGrid, predefinovat udalost
OnSelectCell u StringGridu.
Diky
Jaroslav Sipek
E-mail: jaroslav.sipek(zv)idea(tec)cz
Quick report - editace sestav
[*] Jan Naiser <tua(zv)ltm(tec)cz> - 24.8.1999 12:07:11
Preji pekneho dne,
D4.03
existuje nejaky editor sestav pro QR (standart), ktery by se dal
zaclenit do aplikace tak, aby se sestavy daly vytvaret a editovat
(uzivatelsky) primo za behu programu, napr. tak, jak to jde v
generatoru Sinea?
Dekuji za odpoved.
S pozdravem Jan Naiser
predefinovani metody unvitr procedury
[*] Pavel Cisar <pcisar(zv)aktis(tec)cz> - 24.8.1999 12:29:01
Haj hou!
> poradil by mi nekdo, jak mam v procedure, ve ktere vytvarim za behu
> programu formular a na nem mam StringGrid, predefinovat udalost
> OnSelectCell u StringGridu.
1) Musis mit nadefinovanou metodu na nejakem objektu, jejiz signatura
(hlavicka) koresponduje s eventem OnSelectCell.
2) Priradis property OnSelectCell gridu tuto metodu, napr.
MyForm := TMyForm.Create(nil);
MyForm.Grid1.OnSelectCell := MyNewEventMethod ;
Hodne zdaru
Pavel Cisar pcisar(zv)atlas(tec)cz
TekMetrics Certified Master Delphi Developer
http://www.tekmetrics.com/transcript.shtml?pid=76711
Prima konektivita do SQL Anywhere
[*] Radim Kunz <rkunz(zv)ova(tec)comp(tec)cz> - 24.8.1999 12:32:29
>Kdyz uz byla rec o prime konektivite do databazi,
>zajimalo by me jak a kde lze ziskat primy konekt
>do SQL Adaptive Serveu Aniwhere 6.0, abych obesel
>ODBC.
>
>svoboda(zv)okfas(tec)cz
>www.okfas(tec)cz
Jestli to je jeste aktualni, tak poslednim DSP update jsem
narazil na tohle:
http://SunSITE.ICM.edu.pl/delphi/ftp/d40free/ctlib.zip (1,221,319 bytes)
A set of native Delphi components that connect to Sybase and
SQLAnywhere using the Sybase Open Client CT-Library and
CS-Library API's. These components connect directly to Sybase
and SQL Anywhere. There is no DLL or BDE, only the Sybase Open
Client DLL's. All these components compile into the EXE without
any runtime files necessary to run the application. The set
contains: CTLibContext, CTLibDatabase, CTTable (a TDataSet
descendant), CTQuery (a TDataSet descendant), CTStoredProc (a
TDataSet descendant), CTLibQuery, CTLibBulk (using the
Bulk-Library calls. Can be used for bcp utility), CTLibGrid,
CTLibListBox, CTLibComboBox, CTLibChkListBox, CTLibTools (New),
CTLibFunctions (New), CTLibObjInfo and CTSqlMon monitor utility
EXE-demo included ( ver. 1.8.5, no src., Source $200 USD ) (
FREEWARE d4.0x ) by Stephan Marais
Radim Kunz
Quick report - editace sestav
[*] Pavel Cisar <pcisar(zv)aktis(tec)cz> - 24.8.1999 12:33:48
Haj hou!
> existuje nejaky editor sestav pro QR (standart), ktery by se dal
> zaclenit do aplikace tak, aby se sestavy daly vytvaret a editovat
> (uzivatelsky) primo za behu programu, napr. tak, jak to jde v
> generatoru Sinea?
Nevim, zda je nejaky rozdil mezi QR ve Standard verzi Delphi a ostatnimi
balenimi Delphi, ale neco jako editor sestav je soucasti QR jak v D3, tak
D4/D5 (verze Pro a C/S). Ostatne, pouzivat QR bez zdroju (tzn. zakoupeni) je
hazard, neb jsou plne chyb. QR se daji pouzit az po rucni oprave a
vylepseni, pak jsou docela dost dobre.
Hodne zdaru
Pavel Cisar pcisar(zv)atlas(tec)cz
TekMetrics Certified Master Delphi Developer
http://www.tekmetrics.com/transcript.shtml?pid=76711
Ulozenie prace
[*] Michal.Hlavac(zv)st.fmph.uniba.sk - 24.8.1999 10:45:19 met
O.K. mam Delphi 3 a tam som nic podobne nenasiel
Michal Hlavac
Spolocnost priatelov deti z detskych domovov
Usmev ako dar
e-mail: 7hlavac(zv)nw.fmph.uniba.sk
-----Pyvodnm zprava-----
Od: Pavel immhek <simicek(zv)foresta(tec)cz>
Komu: delphi-l(zv)fwd(tec)cz <delphi-l(zv)fwd(tec)cz>
Datum: 23. august 1999 18:37
Pxedmlt: Re: Ulozenie prace
Existuje RX komponenta TFormStorage.
Pavel
predefinovani metody unvitr procedury
[*] Jan Fiala <fiala(zv)infos(tec)cz> - 24.8.1999 12:46:16
----- P�vodn� zpr�va -----
Od: Jaroslav ��pek <jaroslav.sipek(zv)idea(tec)cz>
> Ahoj,
> poradil by mi nekdo, jak mam v procedure, ve ktere vytvarim za behu
> programu formular a na nem mam StringGrid, predefinovat udalost
> OnSelectCell u StringGridu.
Procedura, kterou chces udalosti OnSelectSell priradit musi existovat. Pokud ten form vytvaris az uplne za behu pres Form := TForm.Create..., musis ji mit deklarovanou napr. na formu, ze ktereho jej vytvaris v sekci Public. Procedura musi mit stejne parametry jako originalni OnSelectCell. Po vytvoreni StringGridu pak provedes pouze prirazeni :
StringGrid.OnSelectCell := MainForm.MujOnSelectCell;
=============================
ing. Jan Fiala fiala(zv)infos(tec)cz
Member of Out of business group CR
=============================Web aplikace pomoci Delphi
[*] Polak Jiri <Jiri.Polak(zv)tconsult(tec)cz> - 24.8.1999 12:50:13
> Zdravim,
>
> jeden zakaznik by rad ziskal informace, zda se nekde realne
> poziva ve vetsim
> nasazeni WEB aplikace psana pomoci Delphi. Ja s tim zadne
> zkusenosti nemam,
> proto se ptam touto cestou. Chci mit pouze prehled o pouzitelnosti.
>
> Diky
> Petr
>
Co je to Web aplikace? Podle mne dost nesmyslny pojem. A Web aplikace
psana pomoci Delphi uz vubec. Zadny projekt typu Web Application jsem tam
nenasel. A nerozumim tomu "zda se nekde realne poziva ve vetsim nasazeni"
- to znamena jestli existuje vice provozovanych instalaci teto aplikace,
nebo
s ni pracuje velke mnozstvi uzivatelu nebo co?
Jde Ti o nejake konkretni vlastnosti?
Ma to mit nejake zabezpeceni nebo to ma byt pouze zobrazovac stranek
s vyuzitim nejakych dat anebo jenom chces mit nejake klikaci ci jine
vymyslenosti
v browseru clienta? Nebo chces, aby Tve dve aplikace komunikovaly pres Web
protokolem HTTP?
To, co si ja predstavuji pod pojmem Web aplikace, se pise spis v ASP nez v
Delphi.
Jura
-------------
Email: Jiri.Polak(zv)tconsult(tec)cz
Co mne nastvalo a na co si dejte pozor:
http://freeweb.coco(tec)cz/jpolak/cernalistina/Web aplikace pomoci Delphi
[*] Z�vada Ji�� <zavada(zv)atcomp(tec)cz> - 24.8.1999 13:08:32
Ahoj,
pouziva se, uz pul druheho roku (z toho pul roku zkusebniho provozu), s jeji
funkci je v zasade spokojenost. Mame ISAPI moduly (dll) vytvorene v Delphi 4
pro on-line prodejni, reklamacni a informacni system AT Computers a.s. -
nejvetsiho ceskeho vyrobce pocitacu http://www.atcomp(tec)cz. Tam je vyuzita
moznost relativne snadneho propojeni Delphi s temer libovolnou, i velmi
obskurni databazi, kterou Navision Financials rozhodne je. Obrat prodaneho
zbozi pres WWW radove v desitkach (prip. jednotkach stovek) milionu Kc
rocne. Pro ukazku je toho mozno poskytnout jen malo, pristup je povolen jen
registrovane dealery. Muzes ale zkusit http://www.webshop(tec)cz, ten je
postaven na podobne technologii.
Jiri Zavada
ATComputers a.s.
Kruckova 221/2
721 00 Ostrava 21
zavada(zv)atcomp(tec)cz
> -----P�vodn� zpr�va-----
> Od: Linhart Petr [SMTP:Petr(zv)manwe.mius(tec)cz]
> Odesl�no: 24. srpna 1999 10:08
> Komu: 'delphi-l(zv)fwd(tec)cz'
> P�edm�t: Web aplikace pomoci Delphi
>
> Zdravim,
>
> jeden zakaznik by rad ziskal informace, zda se nekde realne poziva ve
> vetsim
> nasazeni WEB aplikace psana pomoci Delphi. Ja s tim zadne zkusenosti
> nemam,
> proto se ptam touto cestou. Chci mit pouze prehled o pouzitelnosti.
>
> Diky
> Petr
>
>
> Petr Linhart, System developer (mailto://Petr.Linhart(zv)mius(tec)cz)
> Mius a.s. (http://www.mius(tec)cz)
> Dlouha 2940
> 415 01 TEPLICE
> Czech Republic
Zpravy uzivatelum v ramci sdilene aplikace
[*] Martin Fron�k <FRONEK(zv)zznslany(tec)cz> - 24.8.1999 13:10:17
No, bylo by to taky mozne, ale znovu upozornuji na protokol TCP/IP a
komponenty, to je totiz to vubec nejjednodussi co muzes udelat. Navic si
muzes udelat vlastni vyskakovaci okenka a treba si ty zpravy
protokolovat (nebo si je dat k obedu:-)
Zkus se podivat do archivu konference, uz jsem tady o tom psal
(nekolikrat). Kdybys to nenasel, tak se ozvi, treba ti pomuzu....
Martin Fron�k
ZZN Slan� a.s.
Pra�sk� 1579, 274 49, Slan�
tel. +420-314-522986
e-mail: fronek(zv)zznslany(tec)cz
> -----P�vodn� zpr�va-----
> Od: Vaclav_Lukes(zv)EUROTEL.CZ [SMTP:Vaclav_Lukes(zv)EUROTEL.CZ]
> Odesl�no: 24. srpna 1999 10:23
> Komu: delphi-l(zv)fwd(tec)cz
> P�edm�t: Re: Zpravy uzivatelum v ramci sdilene aplikace
>
>
>
> Hi,
>
> mysl�m, �e by jsi mohl vyu��t slu�eb Woken - Messenger Service -
> p��kaz NET
> SEND.
>
> NET SEND <jm�no stroje nebo IP adresa> <zpr�va>
>
> nap�.
> NET SEND xxx.xxx.xxx.xx No a tahle v�ta se objev� v mal�m okn� u
> dan�ho
> u�ivatele.
> Web aplikace pomoci Delphi
[*] Jan �ebel�k <honza(zv)haes(tec)cz> - 24.8.1999 13:19:24
> jeden zakaznik by rad ziskal informace, zda se nekde realne poziva ve vetsim
> nasazeni WEB aplikace psana pomoci Delphi. Ja s tim zadne zkusenosti nemam,
> proto se ptam touto cestou. Chci mit pouze prehled o pouzitelnosti.
David Muzatko skoli programovani aktivnich aplikaci pro Internet a vyuziti Delphi pro Internet.
Vetsinou se ukazuje, ze najdeme nastroje pro Internet vhodnejsi, nepomerne mene rozsahle nez EXE nebo DLL v Delphi. (viz http://www.haes(tec)cz/arthur)
Honza
=========================================
= HAES - RNDr. Jan Sebelik
= http://www.haes(tec)cz
= Skolici a konzultacni stredisko pro Delphi a Win32
= Vojtiskova 206
= 507 81 Lazne Belohrad
= tel. 0434 692 931, 692 569, 0601 20 30 84
=========================================BDE a nedostatek voln�ho m�sta
[*] Petr Vale� - 24.8.1999 13:41:57
Ahoj,
m�m 380MB velk� DBF tabulky v n�kolika m�lo souborech. Nicm�n� semi n�kdy
st�v�, �e a� m�m na disku st�le volno cca 150-200 MB, BDE mi hl�s�
nedostatek voln�ho m�sta na disku. A ani tam samoz�ejm� nevykon�v�m ��dn�
operace, kter� by tomu odpov�dali, vet�inou se jedn� o velice jednoduch� SQL
p��kazy, kter� vracej� n�kolik m�lo kilo.
Nem�te n�kdo podobn� zku�enosti.
D�kuji
Petr Vale�
predefinovani udalosti
[*] Jaroslav ��pek <jaroslav.sipek(zv)idea(tec)cz> - 24.8.1999 13:49:40
Ahoj,
nevite nekdo jak v nasledujicim programu zaridit, aby kdyz kliknu na
nejaky radek v FindListu (TStringGrid), aby se formular zavrel a vratilo se
mi cislo radku.
(zrejme predifinovat udalost OnSelectCell, ale jak?)
Diky
Jaroslav Sipek
E-mail: jaroslav.sipek(zv)idea(tec)cz
unit Unit1;
interface
uses
Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
StdCtrls, Grids;
type
TForm1 = class(TForm)
Button1: TButton;
procedure Button1Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
procedure ShowFind (var radek:integer);
end;
var
Form1: TForm1;
implementation
{$R *.DFM}
procedure TForm1.ShowFind (var radek:integer);
var
FindForm : TForm;
FindList : TStringGrid;
begin
FindForm:=TForm.Create(Self);
FindList:=TStringGrid.Create(FindForm);
FindList.Parent:=FindForm;
FindList.Options:=FindList.Options + [goColSizing,goRowSelect] -
[goRangeSelect];
FindList.Show;
FindForm.Show;
end;
procedure TForm1.Button1Click(Sender: TObject);
var
RD: integer�
begin
ShowFind (RD);
end;
end.Obrazek pro aplikaci
[*] MIKE� P�emysl <premysl.mikes(zv)otr.br.ds.mfcr(tec)cz> - 24.8.1999 14:00:00
Nema nekdo nahodou maly obrazek "Designed for Microsoft Windows NT" nebo
"Designed for Windows 98", pripadne jako animovany gif?
Jestli jo, tak to prosim poslete prilohou na muj mailbox. -diky-
*****************
Premysl Mikes
programator-syntetik
mailto:premysl.mikes(zv)otr.br.ds.mfcr(tec)cz
predefinovani udalosti
[*] Pavol Kaka�ka <paka(zv)aktis(tec)cz> - 24.8.1999 14:02:43
Najprv by ma zauj�malo pre�o ten TFindList vytv�ra� ru�ne.
Rie�enie:
v ObjectInspectoru si otvor� z�lo�ku Events a klikne� na udalos� OnClick,
potom dop�e�:
procedure TForm1.FindList.Click(Sender: TObject);
begin
ModalResult := mrOK;
TvojeCislo := FindList.Row;
end;
Kaka�ka Pavol
paka(zv)aktis(tec)cz
( kapas(zv)post(tec)cz )
Ahoj,
nevite nekdo jak v nasledujicim programu zaridit, aby kdyz kliknu na
nejaky radek v FindListu (TStringGrid), aby se formular zavrel a vratilo se
mi cislo radku.
(zrejme predifinovat udalost OnSelectCell, ale jak?)
Diky
Jaroslav Sipek
E-mail: jaroslav.sipek(zv)idea(tec)cz
unit Unit1;
interface
uses
Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
StdCtrls, Grids;
type
TForm1 = class(TForm)
Button1: TButton;
procedure Button1Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
procedure ShowFind (var radek:integer);
end;
var
Form1: TForm1;
implementation
{$R *.DFM}
procedure TForm1.ShowFind (var radek:integer);
var
FindForm : TForm;
FindList : TStringGrid;
begin
FindForm:=TForm.Create(Self);
FindList:=TStringGrid.Create(FindForm);
FindList.Parent:=FindForm;
FindList.Options:=FindList.Options + [goColSizing,goRowSelect] -
[goRangeSelect];
FindList.Show;
FindForm.Show;
end;
procedure TForm1.Button1Click(Sender: TObject);
var
RD: integer�
begin
ShowFind (RD);
end;
end.
Quick report - editace sestav
[*] Martin Koran <komar(zv)komar(tec)cz> - 24.8.1999 14:09:56
Ahoj,
> > existuje nejaky editor sestav pro QR (standart), ktery by se dal
zkus http://www.thsd.de
S pozdravem
Martin Koran
============================================
Martin Koran
KOMAR
Hilbertova 68
440 01 LOUNY
tel.: +420 (395) 65 40 19
fax: +420 (395) 65 53 85
hotline: +420 (602) 42 33 72
http://www.komar(tec)cz
mailto:info(zv)komar(tec)cz
Web aplikace pomoci Delphi
[*] Z�vada Ji�� <zavada(zv)atcomp(tec)cz> - 24.8.1999 14:26:46
...
Jiri.Polak(zv)tconsult(tec)cz napsal:
> Co je to Web aplikace? Podle mne dost nesmyslny pojem. A Web aplikace
> psana pomoci Delphi uz vubec. Zadny projekt typu Web Application jsem tam
> nenasel. A nerozumim tomu "zda se nekde realne poziva ve vetsim nasazeni"
> - to znamena jestli existuje vice provozovanych instalaci teto aplikace,
> nebo
> s ni pracuje velke mnozstvi uzivatelu nebo co?
>
[Z�vada Ji��]
V Delphi (ale od verze 3, jen v C/S) je k dispozici volba tvorby
WebServrove aplikace - zrejme mas verzi Std nebo Profi, tak bych videl
srozumitelnou pricinu Tveho nepochopeni. Web server aplikace je asi v tomto
kontextu chapana jako uzivatelsky (programatorem) konfigurovatelna nadstavba
nad nejakym standardnim WWW serverovym produktem, ktera pomoci
standardizovanych programatorskych rozhrani prizpusobi jeho chovani tak, aby
poskytoval funkcnost pozadovanou zadavatelem. Delphi podporuje tvorbu
takovych aplikaci podle standardu CGI, WinCGI (*.exe) a ISAPI (*.dll), dale
je mozno vyuzit schopnosti Delphi vytvaret OLE Automation servery a tak
vytvorit ASP komponentu, ktera se pak konvencne vyuzije v kodu ASP.
Pro nizsi verze Delphi, nez je C/S je udajne mozno dokoupit podporu
tvorby WWW servrovych aplikaci v samostatne dodavanem produktu WebBroker -
blize viz cenik Borlandu, jinak je nahrada tohoto produktu (s touze
funkcnosti) soucasti projektu Delphree.
Jak ISAPI dll, tak ASP skripty maji sve vyhody a nevyhody, ja bych
rekl, ze obe technologie maji sva opodstatneni - zalezi na vyvojari, kterou
pro konkretni nasazeni zvoli.> Jde Ti o nejake konkretni vlastnosti?
> Ma to mit nejake zabezpeceni nebo to ma byt pouze zobrazovac stranek
> s vyuzitim nejakych dat anebo jenom chces mit nejake klikaci ci jine
> vymyslenosti
> v browseru clienta? Nebo chces, aby Tve dve aplikace komunikovaly pres Web
> protokolem HTTP?
>
> To, co si ja predstavuji pod pojmem Web aplikace, se pise spis v ASP nez v
> Delphi.
>
> Jura
> -------------
[Z�vada Ji��]
P.S. Pokud by ti slo o napsani vlastniho WWW serveru, i to Delphi
svedou ...
Jiri Zavada
zavada(zv)atcomp(tec)cz
> Web Aplikace pomoci Delphi
[*] voltrr1.epr(zv)mail.cez(tec)cz - 24.8.1999 13:33:15
http://www.holiday(tec)cz/Ecodate/InetRis/default.htm
Naprogramovano pomoci dedecka WebProvideru (delphree.clexpert.com)
Radek Voltr
Tak uz sem taky certifikovan
(ale P.Cisar byl lepsi :-( budu se muset pripravit a
pak ho rozdrtim :-) )
http://www.tekmetrics.com/transcript.shtml?pid=78334
Zpravy uzivatelum v ramci sdilene aplikace
[*] Ren� Otisk - 24.8.1999 14:37:59
Hi,
V tom pripade bych potreboval zjistit, kteri uzivatele maji spustenou tu aplikaci. Myslel jsem si jestli by to neslo nejak pres DDE, ale to by musel byt zaroven server i client nebo ja nevim co
Sroub
Hi,
mysl�m, �e by jsi mohl vyu��t slu�eb Woken - Messenger Service - p��kaz NET
SEND.
NET SEND <jm�no stroje nebo IP adresa> <zpr�va>
nap�.
NET SEND xxx.xxx.xxx.xx No a tahle v�ta se objev� v mal�m okn� u dan�ho
u�ivatele.chyba
[*] Ivan Kodaj <kodaj(zv)datalock.sk> - 24.8.1999 14:40:31
Cafte vsetci!
Otazocka. Neviete niekto, co znamena chyba Cannot use array of Field
Values with Expression Indicies. Mam dbase databazy, zlozene indexy a po
pouziti FindKey mi to vyhodi tuto chybu.
Vopred dakujem i.k.predefinovani metody unvitr procedury
[*] Jan �ebel�k <honza(zv)haes(tec)cz> - 24.8.1999 14:43:25
Form2:=TForm2.Create(self);
Form2.StringGrid.OnSelectCell:=NejakaMojeProcedura;
NejakaMojeProcedura musi byt ovsem stejneho typu, jako OnSelectCell.
Honza
=========================================
= HAES - RNDr. Jan Sebelik
= http://www.haes(tec)cz
= Skolici a konzultacni stredisko pro Delphi a Win32
= Vojtiskova 206
= 507 81 Lazne Belohrad
= tel. 0434 692 931, 692 569, 0601 20 30 84
=========================================
----------
> Odes�latel: Jaroslav ��pek <jaroslav.sipek(zv)idea(tec)cz>
> Komu: 'delphi-l(zv)fwd(tec)cz'
> P�edm�t: predefinovani metody unvitr procedury
> Datum: 24. srpna 1999 11:50
>
> Ahoj,
> poradil by mi nekdo, jak mam v procedure, ve ktere vytvarim za behu
> programu formular a na nem mam StringGrid, predefinovat udalost
> OnSelectCell u StringGridu.
> Diky
> Jaroslav Sipek
> E-mail: jaroslav.sipek(zv)idea(tec)cz
Quick report - editace sestav
[*] Jaroslav N�dhera <nadhera(zv)csh(tec)cz> - 24.8.1999 15:25:16
Napriklad ReportDesigner http://www.thsd.de
J. Nadhera
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
ICQ: 42714585
-----P�vodn� zpr�va-----
Od: Jan Naiser <tua(zv)ltm(tec)cz>
Komu: Delphi konference <delphi-l(zv)fwd(tec)cz>
Datum: 24. srpna 1999 13:53
P�edm�t: Quick report - editace sestav
>Preji pekneho dne,
>
>D4.03
>
>existuje nejaky editor sestav pro QR (standart), ktery by se dal
>zaclenit do aplikace tak, aby se sestavy daly vytvaret a editovat
>(uzivatelsky) primo za behu programu, napr. tak, jak to jde v
>generatoru Sinea?
>
>Dekuji za odpoved.
>S pozdravem Jan Naiser
>
>
>Integer to Binary
[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 24.8.1999 15:27:18
Tomas Plevak wrote:
> > > mame nejakou jednoduchou moznost v Delphi prevadet
> > > Integer do binarniho tvaru a taky obracene?
> >
> > Co mas na mysli? Integer je v binarnim tvaru. Jen je treba se na nej
> > "spravne" podivat.
>
> A to jakpak?
6. bit: (zacina se nulou)
if (Intg and $40)<>0 then...
Ja vim, cecko to neni... :-)
S pozdravem
Zbysek Hlinka
E-mail: zhlinka(zv)login(tec)cz, localizator(zv)localizator.com
Tel.: 02/795 29 56; GSM: 0603 551 282
Krystofova 1016, 149 00 Praha 4
CZ
OffTopic: Licencni politika - mala poznamka
[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 24.8.1999 15:27:18
Ing. Jaroslav ke �k wrote:
(take pro pana Kubata)
> > Coz me ovsem jakozto zakaznika naprosto nezajima...
>
> Ja to vidim trochu jinak. Pokud mam v rukou dobrou technologii, tak od
> ni neutikam pri prvnich problemech firmy a pockam chvili, jak se
> situace vyvine dal.
:-) Co se tyce IB, tak v te dobe to zas az takovy zazrak nebyl (jak
je to dnes nevim), krome toho jsem se musel nejak uzivit.
Kazdopadne z dnesniho pohledu se mi jevi, ze za danych okolnosti
jsem se rozhodl spravne.
> > Ano. A mnoho tymu se rozhodlo napriklad pro Visual Basic, Visual C a
> > podobne. Byl jsem toho v rade pripadu temer primym svedkem. Jaka je
> > nadeje, ze se zase preorientuji? :-)) BTW - naucit se ovladat
> > poradne nejaky nastroj je take otazka dlouhych mesicu az let, takze
> > co se rychle ztrati, tezko a dlopuho se ziskava zpet.
>
> Mozna i jejich chyba. Videl jsem nekolik produktu ve Visual Basic -
> zejmena od PVT. Dekuji nechci. Zelva je proti tomu frajer. Uz jen ta
> jejich zavislost na dodanych objektech ... brrr To by byla dlouha
> diskuse. Myslim, ze kdo zustal u Delphi, tak udelal lepe.
Delphi je vyborny nastroj - to vsak neni duvod ho zabit spatnou
licencni politikou. Ale protoze je soubezne rec i o IB, tak tam to uz
tak zrejme neni. Kazdopadne si myslim, ze vhodne licencovana IB
od sameho pocatku mohla Borlandum zvysit prodej Delphi i IB.
Ja take musim pocitat, a za urcitych okolnosti muze byt
rozhodnuti pro VB spravne - je tu sance na to, ze tu VB bude i za
dalsich par let, kdezto kdo vi, jestli tu Inprise jeste za dva roky
bude (tohle zduvodneni jsem slysel!). Zde neslo o to, ze Delphi je
lepsi, ale o to, ze dana firma nevidela v Delphi perspektivu, a tedy
ochranu svych investic! A docela me to deprimuje, protoze pak
ztracim viru i ja, jak dlouho s Delphi jeste vydrzim.
> Proc jen na zacinajici vyvojare? Jednou nebo i dvakrat za rok zahajuji
> nejaky projekt. Myslim, ze vetsina vyvojaru pouze neoprasuje stare
> programy, ale obcas take zacinaji nove projekty.
:-))) Neumim si predstavit programatora, ktery dvakrat za rok zahaji
novy projekt, a pokazde v necem jinem. Jednou v Delphi, jednou v
C, jednou ve VB, jednou v PowerBuilderu... Tohle muze dopadnout
jenom spatne. Kdyz zacnu novy projekt, tak v nastroji, ktery dobre
ovladam. Pokud se rozhodnu pro zmenu nastroje, tak k tomu (a
zejmena s pribyvajicimi lety) musim mit sakra dobry duvod, a
perspektivu, ze dale budu pokracovat uz jen v tom. Takze podle
nastroje si vybiram i projekty. Neberu tedy projekty na vyrobu
drajvu, programy pro Win 3.1 a DOS a podobne.
Na skolenich je napriklad videt hromadny uprk od Foxky - zrejme
prestava vyhovovat pozadavkum doby. Potkal jsem na skoleni lidi
(tohle se tyka primo Inprise, ledacos jsem jim uz rekl, ale myslim
ze neskodi to vytroubit i verejne), kteri tam prisli jen proto, aby si
otestovali, zda prejit na Delphi nebo ne. Jsem presvedcen o tom,
ze ne vsichni odchazeli s presvedcenim, ze Delphi je ta spravna
alternativa. A neni to jenom tim, ze jsem je nedokazal ukecat, ale i
dalsimi vecmi - chybove komponenty (zejmena databazove),
komplikovanost a prebubrelost BDE, spatna licencni politika.
Doufam, ze ted s komponentami ADO se mi bude darit ponekud
lepe. :-) Ale zase je tu chybne licencovani. Na skolenich vykladam
lidem, aby ve vlastnim zajmu opustili programovani nad
souborovymi databazemi, a presli na SQL - a popisuju
hruzostrasne historky, ktere jsem osobne zazil s Paradoxem. :-)
Co jim dnes mohu nabidnout jako vetsinove vhodnou alternativu -
IB? Tezko. Je to MS SQL 7. A klidne bych IB propagoval, kdyby to
bylo aspon trochu mozne. Ale nemohu nabizet neco, co jsem sam
opustil.
> > Tak, podpora
> vyvojaru. Bill sice nahlas obcas repta, ale v principu > je asi rad,
> ze se Windows kradly a kradou. Protoze nekdo dnes > ukradne, zvykne
> si, a pozdeji koupi. Jde jen o to primet ho > nejakym zpusobem, aby to
>
> To je Biluv stary a uzasne uspesny trik - nikoliv vsak neznamy
> ze sveta jinych technologii. Je to urcity zpusob levne reklamy.
> Lidi se div neporvou o veci, ktere jsou zadarmo. Tim se ale zahackuji.
> Nakonec jim to Bill proda levne, ale po milionech. Ja nechapu, jak je
> mozne, ze to ostatni uz davno neodkoukali a nekopiruji.
Ja vim, ze tento trik je znamy. Vzdyt ho zna i Inprise, protoze na
tomhle vyrostl Turbo Pascal. Ale nechapu, ktery cert jim naseptal,
ze je vhodne ho opustit - asi se v te dobe citili prislis silni v
kramflecich. Dusledky jsou dnes videt...
S pozdravem
Zbysek Hlinka
E-mail: zhlinka(zv)login(tec)cz, localizator(zv)localizator.com
Tel.: 02/795 29 56; GSM: 0603 551 282
Krystofova 1016, 149 00 Praha 4
CZ
MS SQL 7 - was:RE: OffTopic: Licencni politika
[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 24.8.1999 15:27:18
Tom� Vin wrote:
> lenive to moc neni, dotazy na jakkoli velke tabulky pres primarni klic
> jsou v setinach az desetinach vteriny (i za soubezneho behu okolo 100
> klientu - virtualnich, kteri to cpou do servru horem dolem - testovaci
> aplikace napsana pred tim, nez jsme uverili, ze to pujde) soucasny
> stav je asi 200 techto klientu, kteri se vsak ptaji poodstatne mene
> casto. soucasne se nacita - denni prisun dat okolo 10ti MB, z toho
> jsou asi polovina zmeny dat, polovina prirustek. klienti jsou pres
> WAN, zcasti online, zcasti satelitem. dalsi soubezny provoz jsou
> analyticke dotazy. tady mohu odezvu jen ztezka popsat, podle
> slozitosti dotazu je ruzna. docela spatne se chovaji joiny vetsiho
> mnozstvi tabulek, nekdy to musime obchazet. nicmene techto dotazu
> probehne za den nekolik desitek. to vsechno plati pro mssql 6.5, se 7
> zatim nejsou vetsi zkusenosti, jen ze pri komplikovanejsich dotazech
> je o dost sviznejsi (spis neni tak lina) pri uvodnich testech jsme to
> zkouseli proti oraclu (uz nevim jake verzi ale byla pred 2.5 roky ta
> aktualni, stejne jako mssql 6.5) ktery bezel na novellu - stejny HW a
> chovalo se to podobne. musim ovsem zcela zaujate podotknout ze podpora
> mistniho zastupeni MS byla proti oraclu excelentni (nezapominejme ze
> slo o velkou a pomerne dulezitou zakazku ve statni sprave) nicmene i
> pote nas ma MS docela rad a kdyz muze, pomuze. nez jsme to napsali,
> malokdo veril, ze to na tom umrnenem pececku pujde :)
To zni urcite zajimave, ale 10M denne, to je giga za pul roku - kdy
se to asi zahlti? Sice me MS SQL stve, ze nema trigger before, ale
jinak jsi mi zvysil muj optimismus.
S pozdravem
Zbysek Hlinka
E-mail: zhlinka(zv)login(tec)cz, localizator(zv)localizator.com
Tel.: 02/795 29 56; GSM: 0603 551 282
Krystofova 1016, 149 00 Praha 4
CZ
Quick report - editace sestav
[*] Jaroslav N�dhera <nadhera(zv)csh(tec)cz> - 24.8.1999 15:27:59
> Ostatne, pouzivat QR bez zdroju (tzn. zakoupeni) je
>hazard, neb jsou plne chyb. QR se daji pouzit az po rucni oprave a
>vylepseni, pak jsou docela dost dobre.
>
Stejne je to nespravedlive, ze QR se prodava s chybama a kdyz ja udelam
nejaky soft a je v nem chybicka, tak mi jej uzivatele omlacuji o hlavu (i ty
chyby QR)
J. Nadhera
Listbox & Ok
[*] Robert Jendrisak <delphi(zv)minv.sk> - 24.8.1999 15:36:30
> Hi.
> Prosim o pomoc s nasledujicim problemem.
>
> Mam formular, ve kterem je tlacitko otevirajici dalsi formular
> (Form1.ShowModal).
> V tomto formulari mam dve tlacitka OK a Zrusit a ListBox.
> Potrebuji, aby po dblclicku v listboxu se provedla akce shodna s reakci na
> tlacitko OK.
> U tlacitka mam nastavenou vlastnost ModalResult na mrOk, ktera je vracena
po
> ukonceni formulare.
> Tu samou hodnotu tedy potrebuji po dblclicku v listboxu.
>
> Dekuji.
Co tak stlacit F1 na slove listbox?
Su tam 2 pekne exampleses ako spravit presne to co pises
Werki
PS: Am back from the vocation...yeah
BDE a nedostatek voln�ho m�sta
[*] Jirka <jnagy(zv)nh-trans(tec)cz> - 24.8.1999 16:05:19
Zda se mi, ze ted se to uz nikde nepise, ale v dokumentaci k staremu
dobremu Paradoxu 3.5 byla zminka, ze pro uspesne vykonani dotazu na
jedne tabulce by na disku melo byt cca 1.5 (nebo 2.5???) krat vice
volneho mista jako zabira tabulka. Nicmene pri dotazu na nekolik
tabulek se mi stavalo, ze i ctyrnasobek nejvetsi tabulky bylo malo.
Protoze BDE vychazi z byvaleho Paradox Enginu, predpokladam, ze tento
pozadavek plati stale.
Jirka.
-----P�vodn� zpr�va-----
>m�m 380MB velk� DBF tabulky v n�kolika m�lo souborech. Nicm�n� semi
n�kdy
>st�v�, �e a� m�m na disku st�le volno cca 150-200 MB, BDE mi hl�s�
>nedostatek voln�ho m�sta na disku. A ani tam samoz�ejm� nevykon�v�m
��dn�
>operace, kter� by tomu odpov�dali, vet�inou se jedn� o velice
jednoduch� SQL
>p��kazy, kter� vracej� n�kolik m�lo kilo.
>
>Nem�te n�kdo podobn� zku�enosti.
OffTopic: Licencni politika - mala poznamka (was:
[*] Martin Kubecka <martin.kubecka(zv)amenit(tec)cz> - 24.8.1999 16:47:06
Nerad bych tu vyvolal nejaky flamewar, ale trh SQL serveru dnes ovlada Oracle
nasledovany MS SQL a tendence je takova, ze se to IMHO bude spise jen
prohlubovat ve prospech techto firem. Oracle je namakany, ale drahy a MS SQL uz
ve verzi 7 nevypada tak zle a pomer cena/vykon ma podle 'nezavislych MS testu'
;-) nejlepsi - u MSDE rozhodne (tzn. sit o cca 5 userech, protoze je to free).
A pokud bude MSDE soucast W2k tak ho asi tezko neco zastavi ;-). Podle me zbytek
SQL serveru bude mit 'tezke chvilky' a nevim nevim, jestli je dokaze udrzet par
'skalnich' nad vodou.
Samozrejme ze se furt objevuji novi vyvojari, ale kdyz budou pred sebou volbu
dejme tomu technologicky stejnych databazi a jedna bude zadarmo a asi tezko
zkrachuje (ano, mam na mysli MS SQL ;-) tak co si vyberou?
Mac
P.S. Samozrejme nejsem zcela objektivni, protoze znam trosku MS SQL a neumim a
neznam IB (resp. jednou jsem ji instaloval), takze se prosim nenechte strhnout k
flamewaru - vsimnete si, ze ji nepomlouvam, jen si tak nahlas uvazuju jak to
vlastne muze dopadnout ;-)
Ing. Jaroslav �ke��k wrote:
> Pokud se tak nestane tak tuto platformu oladne MS SQL a Acces.
> Jako-by tuto snahu Inprise chtel Microsoftu usnadnit - uvidime.
--
==============================================================
= Ing. Martin Kubecka - Amenit s.r.o. =
= Na Valech - budova Dytron, 741 01 Novy Jicin =
= telefon/fax: +420 656 706203 mobil: +420 603 265926 =
= http://www.amenit(tec)cz mailto:martin.kubecka(zv)amenit(tec)cz =
= ICQ: 8906773 GSM (SMS): martin.kubecka(zv)sms.paegas(tec)cz =
==============================================================
Tisk vykresu
[*] Jarosek Radim <Radim.Jarosek(zv)rbg2.siemens.de> - 24.8.1999 16:54:00
This message is in MIME format. Since your mail reader does not understand
this format, some or all of this message may not be legible.
Ahoj,
potreboval bych poradit. Mam programek a z toho bych chtel tisknout neco
jako nacrty(vykresy) :-) . K dispozici mam naskenovane nacrty (bmp) a nebo
nacrty v danem programu (excel).Napadla moznost zavolat externe z meho
programu tisk programu a daneho obrazku ve kterem je to delane ale to za
boha nevim jak. Zkousel jsem vytisknout naskenovy obrazek z Repotu v Delphi
ale ten mi vtipne a zabavne obrazek v preview ukazal ale nevytiskl :-)) Kdyz
to dam na form a vytisknu to tak to neni ono.
Jestli jste nekdo neco podobneho delali, prosim help.
specifikace : Delphi 4 PRO, update 2 a 3;
Diky
Radim
mailto:radim.jarosek(zv)rbg2.siemens.de
OffTopic: Licencni politika - mala poznamka (was:
[*] Pavel Medek <talema(zv)top(tec)cz> - 24.8.1999 17:09:36
Oni to odkoukali, ale narozdil od Billa na to nemaji penize. Ono
totiz vyvijet a neprodavat (treba IE) si muze dovolit jenom M$.
Pavel
> To je Biluv stary a uzasne uspesny trik - nikoliv vsak neznamy
> ze sveta jinych technologii. Je to urcity zpusob levne reklamy.
> Lidi se div neporvou o veci, ktere jsou zadarmo. Tim se ale zahackuji.
> Nakonec jim to Bill proda levne, ale po milionech. Ja nechapu, jak
> je mozne, ze to ostatni uz davno neodkoukali a nekopiruji.
>
> Jaro
>
ADO + D5
[*] Martin Kubecka <martin.kubecka(zv)amenit(tec)cz> - 24.8.1999 17:10:37
Zbysek Hlinka wrote:
> Petr Vones wrote:
>
> > > > dalsie) ADO komponenty sa znacne podielali aj na tom, ze Borland
> > > > vobec urobil ADOExpress (je to konkurencny produkt pre jeho MIDAS)
> >
> > ADO RDS ??
>
> Marne ziram do sve Bety, kde tam je RDS. Nebo tohle si uz musi
> kazdy dodelat sam?
Zkus mrknout v helpu k MDAC SDK (u mne v C:\MSDASDK\doc\dasdk.chm) na Remote
Data Services.
> > > modul, jsou tam jeste prime komponenty pro IB, zajimave jsou
> > > take "zalozky" ToDo (poznamky ve zdrojaku, na co je treba se v
No jo, to opraskli s GExperts ;-) Jinak vyborna vec (myslim tim v GExperts -
D5 jsem zatim nevidel ;-)
Mac
--
==============================================================
= Ing. Martin Kubecka - Amenit s.r.o. =
= Na Valech - budova Dytron, 741 01 Novy Jicin =
= telefon/fax: +420 656 706203 mobil: +420 603 265926 =
= http://www.amenit(tec)cz mailto:martin.kubecka(zv)amenit(tec)cz =
= ICQ: 8906773 GSM (SMS): martin.kubecka(zv)sms.paegas(tec)cz =
==============================================================
ADO + D5
[*] Martin Kubecka <martin.kubecka(zv)amenit(tec)cz> - 24.8.1999 17:27:01
Zbysek Hlinka wrote:
> Ve dvou lidech jsem to z celkem pochopitelnych duvodu :-)
> nezkousel. Ale tohle by mela byt castecne zalezitost databaze,
> castecne zalezitost zpusobu, jakym se pres ADO pripojis.
To je castecne pravda. Ale nejak se k tomu musi postavit i samotna
komponenta - reseni typu: tohle uz nekdo zmenil a ted to vsechno zrus a
vypadni neni treba optimalni ;-)
> Kazdopadne co jsem zkousel v OLE DB, je ziskavani informaci o
> aktualne zalozenem autoinkrementu (konkretne na MS SQL).
> Oproti BDE je to pohadkova parada. Jak to resi ADO, jsem jeste
> nezkousel.
No zalezi, jestli to budou dobre resit i v tech komponentach a jak...
> No a co se tyce upravy jednoho zaznamu - delat to v
> DBGridu povazuji za zrudnost, ktere je nejlepsi se vyhnout velkym
> obloukem.
No optimalni to neni, ale na druhou stranu v tom nevidim moc rozdil oproti
treba Tdbedit - teda pokud si sam generujes SQL na insert, edit a delete -
pak podle me muzes kontrolovat ledacos.
> Mohu ti rict z vlastni zkusenosti, ze mam ve svem
> programu zpracovani dat primo v DBGridu, a jsou na to spise
> nepriznive ohlasy od samotnych zakazniku. Takze v dalsi verzi
> bude striktne grid jen k prohlizeni, porizovat se bude v
> samostatnem okne, a vysledek bude poslan do databaze davkove.
Standardne mame moznost obojiho - tzn. at si klient prepne do toho co mu
vyhovuje. Ale je fakt, ze takove lookupy a pod. jsou dost nestastne. A
nekde je DBGrid nepouzitelny a jindy zase naopak vhodny.
> Co se tyka filtru, tak bych dal prednost SQL dotazu, kde si filtr
> primo osetris.
Jiste, ale na druhou stranu - kdyz uz mas na masine vsechny pozadovane
udaje tak proc nepouzit filtr na klientovi - proste nekdy je lepsi filtr a
nekdy WHERE, zalezi na situaci a ja chci mit moznost volby ;-)
> To se ptas na spatnem miste. Ale muzes pockat na reakce od
> tech, kteri ty komponenty budou mit. Vubec me udivuje, proc
No uvidim, pry jsme spadli do prvnich 200 prihlasenych na Delphi Days 99
takze doufam ve slibene CD - 60-ti denni trial Delphi 5 Enterprise - coz by
mohlo na otestovani stacit (aspon ze tak - to to trvalo pane Borland ;-)
Mac
--
==============================================================
= Ing. Martin Kubecka - Amenit s.r.o. =
= Na Valech - budova Dytron, 741 01 Novy Jicin =
= telefon/fax: +420 656 706203 mobil: +420 603 265926 =
= http://www.amenit(tec)cz mailto:martin.kubecka(zv)amenit(tec)cz =
= ICQ: 8906773 GSM (SMS): martin.kubecka(zv)sms.paegas(tec)cz =
==============================================================
MS SQL 7 & Create Table
[*] Martin Kubecka <martin.kubecka(zv)amenit(tec)cz> - 24.8.1999 17:40:20
A nemuzes to spachat transakci z klienta na AfterInsert ? Kdyz to (asi) pres
trigger nejde.
Mac
Zbysek Hlinka wrote:
> Coz o to, za vyzkouseni by to mozna stalo, ale program je
> "masovka" a je otazka, jak by se nekterym spravcum databaze
> libilo, kdybych jim primo k serveru uhnizdil neco takoveho. Jde mi i
> o to, aby transakce vzdy probehla cela nebo vubec. Kdyz to z
> nejakych duvodu spadne mezi mezi ulozenim zaznamu a
> vytvorenim tabulky, je to problem. To abych neustale kontroloval,
> zda tabulka existuje... :-(
--
==============================================================
= Ing. Martin Kubecka - Amenit s.r.o. =
= Na Valech - budova Dytron, 741 01 Novy Jicin =
= telefon/fax: +420 656 706203 mobil: +420 603 265926 =
= http://www.amenit(tec)cz mailto:martin.kubecka(zv)amenit(tec)cz =
= ICQ: 8906773 GSM (SMS): martin.kubecka(zv)sms.paegas(tec)cz =
==============================================================
RepoldBuilder Pro
[*] Jan Naiser <tua(zv)ltm(tec)cz> - 24.8.1999 18:07:38
Preji pekneho dne,
mate nekdo zkusenosti s komponentami ReportBuilder
www.digital-metaphors.com ? Jestlize ano, potom jake. Zajimal by me
treba v porovnani s ostatnimi knihovnami jako Sestavy Sinea nebo Quick
Report.
Dekuji Honza Naiser.
Obrazek pro aplikaci
[*] Burger, Tomas <tomas.burger(zv)sap-ag.de> - 24.8.1999 18:12:57
> -----Original Message-----
> From: MIKE� Premysl [mailto:premysl.mikes(zv)otr.br.ds.mfcr(tec)cz]
>
> Nema nekdo nahodou maly obrazek "Designed for Microsoft
> Windows NT" nebo
Nejsem si jisty, ze takovy obrazek je volne k dispozici...
Neco v tom smyslu napr.
http://www.microsoft.com/NTWorkstation/news/NewsArchive/Oct98/nt5logo.asp
Tomas
ADO bez DataSet
[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 24.8.1999 19:18:17
Matula M wrote:
> Chci se pripojit k nazoru Zbyska Hlinky o nepouzivani DataSetu v
> aplikacich, ktere pracuji s ADO. Ubiram se stejnym smerem a tak mne
> zajima jestli je tu vice takovych lidi a v jakem stavu maji komponety
> typu GRID,EDIT atd. Pouzil nekdo DataGrid, MSHFlefGrid atd. (ActiveX
> od Microsoftu ) a s jakym vysledkem ?
Ja to vidim nejak takto: ADO a OLE DB je celkem rozumne
zapracovat do komponent, protoze s komponentami se preci jen
lepe pracuje nez se surovym ADO (o OLE DB ani nemluvim).
Jestlize jsou ADO komponenty uz postavene nad DataSetem,
prakticky nevidim duvod toho nevyuzit. Moje OLE DB komponenty
nestavim nad DataSetem proto, ze od verze 3 do verze 5 jsou v
teto tride takove rozdily, ze nepovazuji za zvladnutelne (z me
strany) neustale cihat na dalsi rapidni zmeny. Krome toho DataSet
z verzi 3 a 4 (verzi DataSet 5 jsem hloubeji nestudoval a asi to uz
neudelam) povazuji za dosti nevhodny k napojeni na OLE DB,
prinejmensim proto, ze tam je dost komplikovany prevod datovych
toku mezi OLE DB a DataSet. Tohle musi byt i duvod, proc je v
Delphi 5 opet zasadne predelan vnitrek DataSetu, jinak by jim ADO
komponenty moc nepomohly.
Pokud chces vsak delat "rucni" prevody dat do editu, gridu a
podobne, nic ti v tom samozrejme nebrani. :-) Je to ale vetsi
piplacka. Pokud chces postavit nove propojeni, je tu iniciativa
Delphree...
S pozdravem
Zbysek Hlinka
E-mail: zhlinka(zv)login(tec)cz, localizator(zv)localizator.com
Tel.: 02/795 29 56; GSM: 0603 551 282
Krystofova 1016, 149 00 Praha 4
CZ
ADO, MS SQL 7.0 a DBF
[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 24.8.1999 19:18:17
delphi(zv)dingo(tec)cz wrote:
> jak byste nejrychleji pomoci ADO komponent od Adonisu, nebo pomoci
> Zbyskovi komponenty OLE DB prenesly lokalni tabulku *.dbf, *.db do MS
> SQL. Podminka - nepouzit BDE.
Potrebujes ODBC driver pro tyto tabulky. Pak uz je to legrace.
Spojis se s ODBC (+drajvem), najdes si danou tabylku, totez
udelas smerem na MS SQL (tam je to vsak lepsi pres SQLOLEDB)
a jedes. U Paradoxu je ovsem otazka, co to udela, jestlize mas v
hlavicce nastaveny nejaky langdriver.
S pozdravem
Zbysek Hlinka
E-mail: zhlinka(zv)login(tec)cz, localizator(zv)localizator.com
Tel.: 02/795 29 56; GSM: 0603 551 282
Krystofova 1016, 149 00 Praha 4
CZ
Integer to Binary
[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 24.8.1999 19:18:17
Polak Jiri wrote:
> > -----Original Message-----
> > From: Tomas Plevak [mailto:vamp(zv)sol(tec)cz]
> > Sent: Tuesday, August 24, 1999 12:15 AM
> > To: delphi-l(zv)fwd(tec)cz
> > Subject: Re: Integer to Binary
> >
> > > > mame nejakou jednoduchou moznost v Delphi prevadet
> > > > Integer do binarniho tvaru a taky obracene?
> > >
> > > Co mas na mysli? Integer je v binarnim tvaru. Jen je treba
> > se na nej
> > > "spravne" podivat.
>
> :-)
> Tazatel je asi zmaten, ze Delphi konvertuji pri zobrazovani
> cisla do desitkove soustavy. Nezobrazuji cislo, ale pouze jeho
> textovou reprezentaci. I kdybych zobrazoval rimske cislice, Integer by
> byl vzdycky binarni hodnota.
Tazatel (tedy jako ja :) je zmaten dotazem, coze to vlastne chce
Tomas Plevak vedet. Protoze tazatel velice dobre vi, jak je cislo
ulozeno v pameti. :-) Tazatel ma vsak zaroven obavu, ze stejne
zmateni jsou i dalsi odpovidatele, jejichz odpovedi se tak rapidne
lisi. :-)
BTW - zna pripominkovatel (to jako ty :) deklaraci binarnich poli,
kterou umi napriklad C?
> >
> > A to jakpak?
> >
>
> Nejakou formatovaci funkci. Zkusim sesmolit, jde to treba takhle:
>
> //formatuje long pro zaklady 2..16
> function IntToStrB (Val: longint; Base: integer): string;
S pozdravem
Zbysek Hlinka
E-mail: zhlinka(zv)login(tec)cz, localizator(zv)localizator.com
Tel.: 02/795 29 56; GSM: 0603 551 282
Krystofova 1016, 149 00 Praha 4
CZ
IB vs MS SQL
[*] Zbysek Hlinka <zhlinka(zv)login(tec)cz> - 24.8.1999 19:18:17
Pavel Cisar wrote:
> >Nechuti mohu mit treba 1000, ale kdyz jen asi 20% zakazniku je
> >ochotno si koupit s programem i databazi (a ti me urcite neuzivi),
> >tak musim vybrat takove reseni, kterym pokryji i tech zbyvajicich 80%
> >a pritom nebudu muset mit dve verze programu.
>
> Zbysku, Zbysku. Neni kazdy ve tve kuzi a pozici. Dost lidi na tehle
> konferenci pracuje ve firmach a/nebo na projektech, kde je IB i pres
> cenovou politiku zajimava (a mnohdy ta nejlepsi) volba. To, oc tu
> predevsim bezi, je macessky pristup Borlandu ke svemu vlastnimu
> produktu. IB je vskutku dobra databaze a ackoli je soucasti Delphi od
> prvni verze, nativniho pristupu z dilny Borlandu se dockame az nyni, a
> to jeste diky iniciative z venci (IBExpress je zalozen na FreeIB, coz
> je Open Source).
Tohle nepopiram - zaroven vsak odhaduji, ze je tu i dost lidi v me
pozici. Kdyby totiz byli vsichni v me pozici, tak by Inprise neprodal
ani kus - coz se evidentne nedeje. :-) Jde o to, ze Inprise zmaril
jedinecnou sanci zahackovat vyvojare a jejich zakazniky i na me
urovni. Cimzto me nastvali a co jim vlastne vytykam.
> BTW, pokud se domnivas, ze jsi to s MS a MSDE vyhral, budiz, ale nebyl
> bych si tak jisty. Cenove je to mozna vyhodne (zatim), ale MSDE a
> SQLServer (i ve verzi 7) neni jednoznacnym vytezem na cele care (jen v
> nekterech oblastech a pripadech pouziti), a ma rovnez sve vlastni
> problemy. Totez se tyka ADO a OLE DB. Je to sice lepsi nez BDE, ale
> mezi slepymi je i jednooky kralem. Bude to trvat jeste nejmene dva
> roky, nez to bude opravdu dobre, snadno pouzitelne a vubec. Je jen
> fajn, ze jsi se za nas chopil role prukopnika, vubec ti to nezavidim
> :-) Doufam ze mas pravdu (pro sebe) alespon do te miry, ze uspejes a
> ze nezazenes sam sebe do rohu. Nicmene, bylo by fer kdyby jsi uznal,
> ze jsou i jine moznosti, jine situace a potreby, ve kterych tve
> premisy neplatni bud vubec nebo jen z casti.
:-) Problemy OLE DB zde vidim mozna nejlepe. O nekterych
problemech MS SQL vim take. Odhaduji, ze se pohybuji nekde na
stredni urovni "databazove potrebnosti", tedy pokryvam oblast
zakaniku, kterym staci mensi objem dat, a zaroven se dotykam
oblasti zakazniku, kteri uz potrebuji vetsi objemy, ale jeste to
nejsou gigabajty ci dokonce terrabajty. Ta meneobjemova cast se
dosud pokryvala Paradoxem, dBase, Accessem a podobne. U tech
viceobjemovejsich uz souborove databaze selhavaji a ti potrebuji uz
SQL server nizsi tridy (coz je MS SQL, Sybase Anywhere, IB).
Kdyz vidim, kolik jeste beha foxek a podobnych databazi, vyvozuji
z toho, ze v podobne situaci jako ja je dost vyznamna cast vyvojaru
a uzivatelu. Mel bys to znat - na ucetni SW pro male a stredni
firmy je nasazeni MSDE primo idealni, a pritom mas otevrene dvere
i do vetsich firem, kde se toci vetsi mnozstvi dokladu denne. Male
firmy mohou casem vyrust, a ty jim muzes nabidnout diky tomuto
dobremu licencovani bezbolestny prechod o uroven vyse.
S pozdravem
Zbysek Hlinka
E-mail: zhlinka(zv)login(tec)cz, localizator(zv)localizator.com
Tel.: 02/795 29 56; GSM: 0603 551 282
Krystofova 1016, 149 00 Praha 4
CZ
Visualni dedicnost a TToolBar
[*] Lukas Voborsky <xvobl03(zv)sorry.vse(tec)cz> - 24.8.1999 19:19:41
Ahojte,
Nemate nekdo zkusenost se %subj%? Konkretne jde o to, ze v predkovi
formulare mam ToolBar a na nem par buttonku. Jeden z nich ma Visible false
(design time). Predstava je takova, ze nekteri potomci si nastavi v design
timu (nebo jindy) nastavi Visible na true.
Jenze tomu se IDE brani zuby nehty. Nastavim Visible true, ulozim, otevru a
Visible je zase false. V dfm filu to po otevreni proste zmizi. (Pokud
zkompiluju hned po ulozeni, tak je to o.k.)
Nejlepsi na tom je, ze se tak nedeje u vsech buttonu :-(
Da se to samozrejme obejit tim, ze ten button bude existovat az na tech
potomci, co ho potrebujou visible. Tam je ale problem, ze buttony lze v
potomcich pridavat pouze nakonec.
Dalsim problemem, ktery se objevuje v situaci, ze nektere buttony je treba
behem behu schovat a zase zobrazit, coz se ma dit v predkovi, je
toto.
Predchozi veta dava smysl. V tom problem netkvi.
Preblem je v tom, ze je treba schovat i ToolButton se Stylem tbsSeparator.
TbSeparator.Visible:=false;
if not TbSeparator.Visible then ShowMessage('kuk');
Myslite, ze se zobrazi okenko 'kuk'? Nezobrazi. :-(
Myslim, ze jsou proste veci mezi nebem a zemi...
Presto, kdybyste nekdo vedel nejakou radu, byl bych vam zauzlovan.
Lukas
-==============================================================-
mailto: voborsky(zv)menza.mff.cuni(tec)cz ICQ: 21084410
www: http://come.to/voborsky tel. 8551040-9 l. 393
-==============================================================-
Obrazek pro aplikaci
[*] Zdenek Drvota <drvota(zv)zds(tec)cz> - 24.8.1999 18:41:51
...a co treba se podivat na www.microsoft.com ?
Aspon ja bych to tam hledal :-)
### MIKE� P�emysl napsal dne 24 Aug 99, v 14:00 :
> Nema nekdo nahodou maly obrazek "Designed for Microsoft Windows NT" nebo
> "Designed for Windows 98", pripadne jako animovany gif? Jestli jo, tak to
> prosim poslete prilohou na muj mailbox. -diky-
>
>
> *****************
> Premysl Mikes
> programator-syntetik
> mailto:premysl.mikes(zv)otr.br.ds.mfcr(tec)cz
>
>
>
>
-----------------------------------------------
Ing. Zdenek Drvota e-mail: drvota(zv)zds(tec)cz
director
ZDS, spol. s r.o.
Hronovicka 708 tel:+420-40-6613756
530 02 Pardubice fax:+420-40-6613756
Czech Republic http://www.zds(tec)cz
e-mail: info(zv)zds(tec)cz
Internet proti monopolu http://www.bojkot(tec)cz
Pripojte se k hledani mimozemskych civilizaci:
SETI(zv)Home http://setiathome.ssl.berkeley.edu
RepoldBuilder Pro
[*] Leos Urban <Leos.Urban(zv)aitix(tec)cz> - 24.8.1999 19:53:05
> mate nekdo zkusenosti s komponentami ReportBuilder
> www.digital-metaphors.com ? Jestlize ano, potom jake. Zajimal by me
> treba v porovnani s ostatnimi knihovnami jako Sestavy Sinea nebo Quick
> Report.
Pri nasem internim "vyberovem rizeni" vyhral RB Pro a pred tydnem jsme jej
koupili.
Pro nase potreby je optimalni volbou a az bude dodelan RAP (aplikacni jazyk
pro pouziti v sestavach) tak uz to nebude mit chybu.
Cena je ovsem pomerne vysoko. Zalezi, co od toho chces.
Leos
Web aplikace pomoci Delphi
[*] Polak Jiri <Jiri.Polak(zv)tconsult(tec)cz> - 24.8.1999 20:02:02
> -----Original Message-----
> From: Z�vada Ji�� [mailto:zavada(zv)atcomp(tec)cz]
> Sent: Tuesday, August 24, 1999 2:27 PM
> To: 'delphi-l(zv)fwd(tec)cz'
> Subject: RE: Web aplikace pomoci Delphi
>
> V Delphi (ale od verze 3, jen v C/S) je k dispozici volba tvorby
> WebServrove aplikace - zrejme mas verzi Std nebo Profi, tak bych videl
:-)
WebServerova aplikace je uz trochu jiny pojem nez Web aplikace.
Mam verzi 4 C/S.
> srozumitelnou pricinu Tveho nepochopeni. Web server aplikace
> je asi v tomto
> kontextu chapana jako uzivatelsky (programatorem)
> konfigurovatelna nadstavba
> nad nejakym standardnim WWW serverovym produktem, ktera pomoci
> standardizovanych programatorskych rozhrani prizpusobi jeho
> chovani tak, aby
> poskytoval funkcnost pozadovanou zadavatelem. Delphi podporuje tvorbu
> takovych aplikaci podle standardu CGI, WinCGI (*.exe) a ISAPI
> (*.dll), dale
> je mozno vyuzit schopnosti Delphi vytvaret OLE Automation
> servery a tak
> vytvorit ASP komponentu, ktera se pak konvencne vyuzije v kodu ASP.
Diky, to presne jsem mel na mysli tim, abys upresnil, jakou technologii
chces pouzivat.
Webova aplikace je totiz tak siroky pojem, ze jsem nevedel, co mas na mysli.
Jestli chces pouzivat COMy, instancovane v ASP na IIS, tak bych Ti mozna
mohl poradit,
s tim jedinym z rodiny "WEB aplikaci" mam trochu zkusenosti
Jenomze to neni aplikace napsana v Delphi, podstatnou cast te aplikace totiz
tvori
Web Server a v Delphi muzes vytvorit pouze par komponent.
> > nenasel. A nerozumim tomu "zda se nekde realne poziva ve
> vetsim nasazeni"
> > - to znamena jestli existuje vice provozovanych instalaci
> teto aplikace,
Tady to by asi zaslouzilo trochu rozvest, protoze termin "vetsi nasazeni" je
mi opravdu nejasny.
pokud by se melo jednat o aplikaci, ke ktere by pristupovaly desetitisice
registrovanych uzivatelu,
tak by to mohl byt problem, protoze k autorizaci tech uzivatelu pomoci IIS
je nutne mit ve Win NT
na serveru s IIS pro kazdeho z nich lokalni ucet. Coz je dost omezujici.
Pokud by to ale znamenalo
zatez vetsim poctem neregistrovanych uzivatelu (rekneme aplikace typu
AltaVista), mohlo by to byt
mozna zajimavejsi.
Takze to byly dve pripominky, abys upresnil, co vlastne chces, protoze z
nepreberneho
poctu moznosti si pojem Web aplikace kazdy predstavuje trochu jinak a "vetsi
nasazeni" je
take dost nekonkretni.
Ted vidim, ze jsem se v prvni odpovedi asi spatne vyjadril, omlouvam se.
>
> P.S. Pokud by ti slo o napsani vlastniho WWW serveru, i
> to Delphi
> svedou ...
Myslim, ze Delphi to napsat nesvedou :-)
Ty to akorat tak zkompilujou.
Jura
-------------
Email: Jiri.Polak(zv)tconsult(tec)cz
Co mne nastvalo a na co si dejte pozor:
http://freeweb.coco(tec)cz/jpolak/cernalistina/Integer to Binary
[*] Polak Jiri <Jiri.Polak(zv)tconsult(tec)cz> - 24.8.1999 20:10:06
> -----Original Message-----
> From: Zbysek Hlinka [mailto:zhlinka(zv)login(tec)cz]
> Sent: Tuesday, August 24, 1999 7:18 PM
> To: delphi-l(zv)fwd(tec)cz
> Subject: RE: Integer to Binary
>
>
> Polak Jiri wrote:
>
> > > -----Original Message-----
> > > From: Tomas Plevak [mailto:vamp(zv)sol(tec)cz]
> > > Sent: Tuesday, August 24, 1999 12:15 AM
> > > To: delphi-l(zv)fwd(tec)cz
> > > Subject: Re: Integer to Binary
> > >
> > > > > mame nejakou jednoduchou moznost v Delphi prevadet
> > > > > Integer do binarniho tvaru a taky obracene?
> > > >
> > > > Co mas na mysli? Integer je v binarnim tvaru. Jen je treba
> > > se na nej
> > > > "spravne" podivat.
> >
> > :-)
> > Tazatel je asi zmaten, ze Delphi konvertuji pri zobrazovani
> > cisla do desitkove soustavy. Nezobrazuji cislo, ale pouze jeho
> > textovou reprezentaci. I kdybych zobrazoval rimske cislice,
> Integer by
> > byl vzdycky binarni hodnota.
>
> Tazatel (tedy jako ja :) je zmaten dotazem, coze to vlastne chce
> Tomas Plevak vedet. Protoze tazatel velice dobre vi, jak je cislo
> ulozeno v pameti. :-) Tazatel ma vsak zaroven obavu, ze stejne
> zmateni jsou i dalsi odpovidatele, jejichz odpovedi se tak rapidne
> lisi. :-)
Nejak se nam to zasmodrchalo. :-)
Oh No! Dal jsem to sice za Tvou rec, ale v tehle konverzaci je prece tazatel
Tomas Plevak, Ty jsi odpovidatel. Odpovidal jsem po Tobe, protoze jsem uz
zapomnel,
ostatni rady a myslel jsem, ze jsem Tomase pochopil. Proto jsem mu
poskytl radu, jak ma cislo zobrazit ve dvojkove soustave.
Jura
-------------
Email: Jiri.Polak(zv)tconsult(tec)cz
Co mne nastvalo a na co si dejte pozor:
http://freeweb.coco(tec)cz/jpolak/cernalistina/Zjisteni new_id po Insert v Tquery
[*] Ing. Jaroslav �ke��k - 24.8.1999 20:46:10
Zatim jsem tento problem neresil, protoze na IB zakladam
nove zaznamy pomoci ulozenych procedur a nove ID si
vratim pomoci output parametru.
Nedavno jsem na teto konferenci cetl prispevek o moznosti
zjisteni ID v TQuery, ktere je generovane trigrem.
Zaujalo me, ze se to tykalo Interbaze (jestli se nepletu).
Vim, ze na MS SQL je to celkem snadne,
Drive jsem si ale myslel ze u IB to nejde.
Bohuzel ten clanek nemohu najit. Neozval by se jeho autor znovu?
Jaro
//////
( o o )
------------------------oOO--( )--OOo------------------------
SINEA software, Ing Jaroslav �ke��k, �AMBERK
e-mail: jaro(zv)sinea(tec)cz http://www.sinea(tec)cz
phone: 0446 612468, mobile phone: 0602 581255
----------------------------------------------------------------------
Problem v IDE
[*] Milan Schembera <milan(zv)missoftware(tec)cz> - 24.8.1999 20:52:05
Ahojte lidicky,
netusite nekdo nahodou, jak dostat maximum z poskozeneho formulare -
souboru DFM ? Spadl mi disk a tenhle jediny formular je poskozeny, shodou
okolnosti ten nejslozitejsi. Pri snaze o otevreni mi Delphi 4 hlasi "Stream
read error". Jelikoz se mi to stalo v dobe, kdyz jsem jeste nemel ZIPku,
nemam zalohu a je mi jasny, ze to asi budu muset udelat znovu. Nicmene jsem
tvor svym zpusobem liny a chtel bych si aspon trosku usetrit praci.
Za kazdou radu diky moc ...
Preji hezky den a jsem s pozdravem
Milan Schembera
mailto:info(zv)missoftware(tec)cz
http://www.missoftware(tec)cz
---------------------------------
- on-line objednavkove, rezervacni a obchodni systemy po internetu
- zakazkovy software pro Windows 3.x/9x/NT
- software pro autoskoly http://www.autoskola99(tec)cz
- servis pro autopujcovny http://www.auto-pujcovny(tec)cz
TStrings
[*] Tomas Matousek <matousek(zv)havit(tec)cz> - 24.8.1999 21:08:33
Oh sorry. To jsem prehlidl.
Tomas Matousek
matousek(zv)havit(tec)cz
>Oprava drobneho detailu:
>
>> Drobny detail:
>> ad 1) To prirazeni nic nekopiruje. Jenom zmeni ukazatel S na Memo1.Lines.
>> Kopiruje se metodou Assign.
>
> TCustomMemo = class(TCustomEdit)
> .
> property Lines: TStrings read FLines write SetLines;
> .
>
>procedure TCustomMemo.SetLines(Value: TStrings);
>begin
> FLines.Assign(Value);
>end;
>
>Takze prirazeni opravdu kopiruje !
>
> McLEI
>TStrings
[*] Tomas Matousek <matousek(zv)havit(tec)cz> - 24.8.1999 21:09:51
My se nehadame, my diskutujme (resp. doplnujeme informace).
Tomas Matousek
matousek(zv)havit(tec)cz
>
>----- Original Message -----
>From: Michal Leinweber <M.Leinweber(zv)sh.cvut(tec)cz>
>To: <delphi-l(zv)fwd(tec)cz>
>Sent: 23. srpna 1999 22:14
>Subject: RE: TStrings
>
>
>> Oprava drobneho detailu:
>>
> .
> .
> .
>Co kdyby jste se proste smirily s tim, ze TMemo neumi vic nez 64kb znaku
>a prestali se hadat o tom, jak funguje prirazovani.
>
>Co takhle pouzit TRichEdit a nastavit mu PlainText na True?
>
>I.C.
>Pavel Vodicka - InComp
>e-mail: vodicka(zv)incomp(tec)cz, incomp.delphi(zv)post(tec)cz
>homepage: www.incomp(tec)cz
>ICQ: 36252507
>
>
>Tisk vykresu
[*] Tomas Matousek <matousek(zv)havit(tec)cz> - 24.8.1999 21:39:23
BMP a jinou grafiku muzes tisknout tak, ze ji nakreslis na Canvas tiskarny.
Printer.BeginDoc;
with Printer.Canvas do
begin
...
end;
Printer.EndDoc;
Dalsi vuz napoveda k objektu TPrinter.
Jinak z Wordu muzes tisknout takhle:
var Word:Variant; //nejlepe globalni promenna
...
Word:=CreateOLEObject('Word.Basic');
Word.AppShow;
Word.FileOpen('C:\X.doc');
Word.FilePrint;
V Excelu to snad bude podobny.
Tomas Matousek
matousek(zv)havit(tec)cz
>Ahoj,
>potreboval bych poradit. Mam programek a z toho bych chtel tisknout neco
>jako nacrty(vykresy) :-) . K dispozici mam naskenovane nacrty (bmp) a nebo
>nacrty v danem programu (excel).Napadla moznost zavolat externe z meho
>programu tisk programu a daneho obrazku ve kterem je to delane ale to za
>boha nevim jak. Zkousel jsem vytisknout naskenovy obrazek z Repotu v Delphi
>ale ten mi vtipne a zabavne obrazek v preview ukazal ale nevytiskl :-))
Kdyz
>to dam na form a vytisknu to tak to neni ono.
>
>Jestli jste nekdo neco podobneho delali, prosim help.
>
>specifikace : Delphi 4 PRO, update 2 a 3;
>
>Diky
>
>Radim
>
>
>mailto:radim.jarosek(zv)rbg2.siemens.de
>
>OffTopic: Licencni politika - mala poznamka
[*] Ing. Jaroslav �ke��k - 24.8.1999 22:04:48
> :-))) Neumim si predstavit programatora, ktery dvakrat za rok zahaji
> novy projekt, a pokazde v necem jinem. Jednou v Delphi, jednou v
> C, jednou ve VB, jednou v PowerBuilderu... Tohle muze dopadnout
> jenom spatne. Kdyz zacnu novy projekt, tak v nastroji, ktery dobre
> ovladam. Pokud se rozhodnu pro zmenu nastroje, tak k tomu (a
> zejmena s pribyvajicimi lety) musim mit sakra dobry duvod, a
> perspektivu, ze dale budu pokracovat uz jen v tom. Takze podle
> nastroje si vybiram i projekty. Neberu tedy projekty na vyrobu
> drajvu, programy pro Win 3.1 a DOS a podobne.
---
Takhle jsem to samozrejme nemyslel. Chtel jsem rici, ze dnes jako
v budoucnu - stale jde a pujde o pretazeni vyvojaru - tedy nejenom
zacinajicich. Semozrejme nikdo nebude menit vyvojovy nastroj
dvakrat do roka, ale to neznamena, ze zmena neexistuje. Meni se
podminky, zadani a pod. - a na co drive stacila Dbase nebo Fox-ka,
na to se hledaji nove nastroje. Nove nastroje hledaji a budou hledat
i zkuseni vyvojari. Tim chci rici, ze pro nekoho jeste neni pozde.
Tou "dobrou technologii" ja myslel zejmena Delphi, i kdyz nestezuji si ani
na Interbazi. V dobe, o ktere pises, kdy byla IB v plenkach, nebyl ani
MS SQL nic moc a Oracle byl o kategorii drazsi.
> Na skolenich je napriklad videt hromadny uprk od Foxky - zrejme
> prestava vyhovovat pozadavkum doby. Potkal jsem na skoleni lidi
> (tohle se tyka primo Inprise, ledacos jsem jim uz rekl, ale myslim
> ze neskodi to vytroubit i verejne), kteri tam prisli jen proto, aby si
> otestovali, zda prejit na Delphi nebo ne. Jsem presvedcen o tom,
> ze ne vsichni odchazeli s presvedcenim, ze Delphi je ta spravna
> alternativa. A neni to jenom tim, ze jsem je nedokazal ukecat, ale i
> dalsimi vecmi - chybove komponenty (zejmena databazove),
> komplikovanost a prebubrelost BDE, spatna licencni politika.
> Doufam, ze ted s komponentami ADO se mi bude darit ponekud
> lepe. :-) Ale zase je tu chybne licencovani. Na skolenich vykladam
> lidem, aby ve vlastnim zajmu opustili programovani nad
> souborovymi databazemi, a presli na SQL - a popisuju
> hruzostrasne historky, ktere jsem osobne zazil s Paradoxem. :-)
> Co jim dnes mohu nabidnout jako vetsinove vhodnou alternativu -
> IB? Tezko. Je to MS SQL 7. A klidne bych IB propagoval, kdyby to
> bylo aspon trochu mozne. Ale nemohu nabizet neco, co jsem sam
> opustil.
---
Patrim tez mezi velke propagatory C/S. Znam hodne byvalych Fox-karu.
Mnozi jsou nasimi zakazniky, protoze generator Sinea jim trochu pripomina
generator z Fox-ky. Ja jsem tez byvaly programator FoxPro.
K Delphi jsem ovsem presel uz od 16-bit verze D1 a urcite jsem toho
nikdy nelitoval. Od D1 k D5 je obrovsky pokrok, takze nyni by rozhodovani
melo byt snadnejsi. Asi se shodneme, ze Delphi ma velmi dobry zaklad
v prekladaci i v povedenem systemu VCL.
BDE bylo a je problemove. Duvodem je predevsim jeho znacna univerzalnost
a rozsahlost. Dovedu si predstavit jak se takova ruznorodost tezko "lepi"
dohromady. Myslim, ze to nebylo nutne. Proto se mi libi, ze v D5 je
prime napojeni IB - to je o necem jinem. Myslim, ze takto se mohlo
postupovat
od zacatku. Vzdyt Delphi je tak pekna stavebnice. Nekdo mohl kupovat
primy pristup k IB, nekdo k MS SQL k Oracle a pod. Kazdy mohl myt
svoje efektivni komponenty. BDE mohlo slouzit pouze jako docasny prechodovy
stupen pro Xbase tabulky. Jenze po valce je kazdy generalem.
O srovnavani s VB se tu snad nemusime bavit, ovsem v oblasti serveru -
to uz je jine tema.
Co se tyka serveru, tam je situace jina a konkurence daleko vetsi.
Take si myslim, ze se k vlastni IB Inprise chova trochu macessky a docela
ignoruje to obrovske tazeni s MS SQL 7, coz je jiz (zda se) velmi dobry
stroj.
Jedinou reakci asi bylo vyznamnejsi snizeni cen single verze. to ale nebude
stacit.
Proto jsem velmi zvedav na politiku s IB6. Pokud se licencni podminky
nezmeni, tak by to opravdu take mohla byt jedna z poslednich verzi.
To bych byl ovsem nerad, a proto doufam, ze si u Inprise jsou tohoto
nebezpeci vedomi .
> > To je Biluv stary a uzasne uspesny trik - nikoliv vsak neznamy
> > ze sveta jinych technologii. Je to urcity zpusob levne reklamy.
> > Lidi se div neporvou o veci, ktere jsou zadarmo. Tim se ale zahackuji.
> > Nakonec jim to Bill proda levne, ale po milionech. Ja nechapu, jak je
> > mozne, ze to ostatni uz davno neodkoukali a nekopiruji.
>
> Ja vim, ze tento trik je znamy. Vzdyt ho zna i Inprise, protoze na
> tomhle vyrostl Turbo Pascal. Ale nechapu, ktery cert jim naseptal,
> ze je vhodne ho opustit - asi se v te dobe citili prislis silni v
> kramflecich. Dusledky jsou dnes videt...
---
Turbo Pascal - to byla parta nadsencu, kterym vic nez o byznys slo
asi o vlastni dilo. Velky byznys vyvoj zpravidla tlaci opacnym smerem.
System se musi "valit" rychle dopredu a kvalita tim nekdy pokulhava.
Co se tyka kvality, je to u Billa videt take. Jenze ten nezapomnel na
uspech s DOS-em a svych zasad se stale drzi. Mistrne "podstrkuje"
lidem sve produkty a zvetsuje sve imperium.
Tesim se na dobu, kdy Inprise take neco "podstrci",
aby tak zvetsil sve imperium a tim i okruh nasich zakazniku.
Jaro
Problem v IDE
[*] Ing. Jaroslav Ske��k - 24.8.1999 22:21:14
Otevri si ho v editoru. Mozna zjistis, co chybi.
Pokud toho ale chybi hodne, pravdepodobne vytvoreni noveho
formulare da mene prace.
Jaro
> Ahojte lidicky,
>
> netusite nekdo nahodou, jak dostat maximum z poskozeneho formulare -
> souboru DFM ? Spadl mi disk a tenhle jediny formular je poskozeny, shodou
> okolnosti ten nejslozitejsi. Pri snaze o otevreni mi Delphi 4 hlasi
"Stream
> read error". Jelikoz se mi to stalo v dobe, kdyz jsem jeste nemel ZIPku,
> nemam zalohu a je mi jasny, ze to asi budu muset udelat znovu. Nicmene
jsem
> tvor svym zpusobem liny a chtel bych si aspon trosku usetrit praci.
>
> Za kazdou radu diky moc ...
>
> Preji hezky den a jsem s pozdravem
>
> Milan Schembera
> mailto:info(zv)missoftware(tec)cz
> http://www.missoftware(tec)cz
> ---------------------------------
> - on-line objednavkove, rezervacni a obchodni systemy po internetu
> - zakazkovy software pro Windows 3.x/9x/NT
> - software pro autoskoly http://www.autoskola99(tec)cz
> - servis pro autopujcovny http://www.auto-pujcovny(tec)cz
>Integer to Binary - KONEC - beru zpet
[*] Tomas Plevak <vamp(zv)sol(tec)cz> - 24.8.1999 22:31:10
Hello,
hadku jsem vyvolat nechtel a omlouvam se za ne zcela
jasne polozenou otazku. Jednalo se mi o to, jestli nahodou
neexistuje funkce na prevod z dekadicke soustavy
do binarni pomoci jednoho JEDINEHO prikazu jako
napr: prevod cisla na string pomoci IntToStr. Jak vidim,
tak neexistuje. Jinak vlastni prevod (vlastnim vypoctem)
zvladnu sam (to si opravdu ze skoly jeste pamatuju ;-)))
Takze vsem zucastnenym dik a jeste jednou sorry.
> > > > > > mame nejakou jednoduchou moznost v Delphi prevadet
> > > > > > Integer do binarniho tvaru a taky obracene?
> > > > >
> > > > > Co mas na mysli? Integer je v binarnim tvaru. Jen je treba
> > > > se na nej
> > > > > "spravne" podivat.
> > >
> > > :-)
> > > Tazatel je asi zmaten, ze Delphi konvertuji pri zobrazovani
> > > cisla do desitkove soustavy. Nezobrazuji cislo, ale pouze jeho
> > > textovou reprezentaci. I kdybych zobrazoval rimske cislice,
> > Integer by
> > > byl vzdycky binarni hodnota.
> >
> > Tazatel (tedy jako ja :) je zmaten dotazem, coze to vlastne chce
> > Tomas Plevak vedet. Protoze tazatel velice dobre vi, jak je cislo
> > ulozeno v pameti. :-) Tazatel ma vsak zaroven obavu, ze stejne
> > zmateni jsou i dalsi odpovidatele, jejichz odpovedi se tak rapidne
> > lisi. :-)
>
> Nejak se nam to zasmodrchalo. :-)
>
> Oh No! Dal jsem to sice za Tvou rec, ale v tehle konverzaci je prece
tazatel
> Tomas Plevak, Ty jsi odpovidatel. Odpovidal jsem po Tobe, protoze jsem uz
> zapomnel,
> ostatni rady a myslel jsem, ze jsem Tomase pochopil. Proto jsem mu
> poskytl radu, jak ma cislo zobrazit ve dvojkove soustave.
Se srdecnym pozdravem Tomas Plevak
E-mail : vamp(zv)sol(tec)cz
ICQ : 6621919