globale Variablen
Nja, wenn das Memo nur 2 Zeilen hat, dann kann auch nur bei 2 Zeilen der Inhalt gesetzt werden.
Dein Glück, oder Pech, dass Memo.Lines (TMemoStrings), entgegen zu einer TStringList, beim Zugriff auf nichtexistierende Zeilen
keine Exception auslöst, sondern dann einfach still und heimlich nichts macht.
Delphi-Quellcode:
Memo1.Text := AktienName.Text;
// oder
Memo1.Lines.Text := AktienName.Text;
// oder
Memo1.Lines := AktienName;
// oder
Memo1.Lines.Clear;
Memo1.Lines.AddStrings(AktienName[i]);
Und würde man den Komponenten und Events ordentliche Namen geben, dann wären solche (*Kommentare*) nutzlos.
PS: Zusätzlich ein "etwas" aktuelleres Delphi und schon hat man schöne Dinge, seit über 10 Jahren.
Delphi-Quellcode:
/// <summar> Speichern </summary>
procedure TForm1.BitBtn4Click(Sender: TObject);
https://www.embarcadero.com/de/products/delphi/starter
https://docwiki.embarcadero.com/RADS...n/Help_Insight
oder
https://devjetsoftware.com/products/...ation-insight/
und viele weitere Projekte, wie Hilfegeneratoren