Edit1 jako rozmiar czcionki
2008-03-07
06:23:00
06:23:00
Co tu nie pasuje ?
Mam 2 komponenty, Edit , Button , RichEdit.
Ich nazwy to E1, B1, RE1.
Skrypt do B1.
procedure TForm1.B1Click(Sender: TObject);
begin
RE1.SelAttributes.Size := PChar(E1.Text');
end;
I co tu nie gra ?
Cześć,
najedź kursorem na właściwość słówko Size w twoim kodzie - powinien pokazać się opis mówiący, że właściwość Size jest typu Integer.
Nie możesz więc do niej przypisać wartości która jest zmienną tekstową (PChar - wskaźnik do ciągu tekstowego). Należy więc to zmienić na coś takiego:
RE1.SelAttributes.Size := StrToInt(E1.Text);
Był jeszcze jeden mały błąd (dałeś apostrof po E1.Text).
Zaloguj się aby dodać post.