Behöver lite hjälp. 1 Tack Q Förstår nog inte riktigt vad du vill göra. Jo det är så här att jag gör ett litet notepad-liknande program och använder då richedit. Hej Hej ! Jag hade tänkt ställt samma fråga, när det gällde Memo1,så nu löste det sig, jättebra och tack till Sven.FontDialog och RichEdit
1. Hur gör jag så att FontDialog ska fungera, den ändrar inte teckensnitt och så vidare?
2. Hur döljer man texten RichEdit1, vill att RichEdit ska vara tomt när man kör programet?Sv: FontDialog och RichEdit
RichEdit.Clear;
2
if FontDialog.Execute then
RichEdit.Font := FontDialog.Font;Sv: FontDialog och RichEdit
FontDialog fungerar nu men inte borttagandet av texten Richedit1.
Kod:
procedure TForm1.RichEdit1Change(Sender: TObject);
begin
RichEdit1.Clear;
end;
Är det rätt så här eller saknas det något?Sv: FontDialog och RichEdit
Testa någon av raderna nedan.
RichEdit1.Font.Color := RichEdit1.Color;
RichEdit1.Visible := false;Sv: FontDialog och RichEdit
I object inspector så står det under name för komponenten "RichEdit1" men den texten syns hela tiden i textrutan i den färdiga produkten.
Det är detta som jag vill bli av med.
Hoppas att du förstå nu Q
Ps.
Är inte så kunnig inom detta område.
Ds.Sv: FontDialog och RichEdit
Så här får du göra. I Formens OnActivate
procedure TForm1.FormActivate(Sender: TObject);
begin
RichEdit1.Clear
end;
mvh
SvenSv: FontDialog och RichEdit
Ha de bra!!
owe