| |
VB.NET - Ein- und UmsteigerCursor auf Resize setzen - zum Bild Vergrößern | | | Autor: CrunchFlake | Datum: 24.03.10 09:42 |
| Hallo Leute,
ich habe einen RTF-Editor erstellt. Der Benutzer kann hier auch Bilder per Copy&Paste einfügen.
Wie stelle ich es jetzt an, dass sie der Cursor, wenn ich über die Bildecken fahre, in den jeweiligen "resize-cursor" verändert.
Das Größeverändern des eingefügten Bild klappt bereits von Haus aus, allerdngs verändert sich der Cursor nicht.
Irgendwelche Ideen?
Danke im Voraus! | |
Re: Cursor auf Resize setzen - zum Bild Vergrößern | | | Autor: Maas | Datum: 24.03.10 13:01 |
| Me.Cursor = Cursors.SizeNESW Maas | |
Re: Cursor auf Resize setzen - zum Bild Vergrößern | | | Autor: CrunchFlake | Datum: 24.03.10 13:50 |
| Danke!
Aber das Problem ist, dass ich ja nicht weiß, wie ich das Bild, was hineinkopiert wird, ansprechen soll.
Das ist ja innerhalb der RTB, welche innerhalb des Formulars ist.
Setze ich, die Cursoreigenschaft der RTB, führt dies auch nicht zum Erfolg.
Auch so etwas funktioniert nicht:
For Each el As Control In rtbTextNew.Controls
el.Cursor = Cursors.SizeNESW
Next (rtbTextNew ist meine RTB^^)
Wie kann ich das richtig einstellen? | |
Re: Cursor auf Resize setzen - zum Bild Vergrößern | | | Autor: Maas | Datum: 24.03.10 13:54 |
| Das Größeverändern des eingefügten Bild klappt bereits von Haus aus, allerdngs verändert sich der Cursor nicht.
?
Maas | |
Re: Cursor auf Resize setzen - zum Bild Vergrößern | | | Autor: Manfred X | Datum: 24.03.10 15:20 |
| Hallo!
Ich vermute, CrunchFlake meint, dass sich bei einem Maus-Click
auf das eingebettete Bild, die mit Bitmaps verbundene Anwendung
öffnet - mit der dann u.U. die Größe des Bildes verändert
werden kann. Oder?
Soweit ich weiß, stellt das RichtextBox-Control keine weiteren
(direkt aufrufbaren) Methoden zur Verwaltung eingebetteter Bilder
zur Verfügung. | |
Re: Cursor auf Resize setzen - zum Bild Vergrößern | | | Autor: GPM | Datum: 24.03.10 15:37 |
| Der IBeam-Cursor ist bei Bildern wirklich nicht besonders gut.
Da es dafür wohl direkt keine Erkennung gibt könnte man den Cursor ganz auf
Cursor.Hand setzen oder nur bei einer Bildauswahl. Hier mal ein einfacher
Demo-Versuch.
Public Class Form1
Private WithEvents Rtb As New RichTextBox With {.Dock = DockStyle.Fill, _
.Parent = Me}
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As _
System.EventArgs) Handles MyBase.Load
Clipboard.SetImage(SystemIcons.Error.ToBitmap)
Rtb.Text = Now.ToString
Rtb.ZoomFactor = 2
Rtb.Paste(DataFormats.GetFormat("Bitmap"))
End Sub
Private Sub Rtb_SelectionChanged(ByVal sender As Object, ByVal e As _
System.EventArgs) Handles Rtb.SelectionChanged
Dim st As Boolean = (Rtb.SelectionType = _
RichTextBoxSelectionTypes.Object)
Rtb.Cursor = If(st, Cursors.Hand, Cursors.IBeam)
End Sub
End Class MfG GPM 0 | |
| 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 |
|
|
Neu! sevCommand 4.0
Professionelle Schaltflächen im modernen Design!
Mit nur wenigen Mausklicks statten auch Sie Ihre Anwendungen ab sofort mit grafischen Schaltflächen im modernen Look & Feel aus (WinXP, Office, Vista oder auch Windows 8), inkl. große Symbolbibliothek. 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
|
|
|
Copyright ©2000-2024 vb@rchiv Dieter Otter Alle Rechte vorbehalten.
Microsoft, Windows und Visual Basic sind entweder eingetragene Marken oder Marken der Microsoft Corporation in den USA und/oder anderen Ländern. Weitere auf dieser Homepage aufgeführten Produkt- und Firmennamen können geschützte Marken ihrer jeweiligen Inhaber sein.
Diese Seiten wurden optimiert für eine Bildschirmauflösung von mind. 1280x1024 Pixel
|
|