Найдено 46 результатов

KUKA
23.08.2013 20:47:08
Форум: Free Pascal Compiler
Тема: Конвертирование класса C++ под FPC
Ответы: 1
Просмотры: 3311

Конвертирование класса C++ под FPC

Значит есть некий класс, типа менеджер для текстур. Достаточно удобный, элементы удаляются сами, если нет ссылающихся на них ETypesHandle

namespace core{
class ETypesHandle{
friend class ETypesFactory;

private:
mutable EBaseType* value;
public:
unsigned int id;
ETypesHandle ...
KUKA
07.08.2013 22:18:49
Форум: Сторонние средства
Тема: физика
Ответы: 3
Просмотры: 10934

физика

Кто знает какие физ.движки 2D для FPC ну или своими наработками какими поделится?
KUKA
29.07.2013 20:11:48
Форум: Free Pascal Compiler
Тема: Объявление параметра функции в описании метода
Ответы: 5
Просмотры: 5386

Re: Объявление параметра функции в описании метода

Как ругается? Где объявляете? Где реализуете?
Синтаксическая ошибка типа - ")" expected but "=" found

Объявляется в разделе interface в прототипе функции

function RegisterExpectedMemoryLeak(ALeakedObjectClass: TClass; ACount: Integer = 1): boolean; overload;
function ...
KUKA
29.07.2013 18:05:36
Форум: Free Pascal Compiler
Тема: Объявление параметра функции в описании метода
Ответы: 5
Просмотры: 5386

Re: Объявление параметра функции в описании метода

SeZuka писал(а):Ну можно. В чем вопрос то, или проще здесь написать, чем самому проверить?

Я как раз и написал, на что он мне начал ругаться, собственно поэтому и вопрос здесь
KUKA
27.07.2013 06:18:26
Форум: Free Pascal Compiler
Тема: Объявление параметра функции в описании метода
Ответы: 5
Просмотры: 5386

Объявление параметра функции в описании метода

Возможно вопрос тупой, но вроде же можно было делать так:

Код: Выделить всё

procedure Foo( bar : integer = 1 );
KUKA
27.07.2013 06:14:38
Форум: Free Pascal Compiler
Тема: Создание GUI. События, делегаты
Ответы: 6
Просмотры: 7653

Re: Создание GUI. События, делегаты

Обработка сообщений естественно через WinAPI, сам GUI внутрипрограммный, рендерится по-своему
KUKA
18.07.2013 17:41:29
Форум: Free Pascal Compiler
Тема: Создание GUI. События, делегаты
Ответы: 6
Просмотры: 7653

Создание GUI. События, делегаты

Мне в проекте необходимо реализовать свой gui. Элементов всего немного там разве что кнопочки да текстовые поля.
Допустим класс кнопки у меня выглядит так

TButton = class
protected
width, height : word;
visible : boolean;
positionX, positionY : integer;
baseTexture, hoverTexture ...
KUKA
16.07.2013 10:45:29
Форум: Free Pascal Compiler
Тема: Length и динамические структуры
Ответы: 9
Просмотры: 7929

Re: Length и динамические структуры

А как переменные-то объявлены?
Например
Glyphs : array of GlyphStructure;

Вообще иногда случаются странные вещи по поводу объявления. Например не позволяет объявить функции возвращаемый тип как "array of Something", а если объявить type TSomething = array of Something, то работает ну и ...
KUKA
16.07.2013 09:51:45
Форум: Free Pascal Compiler
Тема: Length и динамические структуры
Ответы: 9
Просмотры: 7929

Re: Length и динамические структуры

Какая-то совсем нелогичная ошибка. А можно фрагмент кода, который ее вызывает?


for i := 0 to Length(Glyphs) - 1 do
if ( Ord( c ) = Glyphs[i].id ) then begin
GetGlyph := Glyphs[i];
exit();
end;
...
k := Length( kernings );

Поменял на High ...
KUKA
14.07.2013 20:18:30
Форум: Free Pascal Compiler
Тема: Length и динамические структуры
Ответы: 9
Просмотры: 7929

Length и динамические структуры

Есть динамический массив какой-то структуры, в процессе обработки файла я изменяю длину этого массива через SetLength()
Но потом, если я захочу узнать длину этого массива, пытаюсь использовать Length( DynArray ) и выдает странную ошибку
31.jpg
Собственно почему? Спецификация гласит:

function ...
KUKA
14.07.2013 19:08:03
Форум: Free Pascal Compiler
Тема: 866 в UTF-8 [решено]
Ответы: 5
Просмотры: 6495

Re: 866 в UTF-8

debi12345 писал(а):Да, с опцией компиляции "-Fcutf8".

Благодарю, все работает!
KUKA
14.07.2013 10:44:16
Форум: Free Pascal Compiler
Тема: 866 в UTF-8 [решено]
Ответы: 5
Просмотры: 6495

Re: 866 в UTF-8

Подключил модуль, получилась какая-то фигня
CP866ToUTF8('Привет мир') - передал в WideString, сам исходник был сохранен как CP866.
Получилось вот что
44.png

GetDefaultTextEncoding возвращает CP1251, но я думаю он возвращает кодировку системы, все наверно из-за формата, в котором паскаль ...
KUKA
13.07.2013 19:55:21
Форум: Free Pascal Compiler
Тема: 866 в UTF-8 [решено]
Ответы: 5
Просмотры: 6495

866 в UTF-8 [решено]

Столкнулся с проблемой, что текст, который я передаю в строку, хранится в 866 кодировке, и поэтому на выходе я получаю, что-то типа такого:
32.png

на сколько я знаю есть класс WideString, который хранит расширенную таблицу символов, но это проблемы не отменяет, вместо тех крякозябр просто вопросы
KUKA
11.07.2013 09:29:28
Форум: Free Pascal Compiler
Тема: TXMLDocument. Читает со второго атрибута [решено]
Ответы: 5
Просмотры: 5878

Re: TXMLDocument. Читает со второго атрибута

На сайтах freepascal есть какие-нибудь спецификации классов и методов TDOMNode, TXMLRead\Write? Сколько искал есть только мануал. Или это только в исходники лезть?
KUKA
10.07.2013 22:26:41
Форум: Free Pascal Compiler
Тема: TXMLDocument. Читает со второго атрибута [решено]
Ответы: 5
Просмотры: 5878

TXMLDocument. Читает со второго атрибута [решено]

Есть XML - файл
<chars count="211">
<char id="32" x="1021" y="0" width="1" height="1" xoffset="0" yoffset="0" xadvance="18" page="0" chnl="15" />
&#46;&#46;&#46;
Долго не мог словить ошибку, почему значения не те, пока не вывел атрибут отдельно. Мне нужен атрибут id, получаю в качестве 0 ...