Ergebnis der Suchanfrage

• Forum: GUI-Design mit VCL / FireMonkey / Common Controls

  Re: TRichEdit + Automatisch Einrücken?

    Delphi
    by sECuRE, 5. Feb 2005
  Hi,
  
  nach einigen Überlegungen und ein bisschen rumprobieren hab ich nun folgenden Code auf die Beine gestellt - für alle Interessierten:
  
  procedure TMainForm.Memo1KeyDown(Sender: TObject; var Key: Word; Shift: TShiftState);
  var temp:string;
  c,depth:integer;
  const IndentKey: Word = VK_SPACE;
  IndentDepth: integer = 2;
  function CountOccasions(input,need:string):integer;
• Forum: GUI-Design mit VCL / FireMonkey / Common Controls

  TRichEdit + Automatisch Einrücken?

    Delphi
    by sECuRE, 17. Jan 2005
  Hi,
  
  ich würde für meinen Texteditor gerne eine Funktion einbauen, die es erlaubt, Quelltext automatisch während dem Schreiben einzurücken, so wie bei "vi" zB, falls euch das was sagt ;). Momentan mache ich es so, dass ich VK_UP, VK_RETURN und VK_DOWN abfange und dann überprüfe, ob in der jeweiligen Zeile eine { bzw } vorkommt. Daraus bildet sich dann die Variable bracket_level, die speichert,...