Найдено 28 результатов
- 04.11.2017 20:50:24
- Форум: Lazarus
- Тема: SynEdit не выделяет ключевые слова
- Ответы: 3
- Просмотры: 4683
Re: SynEdit не выделяет ключевые слова
Спасибо за ссылочку. Оказывается ключевые слова в файл нужно записывать в верхнем регистре 
- 24.10.2017 14:31:33
- Форум: Lazarus
- Тема: SynEdit не выделяет ключевые слова
- Ответы: 3
- Просмотры: 4683
SynEdit не выделяет ключевые слова
Собственно сам код:
procedure TfMain.Button1Click(Sender: TObject);
begin
SynAny.KeyWords.LoadFromFile('keywords.txt');
Editor.Refresh;
end;
После компиляции и запуска нажимаю кнопку и ничего не происходит с текстом. ShowMessage(SynAny.KeyWords.Text) показывает, что ...
procedure TfMain.Button1Click(Sender: TObject);
begin
SynAny.KeyWords.LoadFromFile('keywords.txt');
Editor.Refresh;
end;
После компиляции и запуска нажимаю кнопку и ничего не происходит с текстом. ShowMessage(SynAny.KeyWords.Text) показывает, что ...
- 12.12.2013 09:52:08
- Форум: Extended Pascal Component Library
- Тема: Extended Pascal Component Library
- Ответы: 3
- Просмотры: 60853
Re: Extended Pascal Component Library
Нравится первый пункт 
- 04.11.2010 13:38:27
- Форум: Lazarus
- Тема: Почистить лишние файлы в проекте
- Ответы: 1
- Просмотры: 1974
Почистить лишние файлы в проекте
Сабж. Хотелось бы знать, какие из файлов проекта нужны, а с какими можно легко расстаться, чтобы уменьшить размер архива ( о папке backup и файле .exe знаю ), но чтобы потом можно было бы нормально компилировать проект и всего бы хватало (ну, скажем, чтобы настройки не сбились и все такое)? Можно ли ...
- 22.10.2010 13:25:26
- Форум: Lazarus
- Тема: Извечная проблема lazarus кириллица и юникод
- Ответы: 26
- Просмотры: 25053
Re: Извечная проблема lazarus кириллица и юникод
Да, вот еще код, который определяет ее наличие и удаляет, если сигнатура есть.
Код: Выделить всё
if (Copy(SL[0], 1, 3) = #239#187#191) then
begin
Tmp := SL[0];
Delete(Tmp, 1, 3);
SL[0] := Tmp;
end;
- 22.10.2010 13:06:11
- Форум: Lazarus
- Тема: Извечная проблема lazarus кириллица и юникод
- Ответы: 26
- Просмотры: 25053
Re: Извечная проблема lazarus кириллица и юникод
Вотъ:
Добавлено спустя 21 минуту 19 секунд:
Ага, разобрался
Первый знак - сигнатура юникода. Она может быть или не быть. При сохранении в редакторе можно поставить соответ. птичку. Я правильно понимаю? Она позволяет узнать, является ли файл utf8?
Добавлено спустя 21 минуту 19 секунд:
Ага, разобрался
- 22.10.2010 12:34:56
- Форум: Lazarus
- Тема: Извечная проблема lazarus кириллица и юникод
- Ответы: 26
- Просмотры: 25053
- 22.10.2010 12:27:27
- Форум: Lazarus
- Тема: Извечная проблема lazarus кириллица и юникод
- Ответы: 26
- Просмотры: 25053
Re: Извечная проблема lazarus кириллица и юникод
Это не то! Что SL[0], что SL.Strings[0] - результат один. Strings по-моему стоит default.
- 22.10.2010 12:23:59
- Форум: Lazarus
- Тема: Извечная проблема lazarus кириллица и юникод
- Ответы: 26
- Просмотры: 25053
Re: Извечная проблема lazarus кириллица и юникод
Спасибо. Еще вопрос. Вот код:
Вот что получаю (квадратик вначале)...
Как правильно?
Код: Выделить всё
SL := TStringList.Create;
SL.LoadFromFile(Path + 'file_utf-8.txt');
ShowMessage(SL[0]);
SL.Free;
Вот что получаю (квадратик вначале)...
Как правильно?
- 22.10.2010 12:09:36
- Форум: Lazarus
- Тема: Извечная проблема lazarus кириллица и юникод
- Ответы: 26
- Просмотры: 25053
Re: Извечная проблема lazarus кириллица и юникод
В Windows у меня значение ParamStr(0) отображается знаками вопросов (текст "Новая папка"):
Как с этим бороться?
Как с этим бороться?
- 13.10.2010 17:21:51
- Форум: Lazarus
- Тема: QPas - квесты на Pascal'e
- Ответы: 38
- Просмотры: 22369
Re: QPas - квесты на Pascal'e
Я пользователь Windows, но хочу испытать QPas в Линукс, как это сделать? Есть небольшой, но современный дистр Линукс под виртуальную машину?
- 13.10.2010 13:18:28
- Форум: Обучение Free Pascal
- Тема: Пишу книгу по Lazarus. Кто поможет издать?
- Ответы: 54
- Просмотры: 57517
Re: Пишу книгу по Lazarus. Кто поможет издать?
Agronom писал(а):Когда Ваша книга выйдет в свет (хотя бы в электронном виде)? Хочу уже почитать. И какова будет ее стоимость?
Меня тоже интересует этот вопрос. Очень нужное для меня руководство, так как я перешел на Лазаря из Дельфи ради кроссплатформенности.
- 13.10.2010 13:15:22
- Форум: Lazarus
- Тема: QPas - квесты на Pascal'e
- Ответы: 38
- Просмотры: 22369
Re: QPas - квесты на Pascal'e
Стесняюсь спросить - если нужна только распаковка zip архивов, то почему не использовать unzip51g из состава самого Лазаря?
Ну мне для скромных целей проекта хватает возможностей модуля Zipper. Разве unzip51g лучше?
Добавлено спустя 1 минуту 39 секунд:
модуль Windows и все используемые из ...
Ну мне для скромных целей проекта хватает возможностей модуля Zipper. Разве unzip51g лучше?
Добавлено спустя 1 минуту 39 секунд:
модуль Windows и все используемые из ...
- 13.10.2010 10:58:31
- Форум: Lazarus
- Тема: QPas - квесты на Pascal'e
- Ответы: 38
- Просмотры: 22369
Re: QPas - квесты на Pascal'e
Принял к сведению 
Вопрос:
А конструкция ...if MessageDlg(... в Линуксе работать будет?
Вопрос:
А конструкция ...if MessageDlg(... в Линуксе работать будет?
- 09.10.2010 11:11:07
- Форум: Lazarus
- Тема: QPas - квесты на Pascal'e
- Ответы: 38
- Просмотры: 22369
Re: QPas - квесты на Pascal'e
B4rr4cuda писал(а):Application.ProcessMessages влепить в цикл.
Да, и еще в FormCloseQuery добавил:
Код: Выделить всё
if CanClose then Halt(0);
Добавлено спустя 36 секунд:
Теперь все работает как надо
