Forum: Netzwerke
Delphi
by lowell,
6. Jan 2005
Habe es selbst hinbekommen:
procedure TForm1.FlatButton2Click(Sender: TObject);
var i,x:integer;
begin
for i := 0 to listbox1.Items.Count-1 do begin
x:= StrToInt(listbox1.Items.Strings);
Webbrowser1.OleObject.document.forms.item('form1').item('select').item(x-1).selected := true;
end;
end;
Forum: Netzwerke
Delphi
by lowell,
6. Jan 2005
Ok, das war mal echt peinlich :oops:
Besten Dank- funktioniert einwandfrei. Eine Frage hätte ich diesbezüglich noch- dann wäre es soweit auch geschafft:
Ich möchte gerne die zu markierenden Einträge über eine Schleife abfragen- diese sind z.b. in einer Listbox:
var i:integer;
begin
for i := 0 to listbox1.items.count-1 do begin...