Forum: Sonstige Fragen zu Delphi
Delphi
by Moyyer,
6. Jan 2004
procedure TPowerplay.Vorr(Markiert: integer);
var a: TComponent;
begin
sel := Markiert + 1;
a.Selected := true;
label4.Caption := a.Items;
label3.caption := Pfadlist.Items;
if sel = a.Items.Count - 1 then begin vor.Enabled := false;
zu.Enabled := true;
end;
Forum: Sonstige Fragen zu Delphi
Delphi
by Moyyer,
5. Jan 2004
procedure TPowerplay.Vorr(Markiert: integer);
begin
sel := Markiert + 1;
pllist.Selected := true;
label4.Caption := pllist.Items;
label3.caption := Pfadlist.Items;
if sel = pllist.Items.Count - 1 then begin vor.Enabled := false;
zu.Enabled := true;
end;
mp3play;