XProfan

[quote:6fef3db1e6]¿Cómo se puede Yo propio Fotos/Bilder en un Listview darstellen.[/quote:6fef3db1e6]
In meiner Adressenverwaltung ADRESSOR kann Yo a cada Eintrag una Steckbrief redactar. In el es entonces auch el zugehörende Foto - siehe Bild
Runterladen kannst Usted el ADRESSOR de meiner Homepage - siehe unten...

bild_in LV.jpg	109 kB

Kurzbeschreibung:	Foto en Adressenverwaltung

Hochgeladen:	06.11.2006

Ladeanzahl:
		Descargar

Na Horst, el es aber kein Listvieweintrag, pero el Foto es außerhalb des Listview.

Frank
Abbing

Listviews puede no Fotos beinhalten, sólo una Hintergrundsbild.
Machbar wären Icons, el una Foto zeigen, aber hier Es el Grösse muy eingeschränkt.

Fred
Matthiesen

¡Hola Franco,
como gross darf max. el Icon ser y cómo se lo eingefügt. Welcher Befehl?

SUSE 10.3 / Listview.dll

...Yo bin zwar no Franco, aber en deine Cuestión una Antwort de me: Wenn du el Listview.dll hast, hast du auch el Ayuda. In el Ayuda es una Unterverzeichnis con PRF-Demo-Code. Schau dir como veces el Code profan_icons.prf a - hier siehst du, como Icons geladen voluntad. El Grösse richtet se después de el Zeilenhöhe - si el a a 32x32 Pixel va, Es el Darstellung para una Foto denkbar besch...

- mejor es, si du como Yo, una Unterdatei erstellst, en el entonces Fotos geladen voluntad

Frank
Abbing

El Grösse el Icons es bajo el verschiedenen Betriebssystemen verschieden. XP kann - soweit Sé que - 256x256 Pixel grosse Icons verarbeiten, 98 sólo 32x32 Pixel. Alles sin Gewähr.
Dazu musst du una Imagelist redactar, una Liste, en el Icons gesammelt voluntad. Es aber durchaus posible, auch Bitmaps en el Imagelist a invitar, anstelle de Icons. Diese Liste jedenfalls weisst du nachher con el Listview.dll-Función SetImageList() una Listview a. Einem Item oder Subitem una Icon de el Liste zuweisen va entonces con SetIconColumn(), SetIcon(), SetIconMode(), SetIconsFromMem() y/oder SetIconsWith().
El Listview.dll besitzt auch Características, en Imagelisten automáticamente a generieren, allerdings no welche con así grossen Icons. El APIs hierzu son aber ligeramente selber a benutzen. ImageList_Create y ImageList_Add.
Wenn Yo veces Tiempo habe, versuche Yo veces una Demo con Riesengrafiken a remendar.

Frank
Abbing

So, hatte grade ne Viertelstunde Tiempo para Ausprobieren. Geht tatsächlich con allen Bitmapbildern, y el incluso muy simplemente. Hier una Testcode, el con 80x80 Pixel grossen Bildern arbeitet. Muss todavía vervollständigt voluntad (Bilder liberación usw.), zeigt aber, como va.
Kompilieren Marca Separación

!Declare lvdll&,listview&,text$,x&,y&,z&,ilist&,bild1&,bild2&
 $I Listview_Funktionen.inc
