@Delphi.Narium
Natürlich würde das reichen...
Habe es aber SO geschrieben um es "Sichtbar" zu machen was passiert...
Delphi-Quellcode:
uses DDsnippets;
procedure TForm1.Button1Click(Sender: TObject);
begin
ComboBox1.Items.Clear; // wäre auch nicht schlecht! oder?
DriveDisplayNames(ComboBox1.Items);
ComboBox1.ItemIndex := 0;
end;
Ja aber:
Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
var
SL: TStringList;
begin
SL:=TStringList.Create; // wird erstellt
try
DriveDisplayNames(SL); // wird gefüllt
ComboBox1.Items.Assign(SL); // wird zugewiesen - die Stringliste, nicht der Inhalt - Items zeigt also auf SL
ComboBox1.ItemIndex:=0;
finally
SL.Free; // wird weggeworfen, obwohl oben zugewiesen.
end;
end;
Und diese Abfolge kann "irgendwann" zu 'ner Schutzverletzung führen.
Delphi-Quellcode:
uses DDsnippets;
procedure TForm1.Button1Click(Sender: TObject);
begin
ComboBox1.Items.Clear; // wäre auch nicht schlecht! oder?
DriveDisplayNames(ComboBox1.Items);
ComboBox1.ItemIndex := 0;
end;
Das Clear täte ich jetzt nicht hier schreiben, da ich davon ausgehe, dass eine Methode, die die Aufgabe hat eine Stringliste zu befüllen, gefälligst selbst dafür sorgt, dass anschließend nur der von ihr erwartete Inhalt in der Stringliste enthalten ist. Daher gehört das Clear für meine Begriffe in die Methode DriveDisplayNames. Wenn dem nicht so wäre und ich sie in 1000den Programmen nutze, müsste ich 1000de Male das Clear schreiben (und alle Nutzer darüber informieren, dass sie vor dem Aufruf der Methode gefälligst ein Clear zu schreiben haben), so aber nur einmal. Bin halt faul
Enthielte die Methode DriveDisplayNames kein Clear, hieße sie bei mir AddDriveDisplayNames, damit man am Namen bereits erkennt, dass sie was hinzufügt. Hier müsste dann der Nutzer selbst für das Clear sorgen
Ist aber alles irgenwie auch ein bisserl Geschmackssache.