FreePascal.ru

SSerge Я не очень понял что вы имели ввиду насчет второй части?

Нашел ответ на последний вопрос в freepascal wiki:
http://wiki.freepascal.org/LCL_Unicode_Support/ru#.D0.9A.D0.BE.D0.B4.D0.BE.D0.B2.D1.8B.D0.B5_.D1.81.D1.82.D1.80.D0.B0.D0.BD.D0.B8 ...

Подозреваю что в константе cc неверно задана кодировка
Кодировка константы = кодировке страницы.
Кодировка страницы - см.
1.jpg

У меня именно так и есть - кодировка страницы utf8.

Собственно я об этом и писал - видно что в константе хранятся именно utf8 символы, но при присваивании переменной ...

Не могу понять логику работы строковых констант в новом FPC при использовании UnicodeString (или WideString).
При ПРЯМОМ присваивании переменной или вызове процедуры/функции/метода с параметром UnicodeString происходит непонятное преобразование символов.
Если же присваивать переменной UnicodeString ...

...и еще MyOnClick должен быть методом класса (или class-процедурой), т.е. не может быть просто процедурой.

И будет ли этот код "ловить" ошибки oracle, или для тех ошибок нужно отдельно что то писать?
Я точно не знаю, но скорее всего будет генерится эксепшен EExternal или наследник от него.
Под виндой у него есть поле ExceptionRecord типа PExceptionRecord у которого есть поле ExceptionCode

EXCEPTION ...

Тогда так:

try
...
except
on E : Exception do begin
if v1 then MessageBox(Handle,PWideChar(WideString('Exception '+E.ClassName+' with message: '+E.Message)),'Error',MB_OK or MB_ICONERROR);
if v2 then raise Exception1.Create('Rerise Exception '+E.ClassName ...

А еще есть Агидель - (аг) белая (идель) река по башкирски, и еще несколько значений: http://ru.wikipedia.org/wiki/Агидель.
По английски можно agIDEl или AGideL.
Это в продолжение темы IDEL - река / IDEL - IDE Lazarus.

Для выбора ветки обработки исключений используется класс эксепшена, конструкция if не используется.
Если вы генерируете сообщения сами - опишите наследников для каждого конкретного типа исключения.

type
Exception1 = class(Exception)
end;

Exception2 = class(Exception)
end;

Exception3 = class ...

Отладчик не умеет вызывать функции, поэтому вы не видите ее значения. Для того чтобы посмотреть значение функции присвойте ее результат промежуточной переменной и смотрите в отладчике уже значение переменной:


{$APPTYPE CONSOLE}
program project2;

{$mode delphi}{$H+}

function Included(const S ...

Быстрее всего будет воспользоваться CreateFileMapping.
есть какие-нибудь тесты для сравнения ?
На самом деле, все зависит от задачи.
Последовательное чтение файла механизм FileMapping-а вряд ли ускорит, тут достаточно правильного буфферизирования.
В случае же произвольного и заранее ...

Структурный тип, описывающий строку AnsiString, в уникодных версиях rtl всегда соедржит поле, описывающее кодировку.
Да, я это понимаю.

RawByteString = AnsiString(CP_NONE). Если в нее копируется строка с установленным флагом кодовой страницы, она в дальнейшем приобретает эту кодовую страницу и ...

Алексей, мне сложно судить о том, что должно быть "истинным raw byte".

"raw byte" переводится как "сырые байты", "сырые данные". Логично было бы ожидать что RawByteString строка без какой либо кодировки вообще (т.е. аналог "классической" AnisString).

Но в fpc это отнюдь не строки с одноразовой ...

Я правильно понял из статьи, что строки RawByteString вовсе не "raw byte" а всего лишь строки с одноразовой инициализацией? Если это так, то очень грустно
Попутно второй вопрос, если в строку UTF8String "запихать случайные байты" (нарушающие спецификацию UTF8) а затем склить ее с другой строкой ...

В лазаре только начинаю работать, до этого был дельфи, и для меня не понятно, почему простые вещи, которые в дельфи работали с полпинка, в лазаре надо допиливать напильником, тратя на это часы драгоценного времени, постоянно лазя в исходники компонентов и читая форумы.

FPC/Лазарь зедесь ...