Sie sind aktuell nicht angemeldet.

Funktionen: Einloggen  |  Neu registrieren  |  Suchen

markierten text bearbeiten ...
Autor: planetiltis
Datum: 11.01.04 16:29
warum kann ich mit diesem code nicht den markierten text verändern ? Private Sub schriftart_Click()<pre><code> ' wird im "CommonDialog" auf "Abbrechen" geklickt, ' wird (wenn CancelError = True ist) ein Laufzeitfehler ausgelöst. On Error Resume Next With CommonDialog1 .CancelError = True ' Die Flags-Eigenschaft muss auf cdlCFScreenFonts, ' cdlCFPrinterFonts oder cdlCFBoth gesetzt werden, ' bevor das Dialogfeld Schriftart angezeigt wird, ' sonst tritt der Fehler "Keine Schriftarten vorhanden" auf. .Flags = cdlCFEffects Or cdlCFBoth ' Dialogfeld Schriftart anzeigen .ShowFont If Err = 0 Then ' Text markieren und Benutzereingaben übernehmen obj1 = Me.ActiveControl.Index rtfbox(obj1).SelStart <----------------------denke die probleme liegen hier rtfbox(obj1).SelLength <----------------------denke die probleme liegen hier rtfbox(obj1).Font.FontName = .FontName rtfbox(obj1).Font.Bold = .FontBold rtfbox(obj1).Font.Italic = .FontItalic rtfbox(obj1).Font.Size = .FontSize rtfbox(obj1).Font.Strikethru = .FontStrikethru rtfbox(obj1).Font.Underline = .FontUnderline End If End With End Subdanke im voraus mfg bene

markierten text bearbeiten ...	433	planetiltis	11.01.04 16:29
Re: markierten text bearbeiten ...	296	Dieter	11.01.04 20:54

Sie sind nicht angemeldet! Um auf diesen Beitrag zu antworten oder neue Beiträge schreiben zu können, müssen Sie sich zunächst anmelden. Einloggen  |  Neu registrieren

Funktionen:  Zum Thema  |  Gesamtübersicht

Suchen