English
Forum

DrawText delete

 
- Page 1 -



rafl
I have a with DrawText written Text, the in the further course the program again deleted or. to the Delete with a others Text überschrieben go should. How lösche I the middle-aged Text?

Best wishes
Rafl
 
08/07/15  
 



 
- Page 1 -


[OFFTOPIC]clear, drawtext 10,10,"Testtext" but one window 1500x1200 [/OFFTOPIC]
 
08/07/15  
 




HofK
there weg yet some nobodies!
window 5,5 - 1500000000,1200000000
// window 5,5 - 15000000000,12000000000 // negatives Fenstergröße

drawtext 10,10,space$(10000)

// drawtext 10,10,space$(100000) // there tear XProfan 11.2 free The Hufe high.

??? is the The heat the sun: 0 sun
 
08/07/15  
 




rafl
Klaus Hoffmeister (07.08.15)
The Text becomes überschrieben - so simply:


Klaus Hoffmeister (07.08.15)
window 5,5-1500,1200
drawtext 10,10,"Testtext"
waitinput
drawtext 10,10,"neuer Text"
waitinput
drawtext 10,10," " // or space$(100)
waitinput


Klaus Hoffmeister (07.08.15)
with  [...]  or. [...] 
becomes the wegradieren used.


so, How Klaus it described has, have I it before too probiert had. I have now step for step my others in the program vorhandenen command omitted. The problem depends evident with the commands Text Color 0, -1 together.
 
08/07/15  
 




HofK
logical, there writes one on a "durchsichtige Folie".

power but too sometimes sense:
CompileMarkSeparation
window 200,300
TextColor 0, -1
drawtext 10,10,"Test"
waitinput
drawtext 10,10,"------- "
waitinpu
 
08/07/15  
 




rafl
How resolve I now my trouble, that the first written Text lane is and only the new Text To reading is?
 
08/07/15  
 




ByteAttack
understand the trouble not integrally?

example:
CompileMarkSeparation
 $H windows.ph
USERMESSAGES 16
var Text%=1
cls ~GetSysColor(15)
UseFont "ARIAL",20,0,0,0,0
TextColor 0,~GetSysColor(15)
DrawText 10,10,"Klick mich"

WhileNot %Umessage=16

    Waitinput

    if IsKey(1)

        DrawText 10,10,Space$(50)

        if Text%=1

            DrawText 10,10,"Klick mich nochmal"
            Text%=2

        elseif Text%=2

            DrawText 10,10,"Klick mich"
            Text%=1

        endif

    endif

EndWhile

 
08/07/15  
 




HofK
helps the there:
CompileMarkSeparation
window 500,300
cls RGB(233,222,122)' clear screen mit Hintergrundfarbe
' RotGrünBlau-Anteile vom 0 bis 255
usefont "Arial",24,12,0,1,0' wähle: Schrift,Höhe,Breite,F,K,U
TextColor 0, -1
drawtext 20,20,"   Hier ein kleiner Text.  "
waitinput
TextColor RGB(233,222,122) , RGB(233,222,122)
drawtext 20,20,"                                       "// oder mit space$
// oder mit drawtext 20,20,"   Hier ein kleiner Text.  " überbügeln
waitinput
TextColor 0, -1
drawtext 20,20,"   Hier ein frischer neuer kleiner Text.  "
put
 
08/07/15  
 




ByteAttack
but with my example, can a blond for hours keep busy
 
08/07/15  
 




rafl
Vielen Thanks,

with the suggestion of byte-Attack functions it. the komische is only, once I my Window shift, becomes the background behind the Text white displayed. Evtl. Try I it too again with Klauses second suggestion from.

Rafl
 
08/07/15  
 




ByteAttack
simply behind the WaitInput
CompileMarkSeparation
settle.
CompileMarkSeparation
 $H windows.ph
USERMESSAGES 16
var Text%=1
cls ~GetSysColor(15)
UseFont "ARIAL",20,0,0,0,0
TextColor 0,~GetSysColor(15)
DrawText 10,10,"Klick mich"

WhileNot %Umessage=16

    Waitinput
    TextColor 0,~GetSysColor(15)

    if IsKey(1)

        DrawText 10,10,Space$(50)

        if Text%=1

            DrawText 10,10,"Klick mich nochmal"
            Text%=2

        elseif Text%=2

            DrawText 10,10,"Klick mich"
            Text%=1

        endif

    endif

EndWhile

 
08/07/15  
 



 
- Page 2 -


where it then vlt. in this drop helpful would, instead of DrawText rather
create("text",... To use?! Text then Yes simply by SetText änderbar.
 
08/07/15  
 




ByteAttack
correctly.! but I faith it would like it 'farbig' and have The SKControl not bring into action...
 
08/07/15  
 




Answer


Topictitle, max. 100 characters.
 

Systemprofile:

no Systemprofil laid out. [anlegen]

XProfan:

 Posting  Font  Smilies  ▼ 

Please register circa a Posting To verfassen.
 

Topic-Options

14.663 Views

Untitledvor 0 min.
H.Brill09/23/23
Michael Hettner08/27/21
RudiB.03/30/20
Erasmus.Herold06/12/19
More...

Themeninformationen

this Topic has 4 subscriber:

ByteAttack (4x)
HofK (4x)
rafl (4x)
iF (2x)


Admins  |  AGB  |  Applications  |  Authors  |  Chat  |  Privacy Policy  |  Download  |  Entrance  |  Help  |  Merchantportal  |  Imprint  |  Mart  |  Interfaces  |  SDK  |  Services  |  Games  |  Search  |  Support

One proposition all XProfan, The there's!


My XProfan
Private Messages
Own Storage Forum
Topics-Remember-List
Own Posts
Own Topics
Clipboard
Log off
 Deutsch English Français Español Italia
Translations

Privacy Policy


we use Cookies only as Session-Cookies because of the technical necessity and with us there no Cookies of Drittanbietern.

If you here on our Website click or navigate, stimmst You ours registration of Information in our Cookies on XProfan.Net To.

further Information To our Cookies and moreover, How You The control above keep, find You in ours nachfolgenden Datenschutzerklärung.


all rightDatenschutzerklärung
i want none Cookie