procedure TForm1.Button2Click(Sender: TObject);
begin
IF SaveDialog1.Execute THEN
BEGIN
Form1.Caption := SaveDialog1.FileName;
Memo1.Lines.SaveToFile(SaveDialog1.FileName);
END;
end;
Font Dialog – қаріпті таңдау диалог терезесі.
Иерархиясы:
TObject – TPersistent – TComponent – TCommonDialog.
Қаріпті таңдау Font Dialog диалог терезесі қолданушыға қаріпті таңдауға және оның сипаттамаларын орнатуға мүмкіндік береді (сурет 3.5.3 қараңыздар).
Font Dialog құрауышы тікелей TCommonDialog класынан туындаған TFontDialog класының данасы болып табылады.
TFontDialog класының негізгі қасиеттерін қарастырайық.
property Device: TFontDialogDevice;
type
TFontDialogDevice = (fdScreen, fdPrinter, fdBoth);
Ол қандай құрылғы үшін қаріп тағайындалатынын анықтайды. Келесі мәндерді қабылдауы мүмкін:
fdScreen – экран үшін қаріп,
fdPrinter – принтер үшін қаріп,
fdBoth – экран және принтер үшін қаріп.
Үнсіздікпен қаріп экран үшін беріледі.
property Font: TFont – қаріптің сипаттамаларын береді. Мәтінді бейнелеу үшін Windows операциялық жүйесінде тіркелген көптікке тиісті қаріп қолданылады.
property Options: TFontDialogOptions –TFontDialogOptions типті қасиет:
type
TFontDialogOption = (fdAnsiOnly, fdTrueTypeOnly, fdEffects, fdFixedPitchOnly, fdForceFontExist, fdNoFaceSel, fdNoOEMFonts, fdNoSimulations, fdNoSizeSel, fdNoStyleSel, fdNoVectorFonts, fdShowHelp, fdWysiwyg, fdLimitSize, fdScalableOnly, fdApplyButton);
TFontDialogOptions = set of TFontDialogOption;
Ол диалог терезесінің сипаттамаларын береді және мәні ретінде келесі шамалардың көптігін қабылдай алады:
fdAnsiOnly – бұл параметр тағайындалғанда символдары Windows операциялық жүйесінің көптік символдарына кіретін қаріпті ғана таңдауға болады,
fdEffects – бұл параметр тағайындалғанда диалог терезесі қаріптің астын сызуды және қайта сызуды анықтайтын Effects терезесінен және қаріптің түсін анықтайтын Color терезесінен тұрады,
fdForceFontExist – бұл параметр тағайындалғанда және жоқ қаріптің атын енгізгенде дұрыс енгізілмеген туралы хабарлама шығады,
fdLimitSize – бұл параметр тағайындалғанда қаріптің максимальды және минимальды өлшемін беруге болады,
fdApplyButton – бұл параметр тағайындалғанда Применить (Apply) батырмасы пайда болады.
property MaxFontSize: Integer – қаріптің максимальды (ең үлкен) өлшемін береді. Егер мәні нольге тең болса, онда максимальды өлшем берілмеген.
property MinFontSize: Integer – қаріптің минимальды (ең кіші) өлшемін береді. Егер мәні нольге тең болса, онда минимальды өлшем берілмеген.
Open Dialog және Save Dialog құрауыштарындағы сияқты қаріпті таңдау диалог терезесі Execute әдісінің көмегімен активтеледі.
TFontDialog класында бір оқиға – OnApply анықталған .
Достарыңызбен бөлісу: |