Hallo zusammen!
Ich habe in meinem Projekt ein hartnäckiges Problem ...
----------------------------------------------------------------------
Der Quellcode ist der folgende:
Public Class Form1
Private Sub speichern()
Public Function screencapturer() As Bitmap
Dim b As New Bitmap(SystemInformation.VirtualScreen.Width, SystemInformation.VirtualScreen.Height)
Dim g As Graphics = Graphics.FromImage(b)
g.CopyFromScreen(0, 0, 0, 0, b.Size)
g.Dispose()
Return b
End Function
Dim saveFileDialog13 As New SaveFileDialog()
saveFileDialog13.Filter = "JPG-Format|*.jpg|BMP-Format|*.bmp|GIF-Format|*.gif|Jedes Format|*.*"
saveFileDialog13.Title = "Arbeit speichern"
saveFileDialog13.ShowDialog()
Try
System.Threading.Thread.Sleep(250)
PictureBox2.Image = screencapturer()
PictureBox2.Image.Save(saveFileDialog13.FileName)
Catch ex As Exception
End Try
End Sub
Private Sub ToolStripDropDownButton3_Click(sender As System.Object, e As System.EventArgs) Handles ToolStripDropDownButton3.Click
Form2.Show()
speichern()
End Sub
End Class
-----------------------------------------------------------------------------------------------------
Und nun zur Erläuerung des Quellcodes:
1. Es wird die Private Sub speichern() definiert, die dafür sorgt, dass man einen Bildschirmausschnitt speichern kann ( ganzer Bildschirm)
Hier liegt auch das Problem:
Ich habe einen Windows-SaveFileDialog zum Speichern der Bilddatei verwendet und möchte dannach meine selbstgebastelte Bildschirmtastatur (Form2), die sich im
selben Projekt befindet, aufrufen, damit der Nutzer auf Touchscreen-PCs den Dateinamen mit meiner selbstgebastelten selbstgebastelter Bildschirmtastatur eintippen
kann. Soweit wäre ich schonmal in Gedanken... Aber in der Realität sieht es so aus, dass derSaveFileDialog in den Vordergrund springt und meine Bildschirmtastatur
"eingefroren" ist, während der Dialog offen ist.
2. Beim Klick auf das 4. Item im ToolStrip wird die Private Sub speichern() aufgerufen.
--------------------------------------------------------------------------------------------------------
Das konkrete Problem:
In: Private Sub speichern()
Ich habe einen Windows-SaveFileDialog zum Speichern der Bilddatei
verwendet und möchte dannach meine selbstgebastelte Bildschirmtastatur
(Form2), die sich im
selben Projekt befindet, aufrufen, damit
der Nutzer auf Touchscreen-PCs den Dateinamen mit meiner
selbstgebastelten selbstgebastelter Bildschirmtastatur eintippen
kann. Soweit wäre ich schonmal in Gedanken... Aber in der Realität
sieht es so aus, dass derSaveFileDialog in den Vordergrund springt und
meine Bildschirmtastatur
"eingefroren" ist, während der Dialog offen ist.
Das Problem ist sehr hartnäckig und ich weiß keine Lösung ... Bitte schnell helfen!!! Danke
Euer VisualBasic-Frager
Ich habe in meinem Projekt ein hartnäckiges Problem ...
----------------------------------------------------------------------
Der Quellcode ist der folgende:
Public Class Form1
Private Sub speichern()
Public Function screencapturer() As Bitmap
Dim b As New Bitmap(SystemInformation.VirtualScreen.Width, SystemInformation.VirtualScreen.Height)
Dim g As Graphics = Graphics.FromImage(b)
g.CopyFromScreen(0, 0, 0, 0, b.Size)
g.Dispose()
Return b
End Function
Dim saveFileDialog13 As New SaveFileDialog()
saveFileDialog13.Filter = "JPG-Format|*.jpg|BMP-Format|*.bmp|GIF-Format|*.gif|Jedes Format|*.*"
saveFileDialog13.Title = "Arbeit speichern"
saveFileDialog13.ShowDialog()
Try
System.Threading.Thread.Sleep(250)
PictureBox2.Image = screencapturer()
PictureBox2.Image.Save(saveFileDialog13.FileName)
Catch ex As Exception
End Try
End Sub
Private Sub ToolStripDropDownButton3_Click(sender As System.Object, e As System.EventArgs) Handles ToolStripDropDownButton3.Click
Form2.Show()
speichern()
End Sub
End Class
-----------------------------------------------------------------------------------------------------
Und nun zur Erläuerung des Quellcodes:
1. Es wird die Private Sub speichern() definiert, die dafür sorgt, dass man einen Bildschirmausschnitt speichern kann ( ganzer Bildschirm)
Hier liegt auch das Problem:
Ich habe einen Windows-SaveFileDialog zum Speichern der Bilddatei verwendet und möchte dannach meine selbstgebastelte Bildschirmtastatur (Form2), die sich im
selben Projekt befindet, aufrufen, damit der Nutzer auf Touchscreen-PCs den Dateinamen mit meiner selbstgebastelten selbstgebastelter Bildschirmtastatur eintippen
kann. Soweit wäre ich schonmal in Gedanken... Aber in der Realität sieht es so aus, dass derSaveFileDialog in den Vordergrund springt und meine Bildschirmtastatur
"eingefroren" ist, während der Dialog offen ist.
2. Beim Klick auf das 4. Item im ToolStrip wird die Private Sub speichern() aufgerufen.
--------------------------------------------------------------------------------------------------------
Das konkrete Problem:
In: Private Sub speichern()
Ich habe einen Windows-SaveFileDialog zum Speichern der Bilddatei
verwendet und möchte dannach meine selbstgebastelte Bildschirmtastatur
(Form2), die sich im
selben Projekt befindet, aufrufen, damit
der Nutzer auf Touchscreen-PCs den Dateinamen mit meiner
selbstgebastelten selbstgebastelter Bildschirmtastatur eintippen
kann. Soweit wäre ich schonmal in Gedanken... Aber in der Realität
sieht es so aus, dass derSaveFileDialog in den Vordergrund springt und
meine Bildschirmtastatur
"eingefroren" ist, während der Dialog offen ist.
Das Problem ist sehr hartnäckig und ich weiß keine Lösung ... Bitte schnell helfen!!! Danke
Euer VisualBasic-Frager
Dieser Beitrag wurde bereits 1 mal editiert, zuletzt von „VisualBasic-Frager“ ()