Mit einer For-Schleife in Delphi das Alphabet ausgeben



  • Kann mir einer mal den Quellcodeausschnitt zeigen.
    Ich habe bisher das hier:

    var ch: char;
    
    begin
        //Inhalt der Listbox löschen
        lb_ausgabe.clear
        for ch:= 'A' to 'Z' do begin
            lb_ausgabe.items[] := ch;
        end;
    

    Was muss ich in ".items" reinschreiben das das funktioniert?
    Mit freundlichen Grüßen



  • soll das eine listbox sein? vielleicht ch-'A' (nach integer gacastet) oder ch-'A'+1 (weil in pascal indizes mit 1 geginnen).
    btw, nur geraten.
    🙂



  • Die Items müssen per 'Add' hinzugefügt werden, d.h.

    var ch: char;
    
    begin
        //Inhalt der Listbox löschen
        lb_ausgabe.clear(); // Klammern fehlten
        for ch:= 'A' to 'Z' do
            lb_ausgabe.Items.Add(ch);
    end;
    

    Evtl. auch erst eine Umwandlung von char nach AnsiString, d.h.

    AnsiString s;
    s += ch;
    lb_ausgabe.Items.Add(s);
    


  • ;fricky schrieb:

    oder ch-'A'+1 (weil in pascal indizes mit 1 geginnen).

    Nur String-Indizes (aus historischen Gründen) und solche, die du entsprechend definierst (etwa var Foo: array[1..10] of Integer; ). Die meisten ansonsten gebräuchlichen statischen Arrays sowie alle dynamischen werden ab 0 indiziert.

    Th69 schrieb:

    Evtl. auch erst eine Umwandlung von char nach AnsiString

    String bitte, nicht AnsiString.


Anmelden zum Antworten