Sie sind aktuell nicht angemeldet.

Funktionen: Einloggen  |  Neu registrieren  |  Suchen

Re: PSet
Autor: Martin01
Datum: 30.12.02 17:31
'NETter habe ich es in der Hilfe noch nicht gefunden: 'Wer kann damit was anfangen und es noch NETter machen? 'Der SetPixel ist auch in der Abteilung: myBitmap. Private Function GetPixel( _ ByVal piBild As PictureBox, _ ByVal x As Integer, _ ByVal y As Integer) As Color 'Gibt den Farbwert von x, y zurück 'Bekommt ' Bild ' x <-> ' y | ' 'Zurück ' Color von x,y ' Bei Fehler Color.Azure Dim myBitmap As New Bitmap(piBild.Image) Try 'Farbe zurückgeben Return myBitmap.GetPixel(x, y) Catch ex As Exception Beep() 'Farbe Color.Azure bei Fehler Return Color.Azure End Try End Function

PSet	131	Bernd30	30.12.02 13:43
Re: PSet	113	Martin01	30.12.02 17:31

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

Funktionen:  Zum Thema  |  Gesamtübersicht

Suchen