Einzelnen Beitrag anzeigen

XPLOSIV

Registriert seit: 31. Aug 2007
74 Beiträge
 
#1

Einfügen in SynEdit geht nicht

  Alt 8. Sep 2007, 23:21
Also, ich hab nen Button der ein neues TabSheet mit einem SynEdit erstellt, doch da geht die einfügen funktion (auch STRG+V) nicht.

Delphi-Quellcode:
var
  ts: TTabSheet;
  se: TSynEdit;
  fn: TFileName;
begin
  ts := TTabSheet.Create(PageControl1);
  ts.PageControl := PageControl1;
  if fn = ''
    then ts.Caption := Format('Tabelle [%d]', [PageControl1.PageCount])
    else ts.Caption := ExtractFileName(fn);
  ts.Hint := fn;
  se := TSynEdit.Create(ts);
  se.Parent := ts;
  se.Align := alClient;
  se.ActiveLineColor:= $00FFFF80;
  se.Gutter.ShowLineNumbers:= TRUE;
  if fn = ''
    then se.Lines.Clear
    else se.Lines.LoadFromFile(fn);
  Files.AddObject(fn, se);
  PageControl1.ActivePage := ts;
  se.SetFocus;
end;
  Mit Zitat antworten Zitat