안녕하세요?
RICHEDIT 내용을 스트림으로 바이너리형식으로 DB에 저장과 불러오기할 수 있도록 공지사항 창을 만들고 있습니다.
폰트 설정에서 다릉것(글꼴,크기,글자색 등)은 다 만들었는데요. 글자범위를 선택하여 글자 바탕색을 넣는것은 아직 만들지
못했습니다. 도와주세요.
아래소스는 글자색을 넣는 소스 입니다.
procedure TMotice_F.Letters_ColorClick(Sender: TObject);
begin
if FUpdating then Exit;
ColorDialog.Color := CurrText.Color;
if ColorDialog.Execute then
CurrText.Color := ColorDialog.Color;
end;
운영체제 : Win7 프로그램 툴 : 델파이7 DB : Firebird2.1
|