| |
| |
|
Jac
de
Lad | Hallo Frank,
weißt du wie ich einen Text in ein Bild, dass ich mit LoadExtImage geladen oder mit CreateExtBmp erzeugt hab oder halt was in der Art, habe schreiben kann?
Jac |
|
| |
| Profan² 2.6 bis XProfan 11.1+XPSE+XPIA+XPRR (und irgendwann XIDE)
Core2Duo E8500/T2250, 8192/1024 MB, Radeon HD4850/Radeon XPress 1250, Vista64/XP | 19.01.2006 ▲ |
|
| |
|
|
 | Ich bin zwar nicht Frank - aber möglicherweise fällt seine Antwort ähnlich aus.
1. Lade Dein Bild per Mloadbmp 
2. Schreibe Deinen Text per drawtext auf das Bild nachdem du per startpaint -1 auf das mit mloadbmp geladene Bild umgeschaltet hast.
3. Speichere das Bild unter einem temporären Namen nach $tempdir
4. Lade das gespeicherte bild per loadextimage
5. Hüpfe umher.  |
|
| |
| |
| |
|
|
Frank
Abbing | Hi,
nene, meine Antwort fällt ganz anders aus 
ProSpeed hat zwei Beispiele parat, die Texte auf Bitmaps setzen:
FA_Textscroller.prf
FA_Zeichnen.prf
Siehs dir dort einfach an. |
|
| |
| |
| |
|
|
Jac
de
Lad | Danke iF, dass weiß ich wies geht. Aber ich wollte nicht erst das Pic Speichern, Laden, Manipulieren, Speichern, Laden...das ist mir zu umständlich.
Danke Frank, ich schaus mir gleich an!
Jac  |
|
| |
| Profan² 2.6 bis XProfan 11.1+XPSE+XPIA+XPRR (und irgendwann XIDE)
Core2Duo E8500/T2250, 8192/1024 MB, Radeon HD4850/Radeon XPress 1250, Vista64/XP | 21.01.2006 ▲ |
|
| |
|
|
Jac
de
Lad | @Frank: Danke, Frank funktioniert wirklich primst!
Noch ne Frage: Kann ich die Hintergrundfarbe auch auf transparent stellen? (Ich weiß, dass ich auch ein anderes Bild nehmen kann und dann per Prospeed reinkopieren kann, mit CopyExtBmp und letzter Parameter -1, aber das will ich grade umgehen!)?
Jac |
|
| |
| Profan² 2.6 bis XProfan 11.1+XPSE+XPIA+XPRR (und irgendwann XIDE)
Core2Duo E8500/T2250, 8192/1024 MB, Radeon HD4850/Radeon XPress 1250, Vista64/XP | 21.01.2006 ▲ |
|
| |
|
|
Frank
Abbing | Hi,
dafür gibt es die API SetBkColor() und SetBkMode(). |
|
| |
| |
| |
|
|
Jac
de
Lad | Hallo Frank,
jaja, das hab ich schon gesehen. Aber ich krieg das mit SetBkColor nicht hin. Da kommen wie lustigsten Farben raus, aber nicht transparent. Mit -1 klappts wie gesagt auch nicht...
Jac |
|
| |
| Profan² 2.6 bis XProfan 11.1+XPSE+XPIA+XPRR (und irgendwann XIDE)
Core2Duo E8500/T2250, 8192/1024 MB, Radeon HD4850/Radeon XPress 1250, Vista64/XP | 22.01.2006 ▲ |
|
| |
|
|
Frank
Abbing | Hi,
stell zuerst mal SetBkMode() auf transparent. |
|
| |
| |
| |
|
|
Jac
de
Lad |  Aber WIE geht das? Ich hab schon so ziemlich alles probiert???
Jac  |
|
| |
| Profan² 2.6 bis XProfan 11.1+XPSE+XPIA+XPRR (und irgendwann XIDE)
Core2Duo E8500/T2250, 8192/1024 MB, Radeon HD4850/Radeon XPress 1250, Vista64/XP | 22.01.2006 ▲ |
|
| |
|
|
Frank
Abbing | | Ich probier mal, sobald ich Zeit finde. |
|
| |
| |
| |
|
|
Frank
Abbing | Hmm, ist doch nicht so schwer. Ich finde, das wird im Demosource aber gut beschrieben und kommt gut rüber 
KompilierenMarkierenSeparierenDeclare neu&,x&,y&,z&,text$,background&,font&,oldfont&
$I Prospeed_Funktionen.inc
DEF SetTextColor(2) !"GDI32","SetTextColor"
DEF SetBkColor(2) !"GDI32","SetBkColor"
DEF SetBkMode(2) !"GDI32","SetBkMode"
DEF TextOut(5) !"GDI32","TextOutA"
DEF SelectObject(2) !"GDI32","SelectObject"
SetTrueColor 1
neu&=usedll("ProSpeed.dll")
text$="bmps/Hintergrund.jpg"
background&=LoadExtImage(Addr(text$))
Window (%maxx/2-400),(%maxy/2-200)-800,400
font&=Create("Font","Lucida Console",24,0,0,0,0)
oldfont&=SelectObject(background&,font&)
text$="Probetext mit der ProSpeed.dll. Ohne Sprite :-)"
SetTextColor(background&,Rgb(255,255,255))
SetBkMode(background&,1)
SetBkColor(background&,0)
TextOut(background&,30,30,addr(text$),len(text$))
selectObject(background&,oldfont&)
DeleteObject font&
CopyExtBmp(%hdc2,0,0,GetBmpWidth(background&),GetBmpHeight(background&),background&,0,0,0)
Repaint
WaitInput
FreeAllExtBmps()
freedll neu&
END
|
|
| |
| |
| |
|
|
Jac
de
Lad | Ui, ich hab nichts dergleichen entdecken können und meine Tests haben auch nur Mist ergeben...Danke für die Mühe, ich probiers gleich aus! Vielleicht könntest du das ja als Funktion in die Prospeed integrieren, falls du doch mal noch was weiter dran etnwickeln willst...
Jac |
|
| |
| Profan² 2.6 bis XProfan 11.1+XPSE+XPIA+XPRR (und irgendwann XIDE)
Core2Duo E8500/T2250, 8192/1024 MB, Radeon HD4850/Radeon XPress 1250, Vista64/XP | 24.01.2006 ▲ |
|
| |
|
(934)
Deutsch
English
Français
Español
Italia