FontDialog1 hjælp hjælp !!

Tags:    delphi

Her er alt koden jeg har skrevet indtil videre:

procedure TForm1.ToolButton20Click(Sender: TObject);
begin
FontDialog1.Execute;
end;

og delphi godtager den men knapperne virker ik .. så man kan vælge størrelse og fonts ..



Her er alt koden jeg har skrevet indtil videre:

procedure TForm1.ToolButton20Click(Sender: TObject);
begin
FontDialog1.Execute;
end;

og delphi godtager den men knapperne virker ik .. så man kan vælge størrelse og fonts ..


Hmm..

procedure TForm1.ToolButton20Click(Sender: TObject);
begin
if FontDialog1.Execute then
Memo1.Font := FontDialog1.Font;
end;

Hilsen CHadi
Mit lykketal er 2959



t