Beiträge von oschulz

oschulz

In der aktuellen Version von WPTools gibt es einen Bug. Beim Speichern nach HTML wird das <html> Tag nicht geschrieben.
Mit der Änderung in der Funktion TWPHTMLWriter.WriteHeader (WPIOHTML.pas) unten ist das Problem behoben.

HTML

if not OptOnlyBody then //V5.21.1
  begin
    {$IFDEF WP6}
    if FXHTMLMode then
    begin
      //  WriteString('<?xml version="1.0" encoding="ISO-8859-1"?>' + #13 + #10);
        WriteString('<!DOCTYPE html>'+ #13 + #10); // PUBLIC "-//W3C//DTD XHTML 1.0 Strict//EN"' + #13 + #10);
       // WriteString('"http://www.w3.org/TR/xhtml1/DTD/xhtml1-strict.dtd">'+#13+#10);// '"[<!ENTITY nbsp " ">]>' + #13 +#10);
        WriteString('<html xmlns="http://www.w3.org/1999/xhtml">' + #13 +#10);
       // WriteString('<!DOCTYPE html>' + #13 + #10);
    end
    //Änderung OLIVER
    else
      Result := WriteString('<html>' + #13 + #10);
    {$ELSE}
    Result := WriteString('<html>' + #13 + #10);
    {$ENDIF}
  end;

Alles anzeigen

Gruß
Oliver Schulz

oschulz

Nachtrag:
der Parameter heißt

Code

-nomergefields

Den Parameter -ignorefields gibt es auch nirgends im Quellcode

oschulz

Ah Super, Danke.

oschulz

Ich möchte die Serienfelder beim Speichern nach HTML löschen. Da aus dem HTML ein Email generiert wird, kann es sein, dass das Emailprogramm auf dem Empfängerrechner auch Serienfelder unterstützt, der dann unter Umständen das Feld nicht in seinem Datasource hat. Diese werden auch für die weitere Verarbeitung nicht benötigt.
Was ist die beste Möglichkeit das Ganze umzusetzen? Die Serienfelder mit DeleteFields löschen funktioniert nicht, da die Quelle (aktueller Text in WPTools) unter Umständen weiter verwendet wird.

Gruß und Danke
Oliver Schulz

oschulz

Ja, das vereinfacht die Sache ein bisschen, da mit dem Dataprovider gleich der Cursor auf den richtigen Datensatz im Datasource gesetzt wird. Gut, danke für die Info.

oschulz

So, ich hab jetzt noch eine bessere Möglichkeit gefunden

Code

procedure TForm1.WPMailMergeGetText(Sender: TObject;
  const inspname: string; Contents: TWPMMInsertTextContents);
begin
  if not (VirtualTable.IsEmpty) and (Length(inspname)>0) then
    if(WPMMDataProvider.ShowFieldNames) then
    begin
      Contents.WideStringValue:=inspname;
    end
    else
    begin
      if not VarIsNull(VirtualTable.FieldByName(inspname).AsVariant) then
        Contents.WideStringValue:= VirtualTable.FieldByName(inspname).AsVariant
      else
        Contents.WideStringValue:='';
    end;
end;

Alles anzeigen

Keine Ahnung, ob es jetzt die optimalste Methode ist, aber damit kann ich UnicodeZeichen problemlos zuweisen.

MfG Oliver Schulz

oschulz

Zitat von wpsupport

Hallo,

Sie müssen den Text als RTF einfügen damit do unicodes übertragen werden.

Sie werden dann als \u... codiert

Julian

Hmm, das ist leichter gesagt als getan.
Da ich ja reine Strings aus der Datenbank bekomme, hab ich jetzt mal versucht, den Text vor dem Einfügen in den Datatsource manuell in RTF zu konvertieren.

Code

'{\rtf1'+chr(13)+chr(10)+ReplaceStr(dataSourceArray[i].dataValue, chr(13)+chr(10), '\par')+'}';

Damit verliert er aber auch die Formatierung und kann trotzdem noch keine Unicodes. Sollte ich mir hier einen WPRichedit erstellen, den String reinladen und das ganze dann wieder als RTF auslesen? Dann wären aber auch die Formatierungen im Urpsrungsdokument hinfällig, oder? Damit habe ich dann aber auch in meinem DataSource extremen Datenoverhead.
Kann ich den nächsten Hinweis haben, wo hier mein Denkfehler liegt?

MfG Oliver Schulz

oschulz

Hallo Julian

Ich habe ein Problem mit der Umsetzung von Unicode Zeichen (Chinesisch, Russisch..) in Serienfeldern.

[Blockierte Grafik: http://www.mycom-net.com/images/unicode_mergefields.jpg]

Wie man sieht, unterstützt WPTools selber die Darstellung der Zeichen. Sofern ich diese aber als reine Textfelder per Mergefields einfügen möchte, bekomme ich nur Fragezeichen.
Wird das noch nicht unterstützt oder muss ich noch irgendwo Unicodemarker, Charset oder ähnliches setzen? Wenn ja, wie mache ich so etwas!
Bis zur VirtualTable die als Datasource für den WPMMDataProvider benutzt wird, scheinen alle Zeichen korrekt enthalten zu sein.

Danke, Oliver

oschulz

Das wären die Möglichkeiten, die mir spontan einfallen.

Code

Zum Laden


WPRichText2.TextLoadFormat:='AUTO'; //oder 'HTML'
WPRichText2.LoadFromString(tempBody);


oder aus Stream


WPRichText2.LoadFromStream(HTMLStream, true, 'AUTO'); //oder 'HTML'
 
oder aus Datei


WPRichText2.LoadFromFile(HTMLFile, true, 'AUTO'); //oder 'HTML' 






Zum Speichern


WPRichText2.SaveToStream(HTMLStream, 'HTML');


oder aus Datei


WPRichText2.SaveToFile(HTMLFile, false, 'HTML');

Alles anzeigen

Gruß Oliver

oschulz

Danke fürs Testen, dann werd ich das auch gleich mal so einbauen :D

oschulz

Ja, ich meine wpAutoDetectHyperlinks.
Der Text im Bild wurde nicht nachträglich geändert, sondern es wurde von vorn bis hinten durch geschrieben, so dass WPTools den Link automatisch setzt.

Hier gibt es im Grunde im Quellcode 2 Probleme zu lösen.

WPCTRMemo.pas

function TWPCustomRtfEdit.KeyPress
Bei Prüfung if Key < #32 then müsste ein #9: AddHistoryChar(#9); hinzugefügt werden, damit der Tab in der Historie mitgeschrieben wird.

function TWPCustomRtfEdit.GetHistoryChars
Funktion um Tab Prüfung erweitern
if (l = count) or (FHistory[i] = #0) or (FHistory[i] = #9)

Das Problem dabei ist, das ich nicht weiß, welche Auswirkungen es hat, wenn in der Historie das Tab-Zeichen mitgeschrieben wird. Auf den ersten Blick funktioniert es zumindest einwandfrei auch bei Tabs.

oschulz

Seit der letzten (oder vorletzten?) Version gibt es die Möglichkeit, Emailadressen automatisch als Link zu formatieren. Wenn vor der Emailadresse ein TAB Zeichen ist, bringt ihn das irgendwie durcheinander. Der Email-Link fängt schon weit vor der Emailadresse an. Das ganze ist nachstellbar. Ich habe die Funktion in Quellcode leider nicht finden können, sonst hätte ich schon selbst nach der Ursache gesucht.

[Blockierte Grafik: http://www.mycom-net.com/images/wptools_link_fehler.jpg]

Bei der ersten Email hat er zwar die Adresse korrekt erkannt, aber dafür ein "k" angehangen.

oschulz

Leider kann ich nicht wirklich prüfen, wie die Daten in und aus der Datenbank kommen, da es sich um dynamische Felder handelt. Es kann sich auch um RTF oder ähnliches handeln, wo ein Suchen und Ersetzen wohl nicht unbedingt von Vorteil ist.

Ich habe jetzt in der WPIOHTML.pas die Writechar Funktion angepasst, das bei einer #13 kein Zeichen geschrieben wird. Nicht schön, aber funktioniert wie ich es will.

Grüsse
Oliver

oschulz

Hallo Julian

Ich habe hier noch ein kleineres Problem. Ich habe einen Text mit Serienfeldern. Eines der Serienfelder wird mit Text gefüllt, der Zeilenumbrüche #13#10 enthält.
Beim Speichern als HTML wird aber CR (#13) im Text des Serienfeldes so gespeichert. Der restliche Text ist einwandfrei.

Code

HTML Ausgabe
Mit besten Grüßen& #13;<br/>& #13;<br/>Oliver Schulz& #13;<br/>Entwicklung& #13;<br/>......


(das & #13; zusammengeschrieben)

Diese 13 wird zwar vom IE weggefiltert, aber andere Komponenten haben damit Probleme. Ist es gewollt, dass das HTML so gespeichert wird?

Mit freundlichen Grüßen

oschulz

Der Test verlief leider negativ. Irgendetwas scheint beim Auslesen der einzelnen Wörter in der vorletzten Version geändert worden zu sein.
Er zeigt mir mehrere Wörter zum Prüfen an, die durch ein Leerzeichen getrennt sind. Dort sollte aber nur ein Wort zum Prüfen sein.

Ich bin bis dahin vorgedrungen
WPSpell_link - function GetNextWord

Code

Code vorher  if (not fr or ((c <> '-') and (c <> #39))) then break;

Code

Code aktuell
  if en then
  begin
     if (c <> #39) then break;
  end else
  if fr then
  begin
     if (c <> '-') then break;
  end;

Nach Rückänderung dieser Zeilen, funktioniert alles ordnungsgemäß. Die Wörter werden korrekt getrennt und der Spellchecker läuft durch. Ich hätte zum Testen zB eine Aufzählung die mit "-" begann. Hier hängte er sich dann auf.

Gruß Oliver Schulz

oschulz

Ich denke mal das ist das Problem. Er ist immer, nachdem er das erste Wort prüfen wollte, hängengeblieben. Ich werde die neue Version testen.

Danke Oliver

oschulz

In der aktuellen Version von WPSpell hängt sich das Fenster mit den Rechtschreibvorschlägen beim Durchlauf auf. Ich habe jetzt die voherige Version genommen und alle Einstellungen beibehalten. Damit funktioniert es problemlos.

Code

Einstellungen
    userDict:=IncludeTrailingPathDelimiter(ExtractFilePath(Application.ExeName));
    WPSpellController:=TWPSpellController.Create(self);
    WPSpellController.UserDictAdd(userDict+'UserDic\'+DM.OraSession.Username+'.dic');
    WPSpellController.InitialDirectory:= ExcludeTrailingPathDelimiter(userDict);
    WPSpellController.AddFromPath(WPSpellController.InitialDirectory);
    WPSpellController.CurrentLanguage:=1031;
    WPSpellController.INIFilePath:=userDict+'mykene2.ini';
    WPSpellController.MemoryMode:=wpspellUseMemory;
    WPSpellController.PersistencyMode:=wpUseINIFile;
    WPSpellController.SuggestMode:=[wpSuggestAutoOpenDictionaries];
    WPSpellController.Active:=true;


Aufruf
    WPSpellCheckInterface.SpellCheck(Editor, wpCheckFromStart);

Alles anzeigen

oschulz

Seit der Installation der letzten Versionen scheint es zu funktionieren. Ab und zu kommt noch ein Viereck, an dem eigentlich ein Enter sein sollte, aber die Schrift kommt ordentlich an und kann danach auch noch formatiert werden.

Danke ;)

oschulz

Hallo Julian

ich wollte noch einmal nachfragen, ob du herausgefunden hast, warum eine komische Schriftart eingefügt wird, die sich dann in WPTools auch nicht mehr ändern lässt.
Falls noch Infos benötigt werden, kann ich die gerne besorgen.

oschulz

Push
Wie gesagt, ich kann das ganze auch mit dem Minidemo von euch nachstellen. Ich stell euch gerne alle Infos die ich habe zur Verfügung.

Beiträge von oschulz

Als HTML Speichern Bug

Serienfelder beim Speichern nach HTML löschen

Serienfelder beim Speichern nach HTML löschen

Serienfelder beim Speichern nach HTML löschen

Unicode in Serienfeldern (Mergefields)

Unicode in Serienfeldern (Mergefields)

Unicode in Serienfeldern (Mergefields)

Unicode in Serienfeldern (Mergefields)

WP Tools als Email Editor

WPSpell - Fenster hängt sich auf

Automatischer Link bei Emailadressen

Automatischer Link bei Emailadressen

WPTools 6.13-Serienfeld mit Zeilenumbruch-speichern als HTML

WPTools 6.13-Serienfeld mit Zeilenumbruch-speichern als HTML

WPSpell - Fenster hängt sich auf

WPSpell - Fenster hängt sich auf

WPSpell - Fenster hängt sich auf

WPTools 6.10 Problem mit RTF Zwischenablage aus Apple Mail

WPTools 6.10 Problem mit RTF Zwischenablage aus Apple Mail

Anzeigeproblem beim Einfügen von accent aigu/grave