Registriert seit: 10. Jun 2002
Ort: Jena
1.128 Beiträge
Delphi 10.4 Sydney
|
27. Jun 2002, 21:15
Code:
procedure TForm1.RadioGroup2Click(Sender: TObject);
begin
try
case RadioGroup2.ItemIndex of
0: with Iniset do
WriteInteger('pause','mpause',0);
1: with Iniset do
WriteInteger('pause','mpause',1);
2: with Iniset do
WriteInteger('pause','mpause',2);
end;
finally
Iniset.Free;
end;
Iniset ist deklariert
Peter +++Versuch es nicht mit Gewalt + Nimm einen größeren Hammer! +++
|
|
Zitat
|