FreePascal.ru

Как заставить прогу, написаную на FPC, искать dll-ки не в своей корневой папке, а, скажем, в папке .\lib?

Vadim , предопределять кол-во символов не имею права: строка заполняется в процессе работы программы и её размер заранее неизвестен.
Putnick , спасибо за совет. Я думал, что работа с AnsiString не отличается от работы с классическими строками. Я так понимаю
{$H+} включает режим, когда тип String ...

а почему S[1]? так ведь запишется только первый символ строки

может стоит так
Write(StringVarible[1], Size);
Нет, для нетипизированных файлов используются свои процедуры, в которых самому надо указывать, сколько байт в какую переменную надо считать.
procedure WriteToMyFile;
var
f: File;
b: Byte;
begin
AssignFile(f, fname);
Rewrite(f, 1 ...

При работе со строками:
SizeOf(переменная) выдаёт 0
Length(переменная) выдаёт количество символов в строке

Что и как надо указать в третьем параметре BlockRead/BlockWrite, чтобы строку можно было нормально записать и считать из нетипизированного файла?
И почему при записи в файл строки Ansi ...

Спасибо за ответы

А можно привести обращение к элементам записи к виду vec[n], наподобие того, как это делается со свойствами класса, помеченными директивой default?

Как реализовать такой тип данных, содержащий два вещественных числа, чтоб к переменной этого типа можно было обращаться и как к записи с двумя полями, и как к массиву из двух вещественных чисел, например
vec.x равносильно vec[0]
vec.y равносильно vec[1]
???

А что рациональнее использовать, object или class?

Спосибо, я нашел решение)
На самом деле ситуация была сложнее...
У объекта был конструктор
constructor TLalala.Init;
Который выполнялся сразу после присваивания процедурной переменной значения. Всё дело в нём.
Решение проблемы я нашел случайно...
Если убрать конструктор или поместить его перед ...

Всем здрасте =)
Вобщем ситуация такова:
Есть тип
type
TLalala = object
lalaProc: procedure;
end;

Есть экземпляр типа
var
Lalala: TLalala;

Есть процедура
procedure MylalaProc;

При старте проги делаю
Lalala.lalaProc := @MylalaProc;

И в каком то месте кода обязательно ...

До этого работал только с объектами, никаких накладок не возникало.
Взялся за изучение классов. Пишу:

program Project1;

{$mode delphi}{$codepage utf8}{$H+}

uses
SysUtils, Windows;

type
MyClass = class(TObject)
private
sName : String;
iNumber : Integer;
eValue : Extended ...

Да, именно это мне и надо было, большое спасибо!

Всем доброго времени суток!
Проблема на самом деле банальна, но с подвохом...
Вобщем, в лазарус, скажем, MessageBox(0,0,'Русь',0); выдаст сообщение с абракадаброй вместо русского слова. Проблема обходится, если использовать функцию перевода кодировок MessageBox(0,0,PChar(UTF8ToAnsi('Русь')),0 ...