Delphi-PRAXiS
Seite 3 von 4     123 4      

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Tutorials und Kurse (https://www.delphipraxis.net/36-tutorials-und-kurse/)
-   -   Delphi Wie erstelle ich einen Texteditor? (https://www.delphipraxis.net/19968-wie-erstelle-ich-einen-texteditor.html)

inherited 25. Feb 2006 09:15

Re: Wie erstelle ich einen Texteditor?
 
In Delphi ist es Problematisch Form-Proceduren so zu definieren...
Geh in deine Form und doppelkleicke im OI unter ereignisse Doppelt auf OnShow und kopier dann den Quelltext da rein

inherited 25. Feb 2006 09:18

Re: Wie erstelle ich einen Texteditor?
 
Zitat:

Zitat von Gabberman
Ich hab da mal ne Frage.
Ich hab folgenden Quellcode:
Delphi-Quellcode:
   AssignFile(H, 'daten/schluss.fbe');
    Rewrite(H);
    Writeln(H, :?: :?: :?:
    Closefile(H);
Mein Richeditfeld heißt 'schlusssatz'.
Gibt es irgend eine Möglichkeit den Inhalt von diesem in der Datei H zu speichern????

:gruebel: :gruebel: :gruebel: :gruebel: :gruebel:


Wäre schön wenn ihr mir helfen könntet!!!

Sorry for Doppelpost:
Entweder gehst du jede Zeile dursch und schreibst sie mit WriteLn rein, oder du packst alles in eine Zeile(sicherlich die unansehnlichere wariante) mit schlussatz.text

Dirkmswt 31. Okt 2006 11:26

Re: Wie erstelle ich einen Texteditor?
 
Also ich finde das ganze etwas karg :-D
Schau dir mal die Demos bei der RX Library an,das Richedit Tool hat so viele Funktionen das du damit Wordpad kräftig einheizen kannst :shock:
Ist ähnlich zu Programmieren und ziemlich alle funktionen die das Standard Richedit benutzt sind auch enthalten + Objekte Einbetten etc...
Ich verwende die Library schon seit Delphi4 und bin sehr zufrieden mit dem Package an Komponenten.
Die Lib ist zwar auch in dem Jedi Pack dabei,der ist aber recht riskant zu Installieren da
Delphi schnell mal anzeigt das keine Komponenten mehr Registriert sind.

Störtebeker 31. Jul 2007 22:27

Re: Wie erstelle ich einen Texteditor?
 
Wollt mal fragen, ob das auch mit SynEdit geht?

Wenn ich in der Toolbar dem Button für BOLD folgendes zuweise, sagt Delphi:

Delphi-Quellcode:
procedure TForm2.ToolButton18Click(Sender: TObject);
begin
if ToolButton18.Down then
SynEdit1.SelAttributes.Style:=SynEdit1.SelAttributes.Style + [fsBold]
else
SynEdit1.SelAttributes.Style:=SynEdit1.SelAttributes.Style - [fsBold]
end;
[Error] Main.pas(348): Undeclared identifier: 'SelAttributes'
[Error] Main.pas(348): Missing operator or semicolon

und was mir aufgefallen ist, wenn ich die fonts in die combobox lade, sind die völlig ungeordnet.
Also nicht von A nach Z

lbccaleb 31. Jul 2007 22:32

Re: Wie erstelle ich einen Texteditor?
 
cooler einsteiger editor

Dirkmswt 2. Aug 2007 01:29

Re: Wie erstelle ich einen Texteditor?
 
Zitat:

Zitat von Störtebeker
Wollt mal fragen, ob das auch mit SynEdit geht?

Wenn ich in der Toolbar dem Button für BOLD folgendes zuweise, sagt Delphi:

Delphi-Quellcode:
procedure TForm2.ToolButton18Click(Sender: TObject);
begin
if ToolButton18.Down then
SynEdit1.SelAttributes.Style:=SynEdit1.SelAttributes.Style + [fsBold]
else
SynEdit1.SelAttributes.Style:=SynEdit1.SelAttributes.Style - [fsBold]
end;
[Error] Main.pas(348): Undeclared identifier: 'SelAttributes'
[Error] Main.pas(348): Missing operator or semicolon

und was mir aufgefallen ist, wenn ich die fonts in die combobox lade, sind die völlig ungeordnet.
Also nicht von A nach Z

Ähm also schau doch mal die Unit an und such mal nach SelAttributes,könnte evtl auch setattribute heißen;-)
Kenne die Komponente nicht,bin mit der von der RXLib zufrieden auch wenns jetzt auch schon RTF3.0 gibt;-)
Nur mal so ne Frage,warum willst du überhaupt noch einen Texteditor Bauen?
Es gibt soooooooo viele Editoren wie Word und Kompatible,Quellcode Editoren für alle möglichen Languages usw....
Wenn du das Proggen Lernen willst würd ich dir empfehlen die Grundlagen zu den Technologien selbst zu erarbeiten mit einem möglichst Simplen Editor wie die RTF Komponente von Delphi und einem Guten Buch!
Würde es dir jedenfalls Empfehlen den auch die Freien Komponenten haben so Ihre Macken und man muss schnell mal einen Workarround schreiben :!:
Beim Toolbutton fängts Beispielsweise schon an :mrgreen:
Weil toolbutton.down:=not Toolbutton.down funzt nämlich so garnicht,warum auch immer. :coder2:
Ein Trick wäre Z.B down als Externe Boolean Variable auszulagern.denn so wie du das vorhast wird das nix.

mistx 15. Sep 2007 16:19

Re: Wie erstelle ich einen Texteditor?
 
Habe ein Problem damit:

Delphi-Quellcode:
procedure TMainForm.AoeffnenExecute(Sender: TObject);
begin
     If OpenDialog1.Execute then
  begin
    if FileExists(OpenDialog1.Filename) then
    begin
      Richedit1.Lines.LoadfromFile(OpenDialog1.Filename);
end;

end.
Und dann steht als Fehler das hier:

[Pascal Fehler]Mainfrm.pas(43): E2003 Undifinierter Bezeichner:'OpenDialog1'

Was soll ich machen?

inherited 15. Sep 2007 16:32

Re: Wie erstelle ich einen Texteditor?
 
hast du eine OpenDialog auf die Form gezogen?

mistx 16. Sep 2007 00:15

Re: Wie erstelle ich einen Texteditor?
 
daran lag es aber jetzt kommt:
der rote strich bei
end;
hier kommt der nun end;
also beim zweiten end; das letzt im Quelltext und der meint:
[Pascal Fehler] Mainfrm.pas(53):E2029 Anweisung erwartet, aber Dateiende gefunden
[Pascal Fataler Fehler] Project2.dpr(5): F2063 Verwendete Unit 'Mainfrm.pas' kann nicht compiliert werden

Die Muhkuh 16. Sep 2007 00:38

Re: Wie erstelle ich einen Texteditor?
 
Zeig am Besten mal den ganzen Code ;-)


Alle Zeitangaben in WEZ +1. Es ist jetzt 02:11 Uhr.
Seite 3 von 4     123 4      

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz