XProfan

Español

¡Hola IF

Su Behauptung, beim Texto con texto überschreiben würden hässliche Ränder entstehen kann I mi sistema no nachvollziehen.
Anbei una Code, en el verschiedenen Mostrar einwandfrei gelöscht (überschrieben) y ser el auch todavía después de mehrmaligem Aufruf.
Kompilieren Marca Separación

DECLARE zeigen%,loeschen%,ende%,EE%
EE%=0

PROC ZEIGEN

    USEFONT "ARIAL",16,6,0,0,0
    TEXTCOLOR RGB(200,0,0),-1
    DrawText 100,100,Date$(2)
    USEFONT "COURIER NEW",24,0,1,0,0
    TEXTCOLOR RGB(0,0,150),-1
    DrawText 100,150,"Profan-Version "+$ProfVer
    USEPEN 0,1,RGB(0,0,0)
    USEBRUSH 1,RGB(0,200,0)
    RECTANGLE 100,200-200,250

ENDPROC

PROC LOESCHEN

    USEFONT "ARIAL",16,6,0,0,0
    TEXTCOLOR RGB(255,255,240),RGB(255,255,240)
    DrawText 100,100,Date$(2)
    USEFONT "COURIER NEW",24,0,1,0,0
    DrawText 100,150,"Profan-Version "+$ProfVer
    USEPEN 0,1,RGB(255,255,240)
    USEBRUSH 1,RGB(255,255,240)
    RECTANGLE 100,200-200,250

ENDPROC

--------------------------------
CLS RGB(255,255,240)
zeigen%=CREATE("BUTTON",%HWnd,"Anzeigen...",1,1,150,25)
loeschen%=CREATE("BUTTON",%HWnd,"Löschen...",151,1,150,25)
ende%=CREATE("BUTTON",%HWnd,"Ende",530,1,100,25)
ZEIGEN
enableWindow zeigen%,0

WhileNot EE%

    WAITINPUT

    IF GetFocus(zeigen%)

        enableWindow zeigen%,0
        enableWindow loeschen%,1
        ZEIGEN

    ENDIF

    IF GetFocus(loeschen%)

        enableWindow zeigen%,1
        enableWindow loeschen%,0
        LOESCHEN

    ENDIF

    Case GetFocus(ende%):END

WEND

 href='./../../funktionsreferenzen/XProfan/end/'>end

Wahrscheinlich Es el Sache para Usted no más wichtig por lo tanto Yo el Thema auch en el Basura gestellt

09.07.2006 ▲

Vollständiges Zitat

Absatzweise Cita Zeilenweise Cita

- Página 1 -

[quote:7f20d45283]sólo systembedingt[/quote:7f20d45283]

Yo möchte otra vez darauf hinweisen el lo no por lo tanto va herauszufinden en wem el Effekt auftritt - y en wem no.

Yo erwähnte lediglich el lo una schlechte Concepto sei Texto derart abzulöschen wegen o.g. Effekt.

Das el Un oder Andere el Effekt no nachvollziehen kann juega doch hierbei ningún papel, el Rechner son nunmal unterschiedlich - Yo quería lediglich a meiner Erfahrung teilhaben dejar.

Was el con Recht oder no Recht zutun ha - ni idea.

El Cuestión hässliche Ränder en Drawtext muss desafortunadamente con Sí beantwortet voluntad porque uno kann no su ausgehen en el o.g. Ablöschverfahren no Ränder enstehen. Und porque also möglicherweise en otro Computern Ränder enstehen es una schlechte Concepto. So simplemente - Klappe a - Affe tot.

09.07.2006 ▲

Vollständiges Zitat

Absatzweise Cita Zeilenweise Cita

[quote:247c882404]So simplemente - Klappe a - Affe tot. [/quote:247c882404]
So simplemente geb Yo mich no geschlagen ! - Si usted con -1 como Farbangabe überschreibst, hast Usted el hässlichen Ränder - Si usted media Texto genau ansiehst, wirst Usted sehen, dass Yo a Punto de -1 el Farbe des Hintergrundes angebe y luego son el Ränder no disponible - Gelle

Kompilieren Marca Separación

Windowstyle 80
Window 0,0 - 640,480
Cls 0
Showmax
Textcolor $00Ffffff,-1
Usefont "Arial",50,0,0,0,0
Drawtext 10,10,"ClearType"
waitinput
Textcolor 0,-1 Dein Text
Textcolor 0,0 Mein Text - der Hintergrund muss mit Farbangabe gelöscht werden,
-1 arbeitet hier anscheinend nicht sauber ?
Drawtext 10,10,"ClearType"
Waitkey

09.07.2006 ▲

Vollständiges Zitat

Absatzweise Cita Zeilenweise Cita

Frank
Abbing

[quote:cf7e0939a8]Si usted media Texto genau ansiehst, wirst Usted sehen, dass Yo a Punto de -1 el Farbe des Hintergrundes angebe y luego son el Ränder no disponible[/quote:cf7e0939a8]

IF, como lo en Horsts Método va, seine Textos a löschen, solltest du auch Horsts Quellcode para Testen uso... Mi Aussagen hier basieren jedenfalls en seinem Code.

09.07.2006 ▲

Vollständiges Zitat

Absatzweise Cita Zeilenweise Cita

09.07.2006 ▲

Vollständiges Zitat

Absatzweise Cita Zeilenweise Cita

Dann Es el Cuestión pero no si el Texto perfekt con el Texto ablöschen lässt, pero con un Rectángulo.

Horst ser Ejemplo passt also no sólo Tarea, demzufolge kann ser Ejemplo de no maßgeblich ser.

@Franco: Lo hießt no Horst-Método, pero Texto con texto Löschen-Método.

Wenn Ihr Texto also no con texto löscht, pero con oculto Rectangles, entonces kann el eigendliche Cuestión doch no Euer Ernst ser oder?

09.07.2006 ▲

Vollständiges Zitat

Absatzweise Cita Zeilenweise Cita

- Página 2 -

Frank
Abbing

Passt doch alles. Usted hast dir el Quellcode eben no genau angesehen y bist deshalb de verkehrten Vorausetzungen ausgegangen. So Yo anfangs auch.

Problema erkannt y gelöst - nächstes Problema...

09.07.2006 ▲

Vollständiges Zitat

Absatzweise Cita Zeilenweise Cita

Michael
Dell

Weiß no si el hierher gehört, el tener I meiner Platte gefunden:
Kompilieren Marca Separación

DrawText Demo

Proc mText

    Parameters mT_oX&,mT_oY&,mT_oTxt$,mT_Col&,mT_bCol&,mT_oP&
    Declare mT_X1&,mT_Y1&
    Case (mT_oX& < 1): mT_oX& = 1
    Case (mT_oY& < 1): mT_oY& = 1

    If Equ(mT_oP&,0)

        TextColor mT_bCol&,mT_bCol&

        WhileLoop -1,1,1

            mT_X1& = (mT_oX& + &Loop)

            WhileLoop -1,1,1

                mT_Y1& = (mT_oY& + &Loop)
                DrawText mT_X1&,mT_Y1&,mT_oTxt$

            EndWhile

        EndWhile

    Else

        TextColor mT_Col&,mT_bCol&
        DrawText mT_oX&,mT_oY&,mT_oTxt$

    EndIf

EndProc

Cls
mText(10,10,"TestTxt",RGB(0,0,0),RGB(255,0,0),1)
WaitInput
mText(10,10,"TestTxt",RGB(0,0,0),RGB(255,255,255),0)
WaitInput
End

Apéndice: Kleine verbesserung!

Salu Michael...

Hab zwar krumme Fieß awer dofir e' ecklich Gsicht!

09.07.2006 ▲

Vollständiges Zitat

Absatzweise Cita Zeilenweise Cita

Ähäm Franco wir wissen beide el no el Vorraussetzungen verkehrt - pero Horst Quellcode verkehrt es.

Horst ser Source begründet no el problema pero löst lo en una Umweg - alles Yo quería es el Tip de me geben el uno Texto no con texto ablöschen debería.

Wenn Horst el Texto no con texto ablöscht - entonces braucht doch niemand su ausgehen el uno Texto doch con texto ablöschen debería.

@Michael: Exactamente algo como mache Yo auch oft

- oft auch con unterschiedlichen Farben para una 3D-Effekt. Nur al Rande sei erwähnt el el Cleartype-Problema así aber por desgracia, no umgehbar es.

-

Um el Verwirrung en el Thema aber a lösen

es así:

Wer con Drawtext una Texto características - y esta Texto gerne otra vez löschen möchte - kann dies tun indem él el selben Texto nochmals, aber con gesetzer Color de fondo características. El Color de fondo des Textes muß entonces aber gesetzt voluntad como entonces zuerst una Rectángulo con Color de fondo suscrito se.

Wer aber el Texto genau y sólo el Texto ablöschen möchte - also sin Color de fondo y sin Rectángulo - kann böse Ränder esperar.

Texto con texto ablöschen es also una schlechte Concepto - Texto con un Rectángulo ablöschen verursacht meistens (no siempre!) no Ränder. ¿Por qué no siempre ? El Softeneffekte mancher GrKarten (tal vez auch ClearType de MS?) voluntad nachträglich aufgelegt. Lo kann vorkommen el el Alias no con en el Weitenberechnung des nötigen Rectangles con eingeht. Möglicherweise entstehen also kleine Ränder kurz ausserhalb des Hintergrundrectangles des Textes.

Exactamente esta Plage tener Yo hinter me.

09.07.2006 ▲

Vollständiges Zitat

Absatzweise Cita Zeilenweise Cita

IF
y si mich ahora al liebsten en el Mond schiessen würdest: Usted hast media Texto no benutzt ! - Yo lösche nämlich Texto con texto ! - Nur Me estoy dando beim Löschen anstelle de -1 el Color de fondo la ventana a y luego entstehen esta Ränder no - (Es en efecto kein Löschen, pero una erneutes Überschreiben con el Color de fondo) - Si usted para Ejemplo en meiner Löschprocedur Textcolor RGB80,0,0),RGB(0,0,0) angibst, entonces hastr Usted el Rechteck de el Franco geschrieben ha ...y ahora Klappe a - Affe tot de meiner Página - teste media Ver código fuente y luego es bien !

09.07.2006 ▲

Vollständiges Zitat

Absatzweise Cita Zeilenweise Cita

Yo schieße hier niemanden en el Mond.

Si usted como Texthintergrundfarbe no -1 angegeben hast - entonces löscht Usted el Texto no con texto pero con un Rectángulo.

09.07.2006 ▲

Vollständiges Zitat

Absatzweise Cita Zeilenweise Cita

Siehe Bild...