不能在备忘录中将单词拆分为单个字母

Question

Call#enqueue

这是我的代码，用于将一个单词分成一个备忘录中的单个字母，每个字母都在不同的行中。

我的代码只返回单词的最后一个字母。我觉得这很接近，但我不知道如何继续前进。任何帮助将不胜感激。

Answer 1

Delphi不像是Python，其中空白是重要的并且定义了块。在Delphi中，您必须使用begin和end标记块，在本例中为for循环：

procedure TfrmDispOneChar.btnDisplayClick(Sender: TObject);
var
    K, iLength : integer;
    cOne : char;
    sCode : string;
begin
    sCode := edtCode.Text;
    iLength := Length(sCode);
    for K := 1 to iLength do begin
        cOne := sCode[K];
        memOutput.Lines.Add(cOne);
    end;
end;