Forum: GUI-Design mit VCL / FireMonkey / Common Controls
by PeterKiers,
17. Mär 2005
Ich habe das Problem schon selbst gelöst.
Vielen Dank für die Hilfe
procedure TFormServers.NextServer;
begin
with GridServers do
if Row < Pred(RowCount) then Row := Succ(Row)
else if Col < Pred(ColCount) then
begin
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
by PeterKiers,
16. Mär 2005
Hallo,
Wenn ich diese Prozedur ausführe, kontroliert er doch die leere Strings.
Wenn ich meine Prozedur ausführe, tut er dass was ich möchte, nur beim kontrolieren
der Servers, schlägt er immer der erste String über.
1 procedure TFormServers.CheckCurrentServer;
2 begin
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
by PeterKiers,
15. Mär 2005
Doch funktioniert es nicht, und Delphi gebt keine fehler?
HILFE...
procedure TFormServers.CheckCurrentServer;
begin
with GridServers do
begin
CheckServer(Cells);
if (Cells <> '') then
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
by PeterKiers,
15. Mär 2005
Hallo liebe Leute!
Ich bin derzeit mit einem Programm beschäftigt,dass eine Anzahl Servers
controliert(Pingen).
Ich habe eine Stringgrid mit einer Menge Server-namen
darin, und mein Programm läuft durch die Zelle um die Server-namen zu
controlieren.
Aber