Forum: Multimedia
Delphi
by FriFra,
13. Jan 2004
Ich habe es jetzt gelöst...
Ich zeichne nun meine Änderungen in ein neues komplett transparantes Icon und lege dieses Icon über das vorhandene:
http://www.swissdelphicenter.ch/de/showcode.php?id=1636
Danach wird das Icon auf allen Systemen korrekt angezeigt ;)
Testprogramm: http://www.frifra.de/download/online/XBuddy.zip (nur für XBox-Live User geeignet!)
Forum: Multimedia
Delphi
by FriFra,
3. Jan 2004
Ich habs jetzt auch mal über eine Componenten-Resource probiert... auch dabei kommt dann eine 16-Farb Version des korrekt geänderten Icons raus. Kann Delphi Icons denn nicht in ihrer korrekten Auflösung speichern?
WriteComponentResFile('test.bin',Image1);
ReadComponentResFile('test.bin', Image1);
Forum: Multimedia
Delphi
by FriFra,
3. Jan 2004
Das Icon selbst scheint in Ordnung zu sein... ich habe jetzt mal folgenden Code am Ende der eingebaut:
MS := TMemoryStream.Create;
Image1.Picture.Icon.SaveToStream(MS);
MS.Position := 0;
Image1.Picture.Icon.LoadFromStream(MS);
MS.Free;
Allerdings scheint Delphi nur eine 16-Farb Version in den Stream zu speichern, obwohl es ein 32-Bit Icon ist :(
Forum: Multimedia
Delphi
by FriFra,
3. Jan 2004
Unter XP pro mit einer Mobile Radeon läuft es nicht richtig...
Forum: Multimedia
Delphi
by FriFra,
3. Jan 2004
Hier ist mal ein Beispiel...
Forum: Multimedia
Delphi
by FriFra,
3. Jan 2004
Ich habe ein kleines Problem mit dem Ändern eines Icons. Das merkwürdige an der Sache ist, dass es auf einem Rechner läuft und auf dem anderen nicht...
http://www.frifra.de/Temp/buggyicon.JPG
procedure TXBuddy_Main.WriteReading(IsReading: Boolean);
var
StartX, StartY: integer;
id, n, x, y: integer;
IsLarger: boolean;
Bmp: TBitmap;