Tini в делфи

[danekne]

Обьясните недалекому:

procedure TForm1.FormCreate(Sender: TObject);
var e,i,j:integer;
t:char;
myini:TIniFile;
begin
myini:=TiniFile.create('c:\windows\config.ini');
myini.readstring('keyword','key',k);
myini.free;

procedure TForm1.FormClose(Sender: TObject; var Action: TCloseAction);
var myini:TiniFile;
begin
if k<>'0' then
begin
myini:=TiniFile.Create('config.ini');
myini.WriteString('keyword','key',k);
myini.Free;
end;
end;

Содержимое ini:
[keyword]
key=предложение

При закрытии формы ini переписывается. Но при создании - ни фига! при трассировке k - '' k - соответственно string

[Google2010]

поменяйте

myini.readstring('keyword','key',k);

на

k:=myini.readstring('keyword','key','');
Showmessage(k);// для проверки чтения

[danekne]

Спасибо) Все так