Einzelnen Beitrag anzeigen

hoika

Registriert seit: 5. Jul 2006
Ort: Magdeburg
8.270 Beiträge
 
Delphi 10.4 Sydney
 
#1

DUnit: FillCombobox testen -> no parent

  Alt 6. Mai 2015, 16:45
Hallo,
ich stehe gerade auf dem Schlauch.

In einem TestCase geht es um den Test einer ComboBoxFüllRoutine (jaja).

Delphi-Quellcode:
procedure FillComboBox(ACB: TComboBox);
begin
  ACB.Items.Clear; // no parent
end;

// Test-Unit

procedure TTestCase.Test_FillComboBox;
var
  CB: TComboBox;
begin
  CB := TComboBox.Create(nil);
  CB.Parent := ???

  FillComboBox(CB)
end;
Was gebe ich als Parent an ?
Application.MainForm hat schon mal nicht geklappt.


PS: Ist nicht meine Routine, ich muss sie nur Testen ...


Danke

Heiko
Heiko
  Mit Zitat antworten Zitat