lvdll&=usedll("Listview.dll")
Cls GetSysColor(15)
Def ImageList_Create(5) !"comctl32.dll","ImageList_Create"
Def ImageList_Destroy(1) !"comctl32.dll","ImageList_Destroy"
Def ImageList_Add(3) !"comctl32.dll","ImageList_Add"
Usefont "MS Sans Serif",10,0,0,0,0
SetDialogFont 1
InitMessages(%hwnd)
ilist&=ImageList_Create(80,80,33,0,0)
listview&=CreateListView(%hwnd,%hinstance,0,GetSysColor(24),-1,$3)
bild1&=Create("hPic",-1,"testpic.bmp")
ImageList_Add(ilist&,bild1&,0)
bild2&=Create("hPic",-1,"testpic2.bmp")
ImageList_Add(ilist&,bild2&,0)
SetImageList(listview&,ilist&)
InsertColumn listview&,"Name",200,0
InsertColumn listview&,"Index",160,0
SetItem listview&,"Test","Test"
SetItem listview&,"Test","Test"
SetItem listview&,"Test","Test"
SetIcon(listview&,0,0)
SetIcon(listview&,1,1)
SetIcon(listview&,2,0)
SetIconColumn(1)
SetIcon(listview&,0,1)
SetIcon(listview&,1,0)
SetIcon(listview&,2,1)
ShowListView(listview&,8,8,480,320)

While 1

    waitinput
    Case %key=2:BREAK

EndWhile

ImageList_Destroy(ilist&)
DestroyWindow(%hwnd)
freedll lvdll&
End

Hey, sin Textos es el ya ne schöne Bilderanzeige...

listview.jpg	47 kB

Hochgeladen:	06.11.2006

Ladeanzahl:
		Descargar

[quote:9e3b6fe95e]So, hatte grade ne Viertelstunde Tiempo para Ausprobieren. Geht tatsächlich con allen Bitmapbildern, y el incluso muy simplemente. Hier una Testcode, el con 80x80 Pixel grossen Bildern arbeitet. Muss todavía vervollständigt voluntad (Bilder liberación usw.), zeigt aber, como va.[/quote:9e3b6fe95e]
@¡Hola Franco

La idea es Super

- ahora Yo otra vez Beschäftigung a para Frühling

- voluntad mein ADRESSOR-Programa umschreiben

Frank
Abbing

¡Hola.

[quote:08ca1262e0]La idea es Super - ahora Yo otra vez Beschäftigung a para Frühling - voluntad mein ADRESSOR-Programa umschreiben [/quote:08ca1262e0]
Werde en Gelegenheit todavía una bischen así experimentieren. Dass el Geschichte con Bitmaps auch tan bueno klappt, hätte Yo beim Lesen dieser Postingfrage no pensamiento.

Fred
Matthiesen

Gracias Franco para el Respuesta, aber:
Yo habe el Programa en Profano9 comenzó y el Befehl: Cls GetSysColor(15) sabe él no. Posesiones entonces Getsyscolor gelöscht, entonces ging lo más. Dann blieb él en dieser Línea stecken:
listview&=CreateListView(%hwnd,%hInstance,0,GetSysColor(24),-1,$3)
Auch hier Yo GetSysColor simplemente por 0 ersetzt. Jetzt zeigt él Aunque un Listview a, aber todos Felder son schwarz.
Nun sí, Yo ahora intenta el después de Purebasic a konvertieren. El Image_list-Befehle sabe él no. Aunque el Ayuda a Listview.dll auch no.Lo scheinen also Profano-Befehle a ser. Aber auch en dieser Ayuda bin Yo no fündig geworden. Anscheinen son el Sendmassage-Befehle. Yo vermute el veces. Also: en welcher Ayuda posición esta Befehle? Diesen Befehl Yo en el Listview.dll-Ayuda gefunden: CreateImageList(F,B). Pero esto es auch alles.

SUSE 10.3 / Listview.dll

getsyscolor

es una user32dll api - en PB entonces glaube simplemente sólo GetSysColor_ escribir. ¿Puede auch sustituir en Xprofan en rgb(r&,g&,b&) o. rgb(255,0,0) para Rot - oder direkt en el Konstante sustituir $00FF0000 para Blau. 0 (Null) es natürlich schwarz!

Si usted sin embargo con XProfan con Prekompiler XPSE

arbeitest kannst auch simplemente así getsyscolor escribir, todos Apis de el Standardheaders voluntad korrekt umgesetzt en entsprechende call

s.

Also nimmst simplemente XPSE entonces va auch getsyscolor, oder getsyscolor por def

definieren.