Компьютерные заметки DJ Slava

Нужен именно такой диалог, как на рисунке выше? Тогда делаем следующее: Подключаем в uses модуль  ShlObj Затем добавляем в кнопку вот это: procedure TForm1 . Button1Click ( Sender : TObject ) ; var TitleName : string ; lpItemID : PItemIDList ; BrowseInfo : TBrowseInfo ; DisplayName : array [ 0 .. MAX_PATH ] of char ; TempPath : array [ 0 .. MAX_PATH ] of char ; begin FillChar ( BrowseInfo , sizeof ( TBrowseInfo ) , #0 ) ; BrowseInfo . hwndOwner : = Form1 . Handle ; BrowseInfo . pszDisplayName : = @ DisplayName ; TitleName : = 'Please specify a directory' ; BrowseInfo . lpszTitle : = PChar ( TitleName ) ; BrowseInfo . ulFlags : = BIF_EDITBOX ; lpItemID : = SHBrowseForFolder ( BrowseInfo ) ; if lpItemId <> nil then begin SHGetPathFromIDList ( lpItemID , TempPath ) ; ShowMessage ( TempPath ) ; GlobalFreePtr ( lpItemID ) ; end ; end ; Обратите внимание - я выделил красным несколь

Это делается условными обозначениями с помощью символов: Пишем: *Жирный текст* Будет: Жирный текст Пишем: _Курсив_ Будет:  Курсив Пишем: -Зачеркнутый- Будет: Зачеркнутый Пишем: *_Жирный курсив_* Будет: Жирный курсив Главное - не ставьте пробел между символом и текстом. Кстати, в комментариях можно также добавлять смайлы 🙂. Для этого, при вводе текста, щелкните правой кнопкой мыши и выберите " Эмодзи " - появится окошко с выбором смайликов (никаких дополнительных расширений устанавливать не надо - это уже есть в Google Chrome ). Окошко можно вызвать комбинацией клавиш " Win + . " Еще одна фишка: когда открыто окно " Эмодзи ", можно начать прямо на русском вводить название смайла и он будет найден в списке. При нажатии на Enter , введенное в поле комментария название смайла будет заменено на сам смайл.