Edit & randomize

← →
glGLU (2004-05-10 18:29) [0]

подскажите как мне в Edit из *.ini грузить по одному названию в случайном порядке randomiz"ом???

← →
zeqfreed © (2004-05-10 18:38) [1]

допустим ini:
"[SECT]
Count = 3;
0=Bla
1=Bla-Bla
2=Bla-Bla-Bla"

...uses INIFiles;..

...var
ini : TIniFile;
max : Cardinal;
begin
ini := TINIFile.Create("my.ini");
max := ini.ReadInteger("SECT","Count",0);
Edit1.Text := ini.ReadString("SECT",IntToStr(Random(max)),0);
ini.Destroy;
end;...

Edit &amp; randomize Найти похожие ветки

Edit & randomize Найти похожие ветки