memo(oder ähnliches) als html umwandeln

[Alexander]

versuch mal so:

Delphi-Quellcode:

procedure TForm1.Button2Click(Sender: TObject); 
var i,j: integer; 
begin 
  Memo2.Lines.clear; 
  for i := 0 to Memo1.Lines.Count-1 do 
    begin 
     Memo2.Lines.Add(Memo1.Lines[i] + '
'); 
     If Memo1.Lines[i] = '' then 
      begin
       j := i; 
       Memo2.Lines[i] := Memo1.Lines[i] + '

</p>' 
      end;
    end; 
end;

[dragi]

Danke, so funzt es! Wohl der toale newbie Fehler ...:)

[BungeeBug]

Hi,
ich hatte grad langeweile also hab ich auch mal ne "Lösung" gebastelt :)

[dragi]

Hehe, so schnell geht das :)

Nur muss es alle Formatierung können, Fett, Kursiv, Schriftgrösse, Farbe und so.....

Deshalb sitz ich da als newbie nen bisschen länger dran.

Würde gerne mit der maus einen Zeile markieren und dann per Checkbox ändern.

Hatte mir das so vorgestellt aber klappt noch nicht meldet Fehler in Bereichsprüfung:

Delphi-Quellcode:

procedure TForm1.CheckBox1Click(Sender: TObject);
var i: integer;
begin
  if memo1.SelText = true then
  begin
  Memo1.Lines[i] := Memo1.SelText;
  Memo2.Lines[i] := Memo1.SelText[i] + 'Fett';
  end;
end;

bzw. so geht es gar nicht. Den Fehler meldet er wenn ich das so mache:

Delphi-Quellcode:

procedure TForm1.CheckBox1Click(Sender: TObject);
var i: integer;
begin
 
  Memo1.Lines[i] := Memo1.SelText;
  Memo2.Lines[i] := Memo1.SelText[i] + 'Fett';

end;

geht mir nur darum das er erkennt welche Zeile ich markiere und dann etwas dazu schreibt. Also, ich markiere die textzeile mache dann ein Haken in der Checkbox dann soll er in der zeile etwas hinzufügen

[Alexander]

Also mit CaretPos kannst du das machen. Da hast du die X und Y-Koordinate...
Aber irgendwie ist das nicht so elegant das so zu machen, finde ich wenigstens ;-)
Wie wäre es wenn du einfach eine Richedit-Komponente nimmst, die kann dann auch die Formatierungen darstellen. Das wäre doch eleganter oder?

[Alexander]

Wenn du das damit machen willst, kannst du hier mal nach Richedit und formatierung oder so suchen und/oder dir das Borland-Beispiel ankucken (unter Demos/Richedit)
Ist aber auch ncit ganz so optimal das Beispiel. Hier gibt es sicherlich bessere Beispiele