Ich habe das kurze Codestückchen mal eben kompiliert und die Exe im Reflector betrachtet. Die Umschaltung auf Delphi ergab:
Delphi-Quellcode:
procedure MainForm.SetChildrenVisibility(parent: Control; visible: boolean);
begin
for control1 in parent.Controls do
begin
control1.Visible := visible
end
end;
Warum jetzt die Variable
control1 nirgendwo deklariert wird, kann ich dir aber nicht sagen.
Evtl. ein kleines Problem im Programm, denn die VB-Variante scheint korrekt zu sein:
Code:
Private Sub SetChildrenVisibility(ByVal parent As Control, ByVal visible As Boolean)
Dim control1 As Control
For Each control1 In parent.Controls
control1.Visible = visible
Next
End Sub