Renkli diyalog mesajı

Renkli diyalog mesajı gösterilmesini örnekleyen kod.

procedure TForm1.BtnHakkindaClick(Sender: TObject);
begin
  with CreateMessageDialog('Bu program karflake tarafından hazırlanmıştır.'+#13+#10+'İyi günlerde kullanmanız dileğiyle',mtinformation, [mbOk]) do
  try
    Color := clred;
    font.Color:=clyellow;
    ShowModal;
  finally
    Free;
  end;
end;

13.11.2008 10:54:51

Yorumlar

Merhabalar Baya köklü bir birikiminiz var.. Yazılarınızın Devamını Dilerim..

ahmet kaya, 23.05.2022 21:58:51


Yazı hakkında yorum yapmak için, buraya tıklayın.

Kategoriler :

Arşiv :

Etiketler :

Bağlantılar :