

Delphi - button
Zdravím tu všechny.
Z delphi znam jen zaklady co do mně tlačili před par lety ve škole.
Poradte nebo mně někam nasměrujte.
Vytvořím prazdný form1 určite šiřky a 0 vyšky.
Další form 2 bude jako setup - přidej button.
Přes tento setup form bych chtěl, abych si moh přidat do form1 třeba 5 buttonu pod sebou.
V každem buttonu by bylo tohle, jen adresa jina a ukladat třeba do ini.
var
lHTTP: TIdHTTP;
s: string;
begin
lHTTP := TIdHTTP.Create(nil);
try
s := lHTTP.Get('http://192.168.15.44');
finally
lHTTP.Free;
end;
V tom m je vždy načtena ta adresa 192.168.1.15, 192.168.1.20, 192.168.1.28
Ja myslel, že když v procedure TForm1.Button1Click změním to s:= lHTTP.Get('192.168.1.15');
na s:= lHTTP.Get(m); tak každy buton bude mit jinou adresu.
Tak vyřešeno.
Nakonec jsem to nacpal do StringGridu.