| |
VB.NET - Ein- und UmsteigerForm auf Form | | | Autor: BernyH | Datum: 16.09.08 15:48 |
| Hallo Gemeinde,
ich suche nach einer Möglichkeit eine Form auf/in einer anderen Form anzuzeigen und natürlich auch darauf zugreifen zu können (Auflistung?)
Der Hintergrund:
Ich brauche verschiedene Pictureboxen in (teil-)transparenter Form
Da das nur in Verbindung mit Formen zu gehen scheint...
Bitte keine MDI oder soetwas...
Eine Form kann ich ja nicht mit me.controls.add(picForm) hinzufügen.
???
Dankeschön.
Gru?
BernyH | |
Re: Form auf Form | | | Autor: BernyH | Datum: 16.09.08 21:04 |
| na ja, ich dachte frm.opacity=intProzent - und das war es schon. Geht ja super schnell.
Geht ja alles soweit, aber ich bekomme die Form nicht auf die Form...
Das muss doch gehen.
Gru?
BernyH | |
Re: Form auf Form | | | Autor: Julian13 | Datum: 17.09.08 12:59 |
| Hallo,
warum willst du eigentlich die form auf die form bekommen? was hast du genau damit vor zu erreichen? vielleicht machst du einfach dein eigenes form-control oder soetwas...
Gruß Julian13 | |
Re: Form auf Form | | | Autor: BernyH | Datum: 17.09.08 15:23 |
| ...ganz simpel: Ein Bilderkarussell.
Gru?
BernyH | |
Re: Form auf Form | | | Autor: Julian13 | Datum: 17.09.08 15:32 |
| Hallo,
was ist ein Bilderkarussell? einzelne Bilder, die sich auf einem Kreis(Polarkoordinaten) im Kreis bewegen?
wofür brauchst du da dann transparenz?
Gruß Julian13 | |
Re: Form auf Form | | | Autor: BernyH | Datum: 17.09.08 16:04 |
| ...nun kipp mal das Karussell in die Form, dann werden die Bilder hier und da von anderen Bildern (teilweise) verdeckt. Damit man noch was sieht, möchte ich die vorderen und nächsteren etwas transparenzieren...
Ebene 1=100%, Ebene 2=80%, Ebene 3=60% usw...
Für die Perspektive dann noch ein Zoom, fertig ist die Laube.
Aber nur, wenn die Transparenz einzustellen ist.
Gru?
BernyH | |
Re: Form auf Form | | | Autor: keco | Datum: 17.09.08 17:05 |
| Soweit ich weiß funktioniert das mit der Opacity-Eigenschaft der Form nicht mehr, sobald du dieses in einem anderen Control aufnimmst. Jedenfalls hatte ich das vor einiger Zeit mal versucht und nicht hinbekommen (vielleicht habe ich was falsch gemacht?). | |
Re: Form auf Form | | | Autor: BernyH | Datum: 30.09.08 12:37 |
| ...nein, leider hast Du wohl nix falsch gemacht, die opacity ist bei mir auch flöten...
also kann ich nur neue Formen erzeugen, die ich dann notfalls mit der Master-Form mitbewege, falls die mal verschoben wird....
Danke an alle
Gru?
BernyH | |
Re: Form auf Form | | | Autor: keco | Datum: 30.09.08 20:00 |
| Das Problem hatte ich auch mal im Forum gestellt und mir wurde eine API nahe gelegt, womit man den Alpha Wert ändern kann. Allerdings hab ichs nich zum Laufen gebracht und auch aufgegeben. Ich mag API's nich *g* | |
Re: Form auf Form | | | Autor: BernyH | Datum: 01.10.08 08:28 |
| Hallo keco
da alle Versuche fehlgeschlagen sind, eine transparente Form auf eine Form zu bekommen, benutze ich jetzt den folgenden CodeSchnipsel...
Public Function SetImageAlpha(ByVal Image As Image, ByVal Alpha As Single) As _
Image
Dim ImgAttr As New Imaging.ImageAttributes()
'Standard-ColorMatrix für Transparenz
Dim ColorMatrix As New Imaging.ColorMatrix(New Single()() {New Single() _
{1, 0, 0, 0, 0}, New Single() {0, 1, 0, 0, 0}, New Single() {0, 0, 1, _
0, 0}, New Single() {0, 0, 0, CSng(Alpha / 100), 0}, New Single() {0, _
0, 0, 0, 1}})
'ColorMatrix an ImageAttribute-Objekt übergeben
ImgAttr.SetColorMatrix(ColorMatrix)
'Neue 32bit Bitmap erstellen
Dim NewBitmap = New Bitmap(Image.Width, Image.Height, _
System.Drawing.Imaging.PixelFormat.Format32bppArgb)
'Resolution (DPI) vom Quellbitmap auf Zielbitmap übertragen
NewBitmap.SetResolution(Image.HorizontalResolution, _
Image.VerticalResolution)
'Graphicsobjekt von NewBitmap erstellen
Dim NewGraphics As Graphics = Graphics.FromImage(NewBitmap)
'NewBitmap auf NewGraphics zeichnen
NewGraphics.DrawImage(Image, New Rectangle(0, 0, NewBitmap.Width, _
NewBitmap.Height), 0, 0, Image.Width, Image.Height, _
GraphicsUnit.Pixel, ImgAttr)
'Ressource freigeben
NewGraphics.Dispose()
ImgAttr.Dispose()
Return NewBitmap
End Function Die Transparenz wird per sofort ausgeführt.
Es muss eben nur für jedes Pic das Original "aufgehoben" werden, damit eine Transparenzregelung in alle Richtungen möglich ist.
Gru?
BernyH | |
Re: Form auf Form | | | Autor: BernyH | Datum: 01.10.08 08:40 |
| auweia, ich musste gerade feststellen, dass ich ja gar keine Transparenz bekomme, sondern nur ein Fading - also weitersuchen...
Gru?
BernyH | |
| Sie sind nicht angemeldet! Um auf diesen Beitrag zu antworten oder neue Beiträge schreiben zu können, müssen Sie sich zunächst anmelden.
Einloggen | Neu registrieren |
|
|
sevZIP40 Pro DLL
Zippen und Unzippen wie die Profis!
Mit nur wenigen Zeilen Code statten Sie Ihre Anwendungen ab sofort mit schnellen Zip- und Unzip-Funktionen aus. Hierbei lassen sich entweder einzelnen Dateien oder auch gesamte Ordner zippen bzw. entpacken. Weitere InfosTipp des Monats TOP Entwickler-Paket
TOP-Preis!!
Mit der Developer CD erhalten Sie insgesamt 24 Entwickler- komponenten und Windows-DLLs. Die Einzelkomponenten haben einen Gesamtwert von 1605.50 EUR...
Jetzt nur 599,00 EURWeitere Infos
|