Jak pobrać wersje MMSystem.
TOY
Najpierw dodajemy do uses MMSystem a następnie :
procedure TForm1.Button1Click(Sender: TObject);
var
a:Cardinal;
begin
a:=mmsystemGetVersion;
SpinEdit1.Value:=a;
end;
Zobacz także:
Najpierw dodajemy do uses MMSystem a następnie :
procedure TForm1.Button1Click(Sender: TObject);
var
a:Cardinal;
begin
a:=mmsystemGetVersion;
SpinEdit1.Value:=a;
end;
Zobacz także:
No całkiem przydatne :)
spoko..dzięki za info ;-)
Sugeruje pisać zamiast:
:
Bądź jeśli chcesz zmienić tytuł dla linku, to Tytuł