Sign in Join

Live chat for Free Pascal, Lazarus, Delphi and every Pascal programmer.

Mailing lists / lazarus / 2003-12

Font size

3 messages · 2 people ·

Reply by email Subscribe to this list Your subscription

Read-only archive. Use j and k to move between messages.

Rainer Hamann
to Rainer Hamann: Is changing of font sizes not yet implemented in LCL? I tried static and dynamic at…

Its on linux. Clicking on Button2 should change font size. The object inspector disables changing too. I've downloaded lazarus with cvs two hours ago and i'm using fpc 1.0.10.

unit unit1;
{$mode objfpc}{$H+}
interface

uses
Classes, SysUtils, LResources, Forms, Controls, Graphics, Dialogs, Buttons,

  StdCtrls;
type
  TForm1 = class(TForm)
    Button1: TBUTTON;
    Button2: TBUTTON;
    Label1: TLABEL;
    procedure Button1Click(Sender: TObject);
    procedure Button2Click(Sender: TObject);
  private
    { private declarations }
  public
    { public declarations }
  end;
var
  Form1: TForm1;
implementation

{ TForm1 }

procedure TForm1.Button1Click(Sender: TObject);
begin
     Application.Terminate;
end;
procedure TForm1.Button2Click(Sender: TObject);
begin
     Label1.Font.Size := 20;
end;
initialization
  {$I unit1.lrs}
end.

Rainer Hamann

Show quoted text 13 lines
Rainer Hamann wrote: > Is changing of font sizes not yet implemented in LCL? I tried static and > dynamic at various components but I hat no success. Is this on win32 or linux? In what kind of control are you trying to change the font? TLabel, TEdit, ... ? Micha. _________________________________________________________________ To unsubscribe: mail with "unsubscribe" as the Subject archives at http://www.lazarus.freepascal.org/mailarchives

Reply by email

Rainer Hamann

Is changing of font sizes not yet implemented in LCL? I tried static and dynamic at various components but I hat no success.

Rainer Hamann

Reply by email