AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Zurück Delphi-PRAXiS Projekte Memo-Komponente zum Testen
Thema durchsuchen
Ansicht
Themen-Optionen

Memo-Komponente zum Testen

Ein Thema von xaromz · begonnen am 22. Aug 2005 · letzter Beitrag vom 20. Nov 2005
Antwort Antwort
Seite 1 von 2  1 2      
xaromz
Registriert seit: 18. Mär 2005
Hallo,

wie ich schonhier erwähnt habe bin ich gerade beim Schreiben einer Memo-Komponente mit einigen Erweiterungen:
  • Unterscheidung zwischen Zeilenwechsel und Absatz
  • Basic-Formatierungen ähnlich wie RTF (fett, kursiv...)
  • Anzeige von Steuerzeichen (ähnlich wie Word)
  • Einbindung von ASpell zur Rechtschreibprüfung
  • Unicode-Support
  • Einfügen/Überschreiben
Ich hab den momentanen Stand mal hochgeladen (ein kleiner Beispieleditor ist auch dabei). Vielleicht kann sich ja mal einer die Komponente anschauen und Fehler finden oder Verbesserungsvorschläge machen (Ein mehrfaches Undo/Redo ist schon in Planung, evtl. auch RTF-Im-/Export).
Zum Laden von Dokumenten greift mein Beispieleditor auf Word zurück (LoadFromMSWord), um z. B. *.doc zu laden (das aber noch ohne Formatierungen). Wer kein Word hat sollte einfach LoadFromFile verwenden. Dann geht aber nur noch *.txt.
Die Nutzung der Komponente ist selbstverständlich auch gestattet.

Damit die Rechtschreibung funktioniert muss Aspell sowie ein oder mehrere Wörterbücher installiert werden. Wie das geht findet man auf der Seite von ASpell.

Ich freue mich auf Rückmeldungen.

Gruß
xaromz
Miniaturansicht angehängter Grafiken
screenshot_134.jpg  
Angehängte Dateien
Dateityp: zip mwkedit_175.zip (44,6 KB, 68x aufgerufen)
 
Benutzerbild von toms
toms

 
Delphi XE Professional
 
#2
  Alt 17. Nov 2005, 20:11
Hallo,

Kannst du mal eine EXE Beispiel Programm hochladen, habe grad kein Delphi "zur Hand"
Thomas
  Mit Zitat antworten Zitat
xaromz

 
Delphi 2006 Enterprise
 
#3
  Alt 17. Nov 2005, 20:22
Hallo,

klar doch!

Gruß
xaromz
Angehängte Dateien
Dateityp: exe example_341.exe (753,0 KB, 54x aufgerufen)
  Mit Zitat antworten Zitat
mimi

 
FreePascal / Lazarus
 
#4
  Alt 19. Nov 2005, 18:22
mein vorschlang währe jetzt(habe es jetzt nicht getestet) sowas änliches wie sysedit... dazu zu packen *G*
Michael Springwald
  Mit Zitat antworten Zitat
xaromz

 
Delphi 2006 Enterprise
 
#5
  Alt 19. Nov 2005, 18:39
Hallo,
Zitat von mimi:
mein vorschlang währe jetzt(habe es jetzt nicht getestet) sowas änliches wie sysedit... dazu zu packen *G*


Gruß
xaromz
  Mit Zitat antworten Zitat
Benutzerbild von DGL-luke
DGL-luke

 
Delphi 2006 Professional
 
#6
  Alt 19. Nov 2005, 19:52
er meint wohl synedit...

also eine highlighter-funktion.
Lukas Erlacher
  Mit Zitat antworten Zitat
xaromz

 
Delphi 2006 Enterprise
 
#7
  Alt 19. Nov 2005, 21:21
Hallo,

dachte ich mir schon. Aber dann soll er SynEdit nehmen...
Meine Komponente ist ja nur ein erweitertes Memo mit beschränkten Möglichkeiten zur Textformatierung und Silbentrennung/Rechtschreibprüfung.

Gruß
xaromz
  Mit Zitat antworten Zitat
Benutzerbild von jim_raynor
jim_raynor

 
Delphi 5 Standard
 
#8
  Alt 19. Nov 2005, 21:31
MMh. Kann es sein, dass du in irgendeiner Form Word verwendest? Es öffnet sich nämlich immer ein neuer Prozess. Heisst also die Komponente funktioniert nicht ohne MS-Office?

Das Laden von Dateien dauert verhältnismäßig lange. Vermute mal es hängt mit Word zusammen.
Christian Reich
  Mit Zitat antworten Zitat
Benutzerbild von malo
malo
 
#9
  Alt 19. Nov 2005, 21:44
Zitat von jim_raynor:
Es öffnet sich nämlich immer ein neuer Prozess.
Das ist meistens so, wenn man ein Programm startet

Zitat:
Das Laden von Dateien dauert verhältnismäßig lange. Vermute mal es hängt mit Word zusammen.
Also einen Word-Prozess kann ich bei bestem Willen nicht finden
  Mit Zitat antworten Zitat
Benutzerbild von Daniel B
Daniel B

 
Delphi 2007 Professional
 
#10
  Alt 19. Nov 2005, 21:50
Schau vorher nach ob Eine Office-Anwendung, in Deinem Fall Word geöffnet ist.

Delphi-Quellcode:
function IsOfficeProgActive(sClassName: String): Boolean;
//Aufrufbeispiel
{procedure TForm1.Button1Click(Sender: TObject);
begin
  if IsOfficeProgActive('Word.Application') then
    ShowMessage('Word läuft');
  if IsOfficeProgActive('Excel.Application') then
    ShowMessage('Excel läuft');
  if IsOfficeProgActive('Outlook.Application') then
    ShowMessage('Outlook läuft');
  if IsOfficeProgActive('Access.Application') then
    ShowMessage('Access läuft');
  if IsOfficeProgActive('Powerpoint.Application') then
    ShowMessage('Powerpoint läuft');
end;}

var
  ClassID: TCLSID;
  Unknown: IUnknown;
begin
  try
    ClassID := ProgIDToClassID(sClassName);
    Result := GetActiveObject(ClassID, nil, Unknown) = S_OK;
  except
    Result := False;
  end;
end;
  Mit Zitat antworten Zitat
Antwort Antwort
Seite 1 von 2  1 2      


Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 17:22 Uhr.
Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz