 | | |
 | Stránka: 1 z 1
| [ Príspevkov: 10 ] | |
| Autor | Správa |
|---|
Registrovaný: 21.12.08
Prihlásený: 14.07.16
Príspevky: 114
Témy: 21 |  Napísal ha2: 20.11.2009 13:09 | |
|
Pocas behu programu si generujem komponenty pricom nazov dopredu neviem ...
Kód: setlength(pole,i);
pole[i-1]:=Trichedit.Create(self);
pole[i-1].ParentBiDiMode:=true;
pole[i-1].ParentShowHint:=true;
..
atd ale neviem ako nastavyt borderstyle na bsNone. Nechcem klasicky vzhlad ale iba ramcek okolo takto Kód: pole[i-1].BevelInner:=bvNone;
pole[i-1].BevelKind:=bkFlat;
pole[i-1].BevelOuter:=bvRaised;
pole[i-1].BorderStyle:=bsNone; alebo takto co tiez nejde  Kód: tRichedit(findcomponent(xxx)).borderstyle:=bsNone;
|
|
Registrovaný: 11.01.09
Prihlásený: 26.04.24
Príspevky: 1385
Témy: 9
Bydlisko: Hrinova | Napísal Fico: 21.11.2009 17:27 | |
|
Ale v čom je vlastne problém? Tento kód nefunguje?
Kód: pole[i-1].BevelInner:=bvNone;
pole[i-1].BevelKind:=bkFlat;
pole[i-1].BevelOuter:=bvRaised;
pole[i-1].BorderStyle:=bsNone; Dalo by sa pomocou cyklu for nastaviť BorderStyle pre všetky prvky poľa, nejako takto, ale neviem, či toto je vlastne ten problém: Kód: for j:= 0 to length(pole)-1 do begin
if (pole[j] = nil) then exit;
pole[j].BevelInner:=bvNone;
pole[j].BevelKind:=bkFlat;
pole[j].BevelOuter:=bvRaised;
pole[j].BorderStyle:=bsNone;
end;
|
|
Registrovaný: 21.12.08
Prihlásený: 14.07.16
Príspevky: 114
Témy: 21 | Napísal autor témy ha2: 21.11.2009 18:38 | |
|
praveze neviem... logicky by to malo brat ved je to nastavenie ako ostatne ale pri tom borderstyle napise tuto chybu
Kód: [Error] Unit1.pas(1370): Incompatible types: 'StdCtrls.TBorderStyle' and 'Unit1.TBorderStyle'
ten cyklus som skusil len z principu a samozrejme to nepomaha
|
|
Registrovaný: 11.01.09
Prihlásený: 26.04.24
Príspevky: 1385
Témy: 9
Bydlisko: Hrinova | Napísal Fico: 21.11.2009 19:12 | |
|
Takúto chybu vypíše, ak je v unite predeklarovaný typ TBorderStyle (konkrétne v Unit1). Skús sa pozrieť v celom projekte, či v sa v ňom nenachádza takýto typ (myslím deklaráciu v sekcii interface).
|
|
Registrovaný: 21.12.08
Prihlásený: 14.07.16
Príspevky: 114
Témy: 21 | Napísal autor témy ha2: 21.11.2009 20:03 | |
|
nieje, a nemozem to menit ani normalne na konkretnej komponente napr richedit1.borderstyle:=bsNone. Mam pocit ze niekedy to slo no niesom si uz teraz isty.
|
|
Registrovaný: 11.01.09
Prihlásený: 26.04.24
Príspevky: 1385
Témy: 9
Bydlisko: Hrinova | Napísal Fico: 21.11.2009 20:56 | |
|
Keď skúsiš dať RichEdit riadne na formulár a cez Object Inspector nastavíš BorderStyle, tak to nefunguje? Tak potom netuším, kde je chyba, pretože toto funguje za normálnych okolností stále.
|
|
Registrovaný: 21.12.08
Prihlásený: 14.07.16
Príspevky: 114
Témy: 21 | Napísal autor témy ha2: 22.11.2009 1:12 | |
|
praveze cez object inspector funguje....len problem je vtom ze pocas behu programu richedit generujem a tam chcem priradit borderstyle bsnone lenze to nechce brat. neviem co stym uz, skus si to som zvedavy ci ti to dovoli
|
|
Registrovaný: 11.01.09
Prihlásený: 26.04.24
Príspevky: 1385
Témy: 9
Bydlisko: Hrinova | Napísal Fico: 22.11.2009 14:02 | |
|
Tu je celý zdroják - kliknutím na "Pridaj RicEdit" sa zväčší pole o jeden prvok TRichEdit. Keď ich bude na forme niekoľko, kliknutím na "Set BorderStyle" sa nastaví border style pre všetky RichEdity na forme. Všetko mi ide, ako má.
|
|
Registrovaný: 21.12.08
Prihlásený: 14.07.16
Príspevky: 114
Témy: 21 | Napísal autor témy ha2: 22.11.2009 14:56 | |
|
Takze "zahada" vyriesena. Pouzivam tieto komponenty. http://www.tmssoftware.com/site/tmspack.asp no a nenapadlo ma zeby to robilo kvoli tomu. Konkretne AdvGlassButton a AdvGroupBox kniznice. Mozno aj ine neskusal som vsetko. No asi mi ostava vynechat to alebo zabudnut na bsNone. Ak by bol zaujem pastnem sem ci uz zdrojak alebo komplet kebyze sa chces nato pozriet. ale asi ten konflikt nepojde vyriesit.
|
|
Registrovaný: 11.01.09
Prihlásený: 26.04.24
Príspevky: 1385
Témy: 9
Bydlisko: Hrinova | Napísal Fico: 22.11.2009 15:05 | |
|
Tak ja nepoužívam žiadne prídavné komponenty, ale v každom prípade by mal ten balík obsahovať nejakú nápovedu. Ak z tých knižníc používaš TRichEdit, možno bude iný spôsob na odstránenie okraja, ak klasický spôsob nefunguje. Treba to pohľadať v nápovede.
|
|
| Stránka: 1 z 1
| [ Príspevkov: 10 ] | |
Podobné témy | | Témy | Odpovede | Zobrazenia | Posledný príspevok |
|---|
 | RichEdit v Delphi, Visual Basic | 0 | 1316 | 26.11.2006 21:39 jozo  | | delphi zapis cisla do editu v delphi v Delphi, Visual Basic | 3 | 1107 | 11.05.2008 12:02 p360t |  | SERVER !! ....Vytvoreni servru v Sieťové a internetové programy | 11 | 687 | 30.10.2006 21:24 itsgoingd | | Nero10 vytvoření boot cd v Ostatné programy | 0 | 232 | 01.03.2015 18:19 mery | | Grafik: vytvoreni loga firmy v Ponuka práce | 1 | 897 | 18.09.2012 8:38 drozdo | | Praca na vytvoreni portalu(Joomla) v Ponuka práce | 0 | 331 | 06.01.2014 22:00 nERv | | Problém po vytvorení jar súboru v Assembler, C, C++, Pascal, Java | 9 | 1232 | 04.08.2010 9:26 coldak | | Praca na vytvoreni eshopu Wordpress v Ponuka práce | 0 | 357 | 24.12.2013 23:00 chlpacik | | Pár zásad k vytvoření dobrého webu v Webdesign | 0 | 750 | 15.03.2007 13:39 suchy | | Pomoc pri vytvorení scriptu - keyword research v PHP, ASP | 0 | 792 | 06.02.2007 9:00 robi3 | | Poradite mi pri vytvoreni PC zostavy? v PC zostavy | 2 | 410 | 02.11.2016 18:12 fero11 | | Chyba pri vytvoreni noveho oddielu na disku v SSD disky | 6 | 468 | 14.04.2013 9:36 Rafis | | Vytvoření disku s výchozím nastavením z výroby v Operačné systémy Microsoft | 0 | 391 | 23.03.2011 9:15 martin4770 | | Zalezi farba kabla zo zdroja na vytvoreni 6 pin konektoru ? v PC skrinky a zdroje | 4 | 698 | 07.10.2013 18:20 KocuR | | "zrusenie" liniek na obr. a CSS po vytvoreni .htac v Internetový marketing, SEO, reklama | 2 | 801 | 15.10.2008 10:50 max-m | | [Delphi] komponent v Delphi, Visual Basic | 21 | 1886 | 16.03.2010 17:05 zy-zy-zyrixi |
| Nemôžete zakladať nové témy v tomto fóre
Nemôžete odpovedať na témy v tomto fóre
Nemôžete upravovať svoje príspevky v tomto fóre
Nemôžete mazať svoje príspevky v tomto fóre
|
|
![[Delphi] Borderstyle po vytvoreni richedit](/avatars/21001.jpg)