Grafisches Problem - WinForms zu WPF

kafffee · 19. September 2022, 16:13

Hallo miteinander

Ich hab mal ein komplexeres Problem, aber fangen wir mal so an, vielleicht erledigt sich dann der Rest:

An anderer Stelle in meinem Projekt hab ich das hier, und es funktioniert:

Ziel ist es, für diese Funktion der bass.dll die Werte zu ermitteln für Breite und Höhe, damit das Bild mit den richtigen Parametern erstellt wird. Denn das Image kann in der Größe variieren, je nachdem, wie das Fenster skaliert wird oder der was für ein Format der Bildschirm hat (ich benutze Grids mit prozentualer Angabe für Width and Height).

XML-Quellcode

<Border BorderThickness="1" BorderBrush="Aquamarine">
<Image Grid.Row="0" Width="{Binding Breite, Mode=OneWayToSource, UpdateSourceTrigger=PropertyChanged}" Height="{Binding Hoehe, Mode=OneWayToSource, UpdateSourceTrigger=PropertyChanged}" Source="{Binding Bild, UpdateSourceTrigger=PropertyChanged, Mode=OneWay}" Stretch="Fill" Validation.ErrorTemplate="{x:Null}"/>
</Border>

Und im ViewModel davon:

VB.NET-Quellcode

Private _Breite As Integer
Public Property Breite As Integer
Get
Return _Breite
End Get
Set(value As Integer)
_Breite = value
RaisePropertyChanged()
End Set
End Property
Private _Hoehe As Integer
Public Property Hoehe As Integer
Get
Return _Hoehe
End Get
Set(value As Integer)
_Hoehe = value
RaisePropertyChanged()
End Set
End Property
...
BMP = Spektrum.CreateSpectrumLinePeak(MainModule.streamfx(WelcherEQ - 1), Breite, Hoehe, System.Drawing.Color.Green, System.Drawing.Color.IndianRed, System.Drawing.Color.SlateGray, System.Drawing.Color.Transparent, Breite \ 10, 3, MainModule.SpectrumAnalyzerDistanz, 40, False, True, True)

Wenn ich aber das hier mache:

XML-Quellcode

<Canvas Grid.Row="6">
<Image Source="{Binding WaveFormSource, Mode=OneWay, UpdateSourceTrigger=PropertyChanged}" Canvas.Top="0" Canvas.Left="{Binding XPosition, Mode=OneWay, UpdateSourceTrigger=PropertyChanged}" Stretch="Fill" Width="{Binding Breite, Mode=OneWayToSource, UpdateSourceTrigger=PropertyChanged}" Height="{Binding Hoehe, Mode=OneWayToSource, UpdateSourceTrigger=PropertyChanged}" HorizontalAlignment="Stretch" VerticalAlignment="Stretch"/>
<Line Stroke="Red" StrokeThickness="1" X1="{Binding X_1}" X2="{Binding X_1}" Y1="0" Y2="100"/>
</Canvas>

und das:

VB.NET-Quellcode

Private MeineWellenForm As New WaveForm
WellenForm = New Bitmap(MeineWellenForm.CreateBitmap(Breite, Hoehe, -1, -1, True))

bekomme ich hier immer den Fehler in Zeile 2...

HResult=0x80004003
Nachricht = Der Objektverweis wurde nicht auf eine Objektinstanz festgelegt.
Quelle = System.Drawing

...wenn ich Breite und Hoehe nicht vorher festlege, obwohl das bei dem ersten Beispiel ohne Festlegen funktioniert hat.

Hat jemand ne Idee, warum das beim zweiten Beispiel nicht funktioniert?

Akanel · 20. September 2022, 07:51

Das liegt daran das die Eigenschaften Width und Height vom Canvas Standardmäßig immer null sind. Du musst also in deinem Fall Width und Height angeben.
Ich denke aber das du statt eines Canvas besser ein Grid nehmen solltest.

Wenn ich das richtig gelesen habe können untergeordnete Elemente eines Canvas die Größe nicht ändern. Sie sind fix an ihren Coordinaten.
Lies mal hier nach
learn.microsoft.com/de-de/dotn…indowsdesktop-6.0#remarks

kafffee · 20. September 2022, 14:33

@Akanel

Habs mal komplett ohne das Canvas versucht. Da passiert immer noch das Gleiche... Echt komisch an der anderen Stelle im Programm funktioniert das tadellos...

Ich würde gern mal ein kleines Testprogramm hochladen. Das hat jetzt aber eine NuGet-Abhängigkeit. Wie bereinige ich das Projekt dann? Einfach den Ordner "packages" löschen und das wird dann beim Empfänger automatisch wieder installiert?

Bevor wir an der Stelle weitermachen und dann in die falsche Richtung denken:

Ich habe vor mir von meinem Programm eine WaveForm von MP3s zeichnen zu lassen. Das erledigt die bass.dll... Der übergibt man einfach die Werte für Breite und Höhe und dann wird die Waveform der (kompletten!) mp3 so skaliert, dass sie in dein Image/PictureBox passen.
Nun soll sich das aber mitbewegen, wenn die MP3 abgespielt wird, d.h. genau in der horizontalen Mitte des Image soll eine Linie sein, und das von der bass.dll generierte Bild soll sich so bewegen, dass die Linie immer genau auf die Abspielposition zeigt, d.h. das generierte Bild muss sich in meinem Control nach links bewegen. Daher hatte ich das Canvas gewählt.... Aber geht das auch anders und ich kann mir das Problem mit der dynamischen Breite und Höhe sowieso sparen?

Akanel · 21. September 2022, 07:03

Das ich das mal verstehe. Ohne ein Canvas hast du bereits alles hinbekommen, und jetzt möchtest du es nur mit einem Canvas probieren?

Deine Waveform ist ein Bild. Darüber zeichnest du mittig eine Linie. Nun soll sich das Bild so verschieben das die aktuelle Position des Liedes immer in der Mitte ist?
Also das Bild soll sich nach links, oben und unten bewegen können?

kafffee · 21. September 2022, 07:24

Ich hab ein funktionierendes WinForms-Beispiel. Nur dass ich da nicht die komplette Picturebox bewege, sondern nur das Bild darin mit veränderter Position zeichne mit der Funktion DrawImage.
Nach oben und unten brauch ich das Bild nicht bewegen nur rechts/links, aber sonst hast du richtig verstanden.
Das mit der Hoehe und Breite dynamisch ermitteln hab ich an anderer Stelle in meinem Wpf-Programm schon und es funktioniert, nur hab ich keine Ahnung, warum da jetzt an dieser Stelle immer nur 0 rauskommt....
Ich kann dir gern mal jeweils das WinForms und Wpf Testprojekt hochladen, bin mir nur unsicher, wie das mit den Nuget-Paketen läuft...

Akanel · 21. September 2022, 09:18

Stell einfach mal ein. Lösch den Package Ordner. Sollte ich dann wiederherstellen können.

BitBrösel · 21. September 2022, 09:46

Jupp, das Package kann einfach gelöscht werden, wird bei Bedarf neu geladen. @kafffee Könnte es sein das dir DesignTime/RunTime reingrätscht? Ich mache meinen Mediaplayer auch noch mal mit WPF neu, ich hatte da Probleme im ViewModel zwischen RunTime und DesignTime zu unterscheiden, im Konstruktor von ViewModels hole ich die Services die ich in der App.xml im StartUp hinzufüge, zur Designtime können die nur null sein, deshalb meldete auch der Designer immer (Es wurde keine Object-Instanz.....) in der Zeile wo ich das ViewModel einem DataContext zuweise, aber kompilieren und laufen tut alles. Nun teste ich ob der gewollte service null ist, habe zur Designtime deshalb keine Probleme mehr. Da du ja auch mit Services arbeitest(hatte ja deine andere Projektmappe gesehen), könnte das ja ähnlich sein.

Wann tritt der Fehler auf, zur DesignTime oder immer?

kafffee · 21. September 2022, 10:32

@Akanel

Wie versprochen anbei die zwei Projekte. Du musst im WinForms-Projekt (Zeile 8) noch an einer Stelle und im WPF-Projekt an zwei Stellen den Pfad einer MP3 Datei eingeben (Zeilen 54 und 59), ich hab aber alles soweit kommentiert.
Im WPF Projekt findest du den relevanten Code im View-Projekt unter MainView.xaml und im ViewModel-Projekt in der MainViewModel.vb.
Ausserdem brauchst du noch die bass.dll, die lässt sich leider nicht per Nuget installieren, nur der Wrapper, wie ich gerade rausgefunden hab. Du findest sie auf der Un4SeenWebsite ganz oben unter Win32..

Diese musst du in den bin/debug Ordner vom App-Projekt und ViewModel-Projekt reinkopieren, bzw. beim WinForms den bin/debug Ordner...

@BitBrösel
Der Fehler tritt zur Laufzeit auf. Bei mir kann man mit IsInDesignMode oder so ähnlich abfragen, ob der Code zur Desgin- oder Laufzeit ausgeführt wird, ist recht praktisch...

BitBrösel · 21. September 2022, 10:46

Ich probiere gerade auch das zu realisieren, gar nicht so einfach, manche Funktionen wollen ein Forms.Control als Argument(WaveForm aus Misc oder Visuals z.B. sobald ein CallBack verwendet wird). Wäre das nicht, hätte ich bereits was, aber ein Verweis auf WinForms kommt mir net in die Tüte. Immerhin hab ich schonmal ein schwarzes Bild ohne Fehlermeldung. Liegt wohl am Konvertieren.

Ich schau mal in deiner Mappe nach, probiere weiter und berichte bei Erfolg.

@kafffee

BuildAusgabe schrieb:

System.Windows.Data Error: 7 : ConvertBack cannot convert value 'NaN' (type 'Double'). BindingExpression:Path=Breite; DataItem='MainViewModel' (HashCode=34181910); target element is 'Image' (Name=''); target property is 'Width' (type 'Double') OverflowException:'System.OverflowException: Der Wert für einen Int32 war zu groß oder zu klein.
bei System.Convert.ToInt32(Double value)
bei System.Double.System.IConvertible.ToInt32(IFormatProvider provider)
bei System.Convert.ChangeType(Object value, Type conversionType, IFormatProvider provider)
bei MS.Internal.Data.SystemConvertConverter.ConvertBack(Object o, Type type, Object parameter, CultureInfo culture)
bei System.Windows.Data.BindingExpression.ConvertBackHelper(IValueConverter converter, Object value, Type sourceType, Object parameter, CultureInfo culture)'
"DialogFensterTest2.App.exe" (CLR v4.0.30319: DialogFensterTest2.App.exe): "C:\Windows\Microsoft.Net\assembly\GAC_MSIL\PresentationFramework.resources\v4.0_4.0.0.0_de_31bf3856ad364e35\PresentationFramework.resources.dll" geladen. Das Modul wurde ohne Symbole erstellt.
Ausnahme ausgelöst: "System.OverflowException" in mscorlib.dll
System.Windows.Data Error: 7 : ConvertBack cannot convert value 'NaN' (type 'Double'). BindingExpression:Path=Hoehe; DataItem='MainViewModel' (HashCode=34181910); target element is 'Image' (Name=''); target property is 'Height' (type 'Double') OverflowException:'System.OverflowException: Der Wert für einen Int32 war zu groß oder zu klein.
bei System.Convert.ToInt32(Double value)
bei System.Double.System.IConvertible.ToInt32(IFormatProvider provider)
bei System.Convert.ChangeType(Object value, Type conversionType, IFormatProvider provider)
bei MS.Internal.Data.SystemConvertConverter.ConvertBack(Object o, Type type, Object parameter, CultureInfo culture)
bei System.Windows.Data.BindingExpression.ConvertBackHelper(IValueConverter converter, Object value, Type sourceType, Object parameter, CultureInfo culture)'

Änder das mal zu double

kafffee · 21. September 2022, 10:55

@BitBrösel

Ja bei den Funktionen mit Callback Funktion gibt's meistens auch eine Überladung ohne Winforms Control.

Edit @BitBrösel:
Ja, das mit Problem mit den Doubles hatte ich auch schon und bin kläglich gescheitert. Deshalb hab ich Integer gewählt, das funktioniert auch, man bekommt halt einen roten Rahmen um das Image, den kann man aber unterdrücken mit Validation.ErrorTemplate ="{x:Null} "

Fehlermeldungen gibt's bei der bass.dll generell nur auf Nachfrage mit BASS_ErrorGetCode... Die spuckt dir die Fehlernummer des jeweils direkt vorangegangen Calls aus.

BitBrösel · 21. September 2022, 11:04

Das ja, aber sobald man den Konstruktor mit Callback nimmt, ist ein Forms.Control von nöten. Ich habe alles was die BASS angeht in einem weiteren Service, damit ich auch im EqualizerFenster-ViewModel drauf zugreifen kann. Wäre doch schön, sobald eine Datei abgespielt wird, wenn mit Callback die WF generiert wird, sobald fertig ein Event feiern. (EventHandler<BitmapSource>) was im ViewModel abboniert ist.

kafffee · 21. September 2022, 11:12

BitBrösel schrieb:

wenn mit Callback die WF generiert wird, sobald fertig ein Event feiern

Schau dir dazu mal das WinForms Projekt an. Die WaveForm-Klasse bietet ein Eigenschaft .IsRenderingInProgress an...

BitBrösel · 21. September 2022, 11:25

Ich glaube ich habe was gefunden, ich denke das rendern ist noch nicht durch und daher der Fehler. MeineWellenFormCallBackFunktion wird nie verwendet, da sind wir wieder bei den CallBacks.

Was mir jedenfalls aufgefallen ist, das Image das kommt ist nur zum Teil gerendert, siehe Anhang.

Ich probiere das noch mal ganz anders.

kafffee · 21. September 2022, 11:32

Wie das mit der Callback funktioniert, findest du auch im WinForms Projekt.

BitBrösel schrieb:

und daher der Fehler.

Du meinst der Fehler, wenn du Breite und Hoehe als Double machst?

BitBrösel · 21. September 2022, 11:43

Nein, das ist dein Projekt ohne Bearbeitung.

Ich habe die Fehler gefunden. Das Bitmap ist tatsächlich noch nicht fertig. Die While Schleife mit IsRenderingInProgress geht nicht, aber IsRendered liefert das was wir brauchen.

VB.NET-Quellcode

Private Sub OKDialogOeffnen_Execute(obj As Object)
Dim Objekt = DirectCast(obj, String)
Dim dialogService = ServiceContainer.GetService(Of IDialogWindowService)
Dim fensterService = ServiceContainer.GetService(Of IWindowService)
Select Case Objekt
Case "WaveForm"
Debug.WriteLine("Breite: " & Breite)
Debug.WriteLine("Höhe: " & Hoehe)
Bass.BASS_Init(-1, 44100, BASSInit.BASS_DEVICE_CPSPEAKERS, IntPtr.Zero, Nothing)
'Breite = 500
'Hoehe = 100
_stream = Bass.BASS_StreamCreateFile("", 0, 0, BASSFlag.BASS_DEFAULT Or BASSFlag.BASS_STREAM_AUTOFREE Or BASSFlag.BASS_SAMPLE_FLOAT) 'hier musst du noch den Pfad einer MP3 Datei eingeben als erstes Argument
Bass.BASS_ChannelPlay(_stream, False)
MeinTimer.Interval = TimeSpan.FromMilliseconds(20)
AddHandler MeinTimer.Tick, AddressOf UpdateVisualization
MeineWellenForm = New WaveForm("") 'hier musst du noch den Pfad der selben MP3 Datei eingeben als Argument
MeineWellenForm.ColorBackground = System.Drawing.Color.Black
MeineWellenForm.RenderStart(True, BASSFlag.BASS_SAMPLE_FLOAT Or BASSFlag.BASS_STREAM_PRESCAN Or BASSFlag.BASS_DEFAULT)
While Not MeineWellenForm.IsRendered
'todo: prevent endless loop
End While
WellenForm = New System.Drawing.Bitmap(MeineWellenForm.CreateBitmap(1024, 768, -1, -1, True))
WaveFormSource = BitmapToImageSource(WellenForm)
MeinTimer.Start()
End Select
End Sub

Dann hier:

VB.NET-Quellcode

If WellenForm IsNot Nothing Then
WellenForm = MeineWellenForm.CreateBitmap(Breite, Hoehe, -1, -1, True)
WaveFormSource = BitmapToImageSource(WellenForm)
End If

Soll wohl eher:

VB.NET-Quellcode

If WellenForm Is Nothing

Also bei mir klappt das nun. Edit @kafffee Code korrigiert, hatte STRG Z gedrück, daher fehlte das Not beim While. Wäre doch schöner mit Callback anstatt mit Loop warten bis fertig.

kafffee · 21. September 2022, 12:22

@BitBrösel

Sehe ich das richtig, du lässt die While-Schleife leer, damit einfach nur gewartet wird, bis IsRendered = True ist ohne dass was dabei getan wird?

Bist mir schon einen Schritt voraus, soweit war ich noch gar nicht mit dem Problem...

Aber das Breite und Hoehe bei 0 bleiben, das Problem besteht weiterhin... Irgendwas übersehe ich. Trag mal in deinem Code in Zeile 24 statt 1024 Breite ein, und statt 768 Hoehe, dann wirst du sehen was ich meine...

Vom Image sind ja Horizontal/VerticalAlignment standardmässig auf Stretch. Und wenn ich dann Width und Height mit OneWayToSource an Breite/Hoehe binde, sollte ja dann dort der tatsächliche Wert des Bildes abzufragen sein oder?

BitBrösel · 21. September 2022, 12:27

Also wenn du WaveForm.RenderStart callst, startet die BASS die Datei zu analysieren/daten daraus zu laden. RenderStart finde ich einen blöden namen für die Funktion, den rendern ist für mich ein Bild erstellen, egal ob Datei oder direkt auf'm Schirm. Dabei wird ja mit WaveForm.CreateBitmap das Bild gemacht, also irgendwas mit init oder prepare wäre besser. Aber das scannen der Datei dauert halt einen kleinen Moment, daher die While Schleife. Danach ist ja alles parat und man kann sich das Bitmap holen.

Ich bin dir aber sogar noch einen 2. Schritt voraus. Die Bindung mit der Width/Height gibt mit immer NAN aus. Hier ein Workaround:
stackoverflow.com/questions/10…rties-back-into-viewmodel

kafffee · 21. September 2022, 15:20

@BitBrösel

Hab bis grade gebraucht um das mal funktionierend nachzubauen... bei mir dauert halt alles bissle länger...

Das einzige Problem was ich jetzt noch habe, dass der falsche Bildausschnitt gezeigt wird, und somit das Ganze nicht, wie es soll, "synchron" zur Musik angezeigt wird. Ich dachte zuerst das liegt daran, dass ich die Einheiten nicht in Pixel umgerechnet hab aber daran scheints nicht zu liegen sondern eher daran, dass das Imagecontrol das erzeugte Bild einfach nur in seiner ganzen Grösse auf die eigene Grösse skaliert. Ich möchte aber, dass das Bild seine gerenderte Grösse behält und einfach nur der Bildausschnitt "verschoben" wird (dann klapp das nämlich auch mit der Variable Zoom. Im Winforms-Programm ist das ja anders gelöst:

VB.NET-Quellcode

Private Sub PictureBox1_Paint(ByVal sender As Object, ByVal e As System.Windows.Forms.PaintEventArgs) Handles PictureBox1.Paint
If Not WaveImg Is Nothing Then
e.Graphics.DrawImage(WaveImg, New Point((_trackposition * -1) + (PictureBox1.Width \ 2), 0))

Wobei WaveImg dass von der bass.dll generierte Bild ist.

Da wird also das Bild in der PictureBox verschoben und nicht die ganze PictureBox (diese hat Sizemode=Normal)

Geht das überhaupt so wie ich das mir vorstelle oder bzw. gibt es in der WPF auch irgendeine Methode, um eine Bild wie es ist in ein IMageControl zu zeichen mit Angabe der Koordinaten?

BitBrösel · 21. September 2022, 16:56

kafffee schrieb:

bei mir dauert halt alles bissle länger...

Nicht schlimm, auch langsam kommt man ins Ziel. Mit WPF dauerts bei mir auch länger, recherchieren, tippen, recherchieren, haare raufen, recherchieren, tippen. Bin froh wenn ich das endlich alles weiß und zum großen Teil das Recherchieren sparen kann. Bei meinem letzten Re-Write meines Mediaplayers in Forms, war ich schon 2-3 mal weiter.

Also mit dem malen, da bin ich mir nicht ganz so sicher. Manche scheinen bei Custom(nicht user)Controls kein MVVM anzuwenden, täte ich wohl auch so machen, also ich würde eine Klasse anlegen und von Canvas erben lassen. Property für markerposition und Bild rein, dann in OnRender im malen.(CodeBehind) Ich glaube in so einem Fall könnte man mit WVVM auch nichts machen, weil ja im Control selbst gemalt wird, aus dem VM heraus geht das ja nicht so einfach, wenn überhaupt, zumindest sehe ich noch keine Möglichkeit.

learn.microsoft.com/de-de/dotn…der?view=netframework-4.8

Dann kannst du im XAML Markerposition und Bild ans ViewModel-Interne binden.

Ich bin gerade am schauen ob man da nun auch einfach Bewegung ins Bild bekommen könnte, ähnlich wie in WinForms mit Graphics.TranslateTransform, halt nur im XAML und Bindung. Rendert man das Bild 20 mal breiter, könnte man das auch animieren, so das es "mitläuft".

Bin auch auf CroppedBitmap gestoßen, damit werde ich morgen mal experimentieren.
learn.microsoft.com/en-us/dotn…N&view=windowsdesktop-6.0

BitBrösel · 21. September 2022, 23:15

@kafffee

Ich hab mal weiter ein wenig probiert, hab ein Control gemacht, das sowohl DependencyProperties für ein BitmapSource und double hat. BitmapSource is klar, für das WaveForm Bild gedacht, die Property typ double für die Marker-Position, einfach %, kann man gut ausrechnen. Ich finde schon das in dem Fall CodeBehind sinnvoll ist, betrifft ja alles nur das Control-Interne. Solange später die Properties ans VM gebunden werden.

Das ist ohne WVVM, war zu faul eine ganze Mappe nur für Test-Zwecke vorzubereiten. Muss mir mal ein Projekt Template anlegen. Fehlt noch ein wenig Logik um zu Skallieren und auch um die WaveForm zu "bewegen", besser gesagt immer nur einen Teil davon rendern aber abhängig von der Position im Stream.

Spoiler anzeigen

C#-Quellcode

using System;
using System.Collections.Generic;
using System.Diagnostics;
using System.Linq;
using System.Text;
using System.Threading.Tasks;
using System.Windows;
using System.Windows.Media;
using System.Windows.Media.Imaging;
using System.Windows.Threading;
using System.Xml.Linq;
using static System.Net.Mime.MediaTypeNames;
namespace BassTest
{
public class MyFrameworkElement : FrameworkElement
{
public double MarkerPercentage
{
get => (double)GetValue(MarkerPercentageProperty);
set => SetValue(MarkerPercentageProperty, value);
}
public BitmapSource Image
{
get => (BitmapSource)GetValue(ImageProperty);
set => SetValue(ImageProperty, value);
}
public static readonly DependencyProperty MarkerPercentageProperty = DependencyProperty.Register("MarkerPercentage", typeof(double), typeof(FrameworkElement), new FrameworkPropertyMetadata(50.0, FrameworkPropertyMetadataOptions.AffectsRender));
public static readonly DependencyProperty ImageProperty = DependencyProperty.Register("Image", typeof(BitmapSource), typeof(FrameworkElement), new FrameworkPropertyMetadata(default(BitmapSource), FrameworkPropertyMetadataOptions.AffectsRender));
protected override void OnRender(DrawingContext dc)
{
base.OnRender(dc);
double x = RenderSize.Width / 100.0d * MarkerPercentage;
System.Windows.Media.Pen pen = new System.Windows.Media.Pen();
pen.Brush = System.Windows.Media.Brushes.Red;
pen.Thickness = 10.0f;
if(Image != null)
{
dc.DrawImage(Image, new Rect(0, 0, RenderSize.Width , RenderSize.Height));
}
dc.DrawLine(pen, new System.Windows.Point(x, 0), new System.Windows.Point(x, RenderSize.Height));
}
}
}

C#-Quellcode

using System;
using System.Collections.Generic;
using System.ComponentModel;
using System.Drawing;
using System.IO;
using System.Linq;
using System.Runtime.CompilerServices;
using System.Text;
using System.Threading;
using System.Threading.Tasks;
using System.Windows;
using System.Windows.Controls;
using System.Windows.Data;
using System.Windows.Documents;
using System.Windows.Input;
using System.Windows.Media;
using System.Windows.Media.Imaging;
using System.Windows.Navigation;
using System.Windows.Shapes;
using Un4seen.Bass;
using Un4seen.Bass.Misc;
namespace BassTest
{
/// <summary>
/// Interaktionslogik für MainWindow.xaml
/// </summary>
public partial class MainWindow : Window, INotifyPropertyChanged
{
string mp3File = ".mp3";
int stream = 0;
public MainWindow()
{
InitializeComponent();
}
private BitmapSource _bmpsrc = null;
public BitmapSource BmpSrc
{
get => _bmpsrc;
set
{
if(_bmpsrc != value)
{
_bmpsrc = value;
RaisePropertyChanged();
}
}
}
private void Window_Loaded(object sender, RoutedEventArgs e)
{
if(!Bass.BASS_Init(-1, 44100, BASSInit.BASS_DEVICE_SPEAKERS, IntPtr.Zero))
{
MessageBox.Show("ERROR BASS INIT");
Close();
}
stream = Bass.BASS_StreamCreateFile(mp3File, 0, 0, BASSFlag.BASS_SAMPLE_FLOAT | BASSFlag.BASS_STREAM_AUTOFREE);
if(stream != 0)
{
Bass.BASS_ChannelPlay(stream, false);
CreateWaveForm();
}
}
private void CreateWaveForm()
{
WaveForm wf = new WaveForm(mp3File);
wf.ColorBackground = System.Drawing.Color.Black;
wf.RenderStart(true, BASSFlag.BASS_SAMPLE_FLOAT | BASSFlag.BASS_STREAM_PRESCAN | BASSFlag.BASS_DEFAULT);
while(!wf.IsRendered)
{
//todo: prevent endless loop
}
Bitmap bmp = wf.CreateBitmap(4096, 1024, -1, -1, true);
BmpSrc = BitmapToImageSource(bmp);
}
private BitmapImage BitmapToImageSource(Bitmap bitmap)
{
using (MemoryStream memory = new MemoryStream())
{
bitmap.Save(memory, System.Drawing.Imaging.ImageFormat.Bmp);
BitmapImage bitmapimage = new BitmapImage();
bitmapimage.BeginInit();
bitmapimage.StreamSource = memory;
bitmapimage.CacheOption = BitmapCacheOption.OnLoad;
bitmapimage.EndInit();
return bitmapimage;
}
}
private void Window_Closed(object sender, EventArgs e)
{
if(stream != 0)
{
Bass.BASS_ChannelStop(stream);
}
Bass.BASS_StreamFree(stream);
Bass.BASS_Free();
}
public event PropertyChangedEventHandler PropertyChanged;
protected virtual void RaisePropertyChanged([CallerMemberName] string propertyName = "")
{
PropertyChanged?.Invoke(this, new PropertyChangedEventArgs(propertyName));
}
}
}

XML-Quellcode

<Window x:Class="BassTest.MainWindow"
xmlns="http://schemas.microsoft.com/winfx/2006/xaml/presentation"
xmlns:x="http://schemas.microsoft.com/winfx/2006/xaml"
xmlns:d="http://schemas.microsoft.com/expression/blend/2008"
xmlns:mc="http://schemas.openxmlformats.org/markup-compatibility/2006"
xmlns:local="clr-namespace:BassTest"
mc:Ignorable="d"
x:Name="MainWindowName"
Title="MainWindow" Height="1000" Width="1500" Loaded="Window_Loaded" Closed="Window_Closed">
<Grid>
<Grid.RowDefinitions>
<RowDefinition Height="Auto"/>
<RowDefinition/>
</Grid.RowDefinitions>
<Slider Grid.Row="0" Minimum="0" Maximum="100" Value="{Binding ElementName=FWE, Path=MarkerPercentage}"/>
<local:MyFrameworkElement x:Name="FWE" Grid.Row="1" Image="{Binding ElementName=MainWindowName, Path=BmpSrc}"/>
</Grid>
</Window>

Vermutlich habe ich wieder mal das Rad neu erfunden, mal sehen ob doch noch was besseres kommt. Tut aber seinen Dienst.

Grafisches Problem - WinForms zu WPF

Grafisches Problem - WinForms zu WPF

XML-Quellcode

VB.NET-Quellcode

XML-Quellcode

VB.NET-Quellcode

BuildAusgabe schrieb:

BitBrösel schrieb:

BitBrösel schrieb:

VB.NET-Quellcode

VB.NET-Quellcode

VB.NET-Quellcode

VB.NET-Quellcode

kafffee schrieb:

C#-Quellcode

C#-Quellcode

XML-Quellcode

Ähnliche Themen

4 Benutzer haben hier geschrieben