Doch funktioniert es nicht, und Delphi gebt keine fehler?
HILFE...
Delphi-Quellcode:
procedure TFormServers.CheckCurrentServer;
begin
with GridServers do
begin
CheckServer(Cells[Col,Row]);
if (Cells[Col,Row] <> '') then
NextServer
else
begin
ContinueWaiting;
end;
end;
end;
Peter
[edit=Sharky]Delphi-Tags gesetzt. Bitte zukünftig selber machen Mfg, Sharky[/edit]