Allgemeine Fragen zur PROFAN Programmierung
Views (Heute): 242849 (4285)
  Suchen
 Zurück zur Übersicht
 AutorThema: Font in Listboxen
David
Datum:13.07.02 09:57 Antwortenals Email verschicken (David@Brennan.de) 


Hallo Profaner,

gibt es eine Möglichkeit für Listboxen eigene Fonts zu setzen ?

Vielen Dank...

David

P.s.: Super Forum



Rolf Koch
Datum:13.07.02 11:15 Antwortenals Email verschicken (webmaster@rokosoft.de) 


Hi
hoffe Du hast nicht gerade ne alte Profanversion.
declare listbox1&,font%
Font%=@CREATE("FONT","Times New Roman",13,0,0,0,0) 
cls
Let ListBox1&=CreateListBox(%hwnd,"",10,10,472,97)
Font% = @Create("Font","Arial",20,12,0,0,0)
SetFont Listbox1&,Font%
addstring(LISTBOX1&,"Test1")
addstring(LISTBOX1&,"Test2")
addstring(LISTBOX1&,"Test3")
addstring(LISTBOX1&,"Test4")
addstring(LISTBOX1&,"Test5")
while 1
wend
DELETEOBJECT font%

Rolf



Rolf Koch
Datum:13.07.02 11:17 Antwortenals Email verschicken (webmaster@roksoft.de) 


Hmm,
das erste createfont hab ich zuviel drin ;)
Rolf


David
Datum: 13.07.02 19:05 Antwortenals Email verschicken (David@Brennan.de) 


Schönen Dank für die schnelle Antwort! :-))

Funktioniert einwandfrei...

Gruss David...



 Zurück zur Übersicht