richedit +php code einfügen

[Wuaegner]

So geht's:

Delphi-Quellcode:

 var
  code: string;
begin
code := '<?php' + #13#10+
        '$database='+Edit1.Text+#10#13
        +'$sqlhost='+Edit2.Text+#10#13
        +'$sqluser='+Edit3.Text+#10#13
        +'$sqlpass='+Edit4.Text+#10#13
        +'?>';
with FNew.RichEdit1.CaretPos do
  FNew.RichEdit1.Lines.Add(code);
end;