Delphi

česky | english

Online 132 uživatelů Přihlášení | Registrace | Zaslat heslo | Prohlížení bez přihlášení

Delphi [ ID: 1576 ] - [ Počítače (hardware, software) / Programování ]

1 / 48

Mini Home

DELPHI a KYLIX
Rady, návody a hlavně pomoc.
Torry - asi nejvetsi archiv Tipu a Triků, komponent a dalsich veci do DELPHI
Delphi.cz - Ceska sajta pro vyvojare s mail listem
www.delphibasics.com - návody a rady v angličtině (dobrá stránka)

http://www.logicalgenetics.com/
http://www.delphiforfun.org/Programs/
http://www.zive.cz/h/Programovani/Ar.asp?ARI=110213&CAI=2091
http://www.compuphase.com/
http://www.planet-source-code.com/
http://www.marcocantu.com/edelphi/
http://www.marcocantu.com/edelphi/
http://delphi.about.com/
http://www.delphi32.com/
http://www.torry.net/
http://www.delphibasics.co.uk/
http://delphicity.net/catalogue/
http://www.efg2.com/
http://www.programmersheaven.com/zone2/index.htm
http://www.gnomehome.demon.nl/uddf/
Tisk do presnych souradnic

http://www.lazarus.freepascal.org

Jak se správně ptát

Další odkazy na HOME

	YODA 23:19:16 03.01.2018
	Zdravím, nahodou nekdo s Delphi a zkušenostma s fungujícím POST na tu NetHTTPRequest komponentu. Za boha mi nejde udělat POST JSON Objectu, na serveru mi to stále hlásí že posílám GET atd. Zjednodušené volání ... NetHTTPRequest.Post(url, TStringStream.Create(request.ToString, TEncoding.UTF8)); request je korektní JSOBObject ?

	OROPHER 20:57:28 08.05.2013
	dobry vecer. prosim, nekdo zkuseny, kouknete se na PŘÍSPĚVEK

	JERRY15 11:56:14 22.03.2013
	PEPAK [ 15:33:38 21.03.2013 ]: V podstatě jo. Potřebuju otevřít pokladní zásuvku. Už jsem to předělal na výběr tiskáren z comba a ano posílám to rovnou na tiskárnu.Jen jsem prostě nechtěl předělávat starou funkcionalitu, protože ani netuším proč tam je

PEPAK 15:33:38 21.03.2013

JERRY15 [ 14:59:21 21.03.2013 ]: A jsi si jistý, že opravdu chceš "dozvědět se port a z něj odvodit tiskárnu"? Není náhodou tvůj problém o tom, že chceš na uživatelem vybranou tiskárnu poslat nějaký konkrétní (binární) řetězec? Protože to by přesně odpovídalo tomu, co jsem psal o přístupu Windows - tebe nemají co zajímat porty, ty si máš říct Windows, aby pro tebe něco udělaly se zařízením XY, bez ohledu na to, na jakém portu to zařízení je. Zrovna poslání binárního řetězce na tiskárnu jde docela snadno, aniž by člověk musel vědět cokoliv o tom, k čemu a jak je ta tiskárna připojená...

	JERRY15 14:59:21 21.03.2013
	PEPAK [ 14:41:24 21.03.2013 ]: Zkusím no. Jinak to má historické hledisko - nechci hrabat do "funkčního kódu" po bývalém kolegovi. Jen ho potřebuju rozšířit o USB porty :/

PEPAK 14:41:24 21.03.2013

Zeptej se možná radši tady: http://forum.delphi.cz
Tady to moc nežije.

Když si zítra vzpomenu, tak bych tomu snad pár minut věnovat mohl. Ale spíš bych si tipnul, že to bude potřebovat nějaký ošklivý hack (protože Windows řady NT staví odjakživa na oddělení programu od hardwaru, a za těchto okolností je velká otázka, proč by aplikaci mělo zajímat, jaký port tiskárna používá. Aplikace by měla fungovat tak, že si od uživatele nechá určit tiskárnu a pak s touto tiskárnou pracuje, ne tak, že se bude zabývat nějakými porty...)

	JERRY15 14:33:58 21.03.2013
	Nesetkal jste se někdo s tímto problémem? Potřeboval bych na základě vybraného portu (EnumPorts) zjistit, zda je na něm připojena tiskárna a pokud ano, tak její název.

SAMUELSUMEC 21:52:58 16.04.2011

zdravim opat stale s tim istym problemom

PEPAK [ 07:26:37 06.04.2011 ]:
sorry kamo jak som ta rozculil svojim prispevkom, ale neni to tak ako to vizera. delfina sme sa v skole zacali ucit len teraz nedavno, mame 1,5 h za dva tyzdne, z toho nam uz 4x odpadlo. ucime sa to sposobom ze z dataprojektoru kde vidime jej priklad opiseme a potom chodi a skuma preco nam to nejde, to je asi cele. a teraz aby nas pustila k maturite jej mame toto zbuchat. tak preto vas prosim o radu.

nasiel som v skole cosi taketo, len skoda ze som nikdy nekreslil :2)

Príklad 27: Zadajte v editu s Updownom číslo z intervalu 0..10. Na formulár nakreslite toľko sústredných kružníc.

Riešenie: Vytvoríme reakciu na udalosť OnCreate formulára a v tele tejto procedúry zavoláme procedúru Randomize.
Ďalej zapíšeme reakciu na stlačenie tlačidla.
procedure TForm1.Button1Click(Sender: TObject);
var p,n,i:integer; n...počet kružníc, p horná medza cyklu
begin
Canvas.Brush.Style:=bsSolid;
Canvas.Brush.Color:=Form1.Color;
Canvas.Pen.Color:=Form1.Color;
Canvas.Rectangle(80,80,280,280);
Canvas.Brush.Style:=bsClear;
Canvas.Pen.Color:=clGreen;
n:=UpDown1.Position;
for p:=n downto 1 do
begin
Canvas.Ellipse(180-p*10,180-p*10,180+p*10,180+p*10);
for i:=1 to 10000000 do;
end;
end;
co tam mam zmenit aby mi to robilo to co mam vo svojom zadani, tu to kresli kruhy, ja potrebujem obdlzniky, v pomere 3:2 :1)

	ZEROFUSION 07:41:47 06.04.2011
	PEPAK [ 07:26:37 06.04.2011 ]: :THUMBS UP:

PEPAK 07:26:37 06.04.2011

Tak nevím, co mě irituje víc:

1) lidi, kteří jsou líní plnit svoje studijní povinnosti, nebo
2) lidi, kteří jsou neschopní plnit svoje studijní povinnosti.

Obojí ve variantě "zadarmo" nebo "placeně" (taky nevím, co je horší), ve výsledku je to ovšem to samé - dříve nebo později takový člověk nastoupí do vaší firmy a vy budete muset jeho práci dělat za něj.

SAMUELSUMEC [ 21:21:52 05.04.2011 ]: Co už jsi vyzkoušel a co konkrétně ti na tom nefunguje?

Btw., jak tak na to koukám, je to program, ve kterém budeš muset vlastními silami napsat šest příkazů (sedm, pokud budeš chtít inicializovat náhodný generátor pookaždé na jinou hodnotu; osm, pokud to Memo1 budeš chtít napřed smazat).

SAMUELSUMEC 21:21:52 05.04.2011

zdravim vas pani a dami... vedeli by ste mi pomôcť s nasledujúcim programom?

Zadajte v editu s Updownon číslo a z intervalu 0....10. Na formulár nakreslite a obdĺžnikov so stranami v pomere 3:2.
Do Mema1 vypíšte: Stredy obĺžnikov [x, y]
Súradnice rohov najväčšieho obdĺžnika sú: [x1, y1], [x2, y2], [x3, y3], [x4, y4]

v mojich silách to vytvoriť neni, tak vás tímto prosím o pomoc :4)

dakujem vopred

	PERVEREZ 17:19:43 27.01.2010
	Zapomněl jsem dodat, že používám české Windows...

	PERVEREZ 16:28:07 27.01.2010
	Nastavení SystemLocale bylo první, co jsem zkoušel, má vliv na menu apod., ale nemá vliv na rozdílné ukládání DFM souborů. Chyba se projevuje nejenom v běžícím programu, ale přímo v GDI.

	XOFT 15:34:15 27.01.2010
	PERVEREZ [ 13:55:15 27.01.2010 ]: Tipuju, ze nejde ani tak o nekompatibilitu s OS, jako o fakt, ze D7 (pokud vim) nepodporuji Unicode. Takze zavisi na tom, jake systemove locale pro non-Unicode aplikace je nastavene (screenshot je z WinVista):

PERVEREZ 13:55:15 27.01.2010

Ahoj, chtěl bych se zeptat, jestli nemáte někdo zkošenost s kompatibilitou Delphi7 s Windows7. Mám vytvořené formuláře z verze Delphi7 ve Windows Vista (a nižších verzí OS), pokud ale formulář otevřu v Delphi7 ve Windows7, tak jsou špatně některé české znaky, např. znak "ě" se do DFM ve Windows Vista ukládá jako #283, ale ve Windows7 se ukládá jako #238, což způsobuje nekompatibilitu jak při vývoji na různých OS, tak i při provozování hotových programů na různých OS. Děkuji za odpověď.

	PEPAK 09:49:35 15.01.2010
	Naštěstí se ukazuje, že JCL implementace PCRE je pro moje potřeby nepoužitelná, takže to nakonec zřejmě ani nebudu muset řešit.

	PEPAK 09:47:36 15.01.2010
	XOFT [ 09:38:48 15.01.2010 ]: Vadí, protože už jednu verzi JCL v jednom projektu používám a teď do dalšího projektu potřebuju další verzi JCL.

	XOFT 09:38:48 15.01.2010
	PEPAK [ 08:21:23 15.01.2010 ]: <ot> A musis to separovat? Dyt' to nakonec nicemu zvlast' nevadi, linker nepotrebne veci vyeliminuje ve vyslednem exe a pokud nemas rad plnou component palette, tak si vsechny ostatni komponenty JCL proste schovas. </ot>

	PEPAK 08:21:23 15.01.2010
	Je nějaký doporučený způsob, jak z JCL (Jedi Component Library) vyseparovat zvolenou unitu? Připadá mi hloupé kvůli jedné unitě, kterou potřebuju, instalovat celý JCL. Podotýkám, že nehledám "nějaký způsob" (ten mám), ale "doporučený způsob, pokud existuje".

	QUENDULUIN 11:04:57 07.12.2009
	Tak mi stačilo přidat do kódu Image1.Picture.Bitmap.Width := atd. a totéž s výškou, a funguje to. Žádné další překreslování jsem nedělal. Stejně asi až si s tím budu hrát dál, tak zkusím, jestli by se nedalo použít něco jako TMetafileCanvas a ukládat obrázek do vektorového souboru... :)

1 / 48

Zpět na seznam kategorií