Anonymní profil pepca – Programujte.com
 x   TIP: Přetáhni ikonu na hlavní panel pro připnutí webu

Anonymní profil pepca – Programujte.comAnonymní profil pepca – Programujte.com

 

Příspěvky odeslané z IP adresy 212.24.154.–

pepca
Delphi › Problémy s kreslením
24. 9. 2008   #85778

Tak už jsem na to vlastně díky tobě přišel, jen pro názornost:

procedure TForm1.Button1Click(Sender: TObject);
begin
Canvas.Brush.Color:=clGreen;
Canvas.Rectangle(10,10,100,100);
Canvas.Pen.Color:=clYellow;
Canvas.Pen.Width:=3;
Canvas.MoveTo(50,10);
Canvas.LineTo(50,100);
end;

Zkus co to udělá, když klikneš na button podruhý a přitom řešení je vlastně velmi jednoduchý - hned za begin dát:
Canvas.Pen.Color:=clGreen;
a je po problému. a já si stím lámal hlavu několik dní. Ach jo ...

pepca
Delphi › Problémy s kreslením
24. 9. 2008   #85772

Asi jsem to špatně napsal. Problém je v tom, že když např. v proceduře ClickButon nakreslím plný obdélník a přes něj linku jejíž sílu nastavím pomocí PenWidth, tak při prvním kliknutí je to v pořádku. Když kliknu podruhé objeví se daný obdélník orámovaný barvou linky a to nechci. A nepomůže ani když před vykreslením toho obdélníku nastavím PenWidth:=0; navíc ta linka, která tam z určitého důvodu musí být nezmizí, ale jako vlasová čára je tam pořád.

pepca
Delphi › Sloupce v Memu?
24. 9. 2008   #85769

Tabulátory mně taky napadly, ani s nimi to nefunguje. Problém je v tom, že jeden výsledek může být třeba 0,1 a další 0,1253
a další zase jen 0,1. Při příštím výpočtu to může být zase jiné a stím už si asi ani tabulátory neporadí. Řešením by bylo skočit
v řádku na určenou pozici a tam zapsat, ale nevím jestli to jde a jak.

pepca
Delphi › Sloupce v Memu?
24. 9. 2008   #85762

Potřebuji do několika řádků v Memu vypsat výsledky mat. operací, několik na řádek. Protože výsledky jsou různě dlouhé, vznikne při jejich oddělení pouze mezerami po několika řádcích pěkný chaos. Protože jsem začátečník, tak mé znalosti začínají a vlastně i končí u těch mezer. Víte prosím někdo jak to "učesat" např. vytvořením sloupců?

pepca
Delphi › Problémy s kreslením
24. 9. 2008   #85761

Jako grafické znázornění matem. výsledků používám kreslení různých obdélníků a linek na Image.Canvas. Vše fungovalo bez problémů, dokud jsem nepotřeboval měnit sílu linek. Použil jsem Pen.Width a problém - všechny objekty jsou ohraničeny linkou s barvou, která byla zadána pro linky. I když před vykreslením objektu nastavím Pen.Width:=0; tak tam ty linky jsou, sice vlasové, ale vypadá to dost blbě. Zkoušel jsem v Pen.Style:=Ps.Clear; ale taky nic. Jsem v programování začátečník a už jsem na netu prolezl kde, co, už fakt nevím co s tím. Nevíte prosím jak na to?
Druhý dotaz - jak jednoduše vyčistit kreslící plochu? Existuje něco jako Pascalovský ClrScr?
Díky za odpovědi

pepca
Delphi › Hledání řetězce
11. 9. 2008   #84883

Jsem začátečník. Potřebuji v textovém souboru najít zadaný řetězec, např. tata, bez použití komponenty RichEdit
Dík

 

 

Hostujeme u Českého hostingu       ISSN 1801-1586       ⇡ Nahoru Webtea.cz logo © 20032021 Programujte.com
Zasadilo a pěstuje Webtea.cz, šéfredaktor Lukáš Churý