hi
Ich habe jetzt mit einer repeat Schleife versucht, nur es kommt nicht wirklich das gewünschte raus
Delphi-Quellcode:
repeat
dec(time);
if time = 0
then
begin
uclient.Broadcast(Computername, 10030);
uclient.Broadcast(idipwatch1.CurrentIP, 10030);
time:= 10;
end;
until
time= 11;
//das habe ich eingesetzt, weil er umbedingt eine until Anweisung wollte, ich denke, es hat aber nichts mit dem eigentlich Problem zu tun
wenn ich das Programm auf R1 und dann R2 starte hängen sich beide auf.
Time ist im OnCreate auf 10 gesetzt worden.