Работа со ДИЈАЛОГ компоненти

Прво се подига програмскиот јазик Delphi се прави избор на нова апликација File->NEW Application. После поставување на Главно мени (Main Menu ) со опции Фонт, Позадина, Букви и Излез и една компонента RichEdit  од палетата со компоненти  Win32, потоа се поставуваат еден дијалог  од палетата со компоненти  Dialogs и тоа FontDialog На опцијата Букви се впишува следниот код

fontdialog1.Execute;                                                                        //Отворање на Фонт Диалог
richedit1.SelText;                                                                            //Селектирање на текст
richedit1.SelAttributes.Color:=fontdialog1.Font.Color;                    //Боја на селектираниот текст
richedit1.SelAttributes.Size:=fontdialog1.Font.Size;                        //Големина на селектираниот текст
richedit1.SelAttributes.Name:=fontdialog1.Font.Name;                   //Фонт на селектираниот текст
richedit1.SelAttributes.Style:=fontdialog1.Font.Style;                     //Bold (Дебели), Italic (Накосени), Underline (подвлеченост) на селектираниот текст

со ова оние опции кои сте ги избрале во FontDialog   се доделуваат само на селектираниот текст.

На опцијата Излез се впишува следниот код
form1.Close;