Visual Basic Forum

Verfasst am: 21.06.2009, 19:41 Aufrufe: 1141

PictureBox<< Siehe unten. Er läuft jetzt durch. Nur das Ergebnis macht mich etwas stutzig. Der Wert soll 8589934591 sein. Kann das richtig sein ? Gruß Würzie Public Class frm Declare Function GetPixel Lib "gdi32.dll" ( _ ByVal hdc As System.Windows.Forms.PictureBox, _ ByVal nXPos As Long, _ ByVal nYPos As Long) As Long Private Sub frm_Load(ByVal sen ...

Verfasst am: 21.06.2009, 17:47 Aufrufe: 1141

Bei den Parametern von GetPixel steht ByVal hdc as Long, als Argument gibtst du aber ein Control, besser gesagt eine Picturebox an, keine Zahl. Schau mal nach ob du falsch kopiert hast, wenn nicht, ist mit hdc etwas anderes gemeint.

Verfasst am: 21.06.2009, 16:32 Aufrufe: 1141

Ich möchte den Pixelwert des Bildes der PictureBox an der stelle 100, 100 auslesen. Meine PictureBox lautet pb. Ich habe hier schon gesucht, komme aber mit den Lösungen nicht weiter. Public Class frm Declare Function GetPixel Lib "gdi32.dll" ( _ ByVal hdc As Long, _ ByVal nXPos As Long, _ ByVal nYPos As Long) As Long Private Sub frm_Load(ByVal sender As Sy ...

Verfasst am: 17.04.2009, 19:56 Aufrufe: 1062

Allerdings kann man ja die Farbe des Bildes auf einem bestimmten Pixel abfragen, da man die Koordinaten der Maus hat, ist das also kein Problem. Wenn man die Farbe des Bildes hat, kann man einfach die Komplementärfarbe bilden. Hier mal ein Beispielcode (C#): private void pictureBox1_MouseMove(object sender, MouseEventArgs e) { Color c = bit.GetPixel(e.X, e.Y); ...

Verfasst am: 16.05.2008, 15:56 Aufrufe: 1620

Verfasst am: 16.05.2008, 11:13 Aufrufe: 1620

Verfasst am: 15.05.2008, 20:54 Aufrufe: 1620

http://www.vbarchiv.net/api/details.php?id=getpixelUnter diesem Link, findet man die API von vbarchiv.net.Nun meine Frage:Funktioniert diese API auch, wenn der gesuchte Pixel nicht auf der Form liegt, sondern irgend wo anders ist (bei meinem Fall, ist der Pixel auf einem externen "Programm")?Und wie finde ich nun beispielsweise die Farbe des Pixels 544,360 heraus?Die API ist ein bisschen komisch erklärt :/so farRegen ...

Verfasst am: 12.05.2008, 22:50 Aufrufe: 891

Verfasst am: 12.05.2008, 22:44 Aufrufe: 891

zb bei dem getpixel oder dem point usw hauts mir mmmer fehler rein

Verfasst am: 12.05.2008, 21:51 Aufrufe: 891

Verfasst am: 12.05.2008, 20:45 Aufrufe: 891

Verfasst am: 19.03.2008, 00:34 Aufrufe: 655

... Dim TheColors2 As RGBColor Dim Agree1, Agree2, Agree3, AllCorrect As Single Dim Agree1Correct, Agree2Correct, Agree3Correct As Boolean AllCorrect = 0 Picture3.BackColor = vbWhite For i = 0 To 320 For j = 0 To 240 If i / 2 = Round(i / 2, 0) Then If j / 2 = Round(j / 2, 0) Then Color1 = GetPixel ...

Verfasst am: 01.12.2007, 17:58 Aufrufe: 1968

Die quali runterdrehen ist eig. kein Problem, da ich eine spez dll verwende (gibts gratis im www) Da gibt es ja ne API mit Getpixel Setpixel usw, das könnte weiterhelfen, echt super idee danke! Mein Problem ist nämlich, dass ich kein Trojaner sondern eben ein RAT Programmieren will. Halt do wo die schwierigkeiten eines Trojaners liegen (stealth, verstecken, unauffällig agieren) liegen die Schwierigkeiten ei ...

Verfasst am: 27.08.2007, 08:24 Aufrufe: 402

Mit GetPixel bist du genau richtig. HIer mehr dazu: http://www.vbarchiv.net/vbapi/GetPixel.php du liest einfach mit nem Timer zb. jede Sekunde mit Getpixel die Farbe dieser Pixel aus und vergeleichst sie per if. Pseudocode: If GetPixel(deinfenster.Handle,300,300) = blau then Runterfahren ElseIf GetPixel(deinfenster.Handel,300,300) = grün then Neustarten End If Hoffe das hilft dir erstmal.

Verfasst am: 27.08.2007, 00:44 Aufrufe: 402

Weiß, die andere Schwarz, und wieder eine andere blau wird und dann der Pc z.b. automatisch herrunterfährt oder so das müsste ich dann theoretisch alleine hinbekommen. Ich programmier erst seit ein paar Tagen mit VB6 und hab daher noch wenig erfahrung damit, aber diese Pixelüberwachung ist für mein nächstes Projekt relativ wichtig. Danke im voraus Smile

btw ich hab die sufu benutzt und einen ähnlichen Thread mit ...

Verfasst am: 19.08.2007, 16:33 Aufrufe: 1271

For a = 1 To Screen.Width / Screen.TwipsPerPixelX For b = 1 To Screen.Height / Screen.TwipsPerPixelY Farbe = GetPixel(wdc, a, b) Next Next a Du solltest die Berechnung von "Screen.Width / Screen.TwipsPerPixelX" und auch die von Y in jeweils eine Variable übergeben. Natürlich vor der Schleife. Aber schneller wird es mit dieser Methode schätze ich nicht mehr geh ...

Verfasst am: 19.08.2007, 15:08 Aufrufe: 1271

Hi Leute, Meine Fage ist es möglich mit GetPixel alle pixel des monitors auszulesen? Wenn bestimmte Pixel vorkommen sollte es mir angezeigt werden. Danke im Vorraus! Danke im Vorraus Edit// Ich hab es jetzt so: Private Declare Function GetPixel Lib "gdi32" (ByVal hdc As Long, ByVal x As Long, ByVal y As Long) As Long Private Declare Function GetWindowDC Lib "user32" (ByVal hw ...