Заполнение БД (Delphi)

[SunKnight]

Лучше всего его сделать самому (при помощи кнопок). Допустим сохранить Table1.Post; и так далее.

[Air]

Логично... спасибо.

[Air]

По мимо того что БД можно просто редактировать из "DBGrig" мне нужно реалезовать добавление ("Новая запись") при помощи метода "InsertRecord".

var InsData:array of TVarRec; //глобальная
...
procedure TForm3.Button1Click(Sender: TObject);
begin
SetLength(InsData,1); //массив маленький, потому что много ругается
InsData[0].VInteger:=3; //это "Keys" ключевое поле
InsData[1].VString:=PShortString(LabeledEdit1.Text);// текстовое поле
Form2.Table1.InsertRecord(InsData);
end;

Проблема в том, что "InsData[0]" добавляет, а "InsData[1]" нет.
Я перебрал все св-ва "TVarRec", но во вторую колонку так ничего и не записалось, что я делаю не так

[SunKnight]

SetLength(InsData,2);
Увеличил размер до 2 и все заработало, только странно что во вторую колонку записывает какоето числовое значение.

[Air]

Действительно странно... попробую разобраться.
Благодарю за помощь.

[Air]

InsData[1].VPChar:=pchar('я');
InsData[1].VChar:=char('я');
И та и другая записывает код символа, как же записать сам символ?...