Jak změnit velikost písma u ovládacího prvku – Delphi – Fórum – Programujte.com
 x   TIP: Přetáhni ikonu na hlavní panel pro připnutí webu
Reklama

Jak změnit velikost písma u ovládacího prvku – Delphi – Fórum – Programujte.comJak změnit velikost písma u ovládacího prvku – Delphi – Fórum – Programujte.com

 
Hledat
Moderní platforma pro vytvoření vašeho nového webu – Wix.com.
Nyní už můžete mít web zdarma.
Vybavení pro Laser Game
Spuštěn Filmový magazín
Laser Game Brno
Laser Game Ostrava

Toto vlákno bylo označeno za vyřešené.
oxidián0
Grafoman
21. 5. 2017   #1
-
0
-

Nainstaloval jsem si Delphi 7 a u programu UC_HEB (zdrojáky jsou uvnitř archivu) chci změnit velikost písma tam kde je hebrejština.

 Takže například zde je toto:

      object Edit1: TEdit
        Left = 0
        Top = 0
        Width = 233
        Height = 27
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlack
        Font.Height = -19
        Font.Name = 'Hebrew'
        Font.Style = []
        ParentFont = False
        TabOrder = 1
        Text = 'Edit1'
        Visible = False
        OnChange = Edit1Change
        OnEnter = Edit1Enter
        OnExit = Edit1Exit
        OnKeyDown = Edit1KeyDown
        OnKeyUp = Edit1KeyUp
      end

Ale není tam nikde

parametr TextHeight, kterým bych mohl nastavit velikost písma toho konkrétního ovládacího prvku ať už je to vstupní pole nebo tlačítko. Takže bych chtěl vědět jak se to dělá. Jsem úplný začátečník a jde mi jen o změnu velikosti písma u programu.

Nahlásit jako SPAM
IP: 78.102.61.–
Sniper
~ Anonymní uživatel
212 příspěvků
21. 5. 2017   #2
-
0
-

Vyber prvek co chceš měnit, okno "object inspector" (bývá vlevo), záložka "properties", font -> size.

Nahlásit jako SPAM
IP: 92.240.176.–
oxidián0
Grafoman
21. 5. 2017   #3
-
0
-

Dík. Jen provedené změny se neprojevili. Po kompilaci mi to žádnou chybu neukazuje. Dám Run, ale písmo se nezvětšilo.

Přikládám obrázek.

Nahlásit jako SPAM
IP: 78.102.61.–
Sniper
~ Anonymní uživatel
212 příspěvků
21. 5. 2017   #4
-
0
-

Nepřepisuje se ta velikost až za běhu programu? Jestli je to v těch programech, o jakou přesně komponentu jde (form, název)?

Nahlásit jako SPAM
IP: 92.240.176.–
oxidián0
Grafoman
21. 5. 2017   #5
-
0
-

#4 Sniper
Jde mi o UC_HEB1.PAS

Velikost písma se mi povedlo částečně vyřešit.  Alespoň co se mi zobrazují ty odpovědi (jestli jsem vybral správně odpověď nebo špatně).

Když otevřu test tak v levém listboxu (TForm1.ListBox1) viz

Listbox1.Items:=Odpovedi;

se mají zobrazit hebrejské položky. Tyto položky chci zvětšit např. na velikost 20-25 a nemohu přijít na to kde tam se nachází vlastnost Font.Size a Font.Style ... hledám stránku manuálu ale zatím jsem k tomu TListBox nic nenašel.

edit:

Vyřešil jsem to. Našel jsem tam proměnnou

fontsize která přepisovala to co jsem nastavoval...

Nahlásit jako SPAM
IP: 78.102.61.–
oxidián0
Grafoman
22. 5. 2017   #6
-
0
-

Ještě mám problém stále u toho modulu UC_HEB1.pas se mi nedaří přijít na to, proč se Label5.font.name nenastaví správně.

Když otevřeš test spustí se

TForm1.otevriTest

a ta připraví hodnoty do listboxu.

Když v levem listboxu (zadání) vidíš české znaky tak font1 = "System"

Když v pravem listboxu (odpověď) vidíš české znaky tak font3 = "Hebrew"

Když vybereš špatnou odpověď vpravo, tak se zobrazí správná odpověď,

ale není tam nastavený správný font, tj. Hebrew,

ve funkci otevriTest jsem zkousel změnit toto:

label5.font.name:=font3;
label5.font.size:=fontsize;
if uppercase(font3)='SYSTEM' then
  begin
   label5.font.name:='Arial CE';
   label5.font.size:=fontsizeCe;
  end
else
  begin
   label5.font.name:='Hebrew';
   label5.font.size:=fontsize-2;
  end;


protože font3 je "Hebrew" tak se to font lable5 má změnit na Hebrew, no ale když se zobrazí text tak je to stále v evropském fontu.

Nahlásit jako SPAM
IP: 78.102.61.–
oxidián0
Grafoman
22. 5. 2017   #7
-
0
-

#6 oxidián
Ještě jsem zkoušel do

procedure TForm1.upravpanel;

přidat:

   label5.caption:='POKUS';
   label5.font.name:='Hebrew';

a při špatné odpovědi se zobrazí Správně má být "POKUS", ale není to v hebrejštině. To mi vrtá hlavou proč.

Závěr je takový, že

Přestože label5.font.name je nastaven na hebrejštinu, zobrazuje se to v Arialu. Proč?

Nahlásit jako SPAM
IP: 78.102.61.–
Zjistit počet nových příspěvků

Přidej příspěvek

Toto téma je starší jak čtvrt roku – přidej svůj příspěvek jen tehdy, máš-li k tématu opravdu co říct!

Ano, opravdu chci reagovat → zobrazí formulář pro přidání příspěvku

×Vložení zdrojáku

×Vložení obrázku

Vložit URL obrázku Vybrat obrázek na disku
Vlož URL adresu obrázku:
Klikni a vyber obrázek z počítače:

×Vložení videa

Aktuálně jsou podporována videa ze serverů YouTube, Vimeo a Dailymotion.
×
 
Podporujeme Gravatara.
Zadej URL adresu Avatara (40 x 40 px) nebo emailovou adresu pro použití Gravatara.
Email nikam neukládáme, po získání Gravatara je zahozen.
-
Pravidla pro psaní příspěvků, používej diakritiku. ENTER pro nový odstavec, SHIFT + ENTER pro nový řádek.
Sledovat nové příspěvky (pouze pro přihlášené)
Sleduj vlákno a v případě přidání nového příspěvku o tom budeš vědět mezi prvními.
Reaguješ na příspěvek:

Uživatelé prohlížející si toto vlákno

Uživatelé on-line: 0 registrovaných, 10 hostů

 

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