-
Forum: Software-Projekte der Mitglieder
by xZise,
26. Aug 2009
Naja indem du einen "Wassersprite" nimmst ;)
Joar das ist aber auch ein komischer "Skalierungsfaktor" :D
Und du veränderst die Größe nirgends? Auch nicht mit Zoom o.ä.? Erstelle ein neues Projekt und baue nur das ein was zur Anzeige eines Tiles notwendig ist. Vielleicht kommt man dann den "Fehler" auf die Spur?
Und ich bin mir nicht sicher, aber muss man nicht auch die Größe des...
-
Forum: Software-Projekte der Mitglieder
by xZise,
23. Aug 2009
Naja, weil dir ein TPoint nicht hilft. Deshalb habe ich eine Frage zu deinem Problem: Werden die Bilder mit der normalen Größe dargestellt, sie sollten aber verkleinert werden?
Also du hast zwei Sprites mit dem Abstand von 48 px aber die Grafik auf diesem Sprite ist 64px breit und deshalb sind 16px (des 1.) unter dem benachbarten Sprite (dem 2.)?
Ich bin mir nicht mehr sicher, aber ich...
-
Forum: Software-Projekte der Mitglieder
by xZise,
23. Aug 2009
TPoint ist ein record bestehend aus einer X und Y Koordinate.
Also entweder du übergibst einen TPoint, oder mit Point() kannst du dir aus zwei Koordinaten einen Punkt "erstellen".
MfG
xZise
-
Forum: Software-Projekte der Mitglieder
by xZise,
21. Jan 2009
Naja du könnest gucken, ob du vielleicht an den Bilddaten noch Informationen dranhängen kannst?
MfG
xZise
-
Forum: Software-Projekte der Mitglieder
by xZise,
12. Jan 2009
KreisRING ist ein Kreis wo in der Mitte ein Kreis fehlt. Und ein Rechteckiger Kreisring ist ein Rechteck ohne Rechteck in der Mitte ;)
MfG
xZise
-
Forum: Software-Projekte der Mitglieder
by xZise,
12. Jan 2009
Nein ^^ Einfach ein Kreisring in rechtecker Form ...
________
| ____ |
| | | |
| |__| |
|______|
Mehr nicht :)
MfG
-
Forum: Software-Projekte der Mitglieder
by xZise,
11. Jan 2009
Naja, weil wahrscheinlich intern in die Datei auch ein AnsiString gespeichert wird. Könnte unschön sein.
Aber was anderes: Wäre es möglich dem TSprite eine Eigenschaft "DefaultDraw" zu verpassen? Weil, ich würde den Cursor bei mir nämlich selber zeichnen (nachdem alles andere gezeichnet wurde). Aber wenn ich einmal "SpriteEngine.Draw" und "Cursor.Draw" mache habe ich es ja doppelt. Deshalb...
-
Forum: Software-Projekte der Mitglieder
by xZise,
7. Jan 2009
Wow .... Mal eben ein abgerundetes Rechteck zu zeichnen ist nicht ohne, wenn ich mir den Code des Rechtecks anschaue. Also ein Großteil habe ich verstanden, wobei ich bei procedure TAdCanvasQuadObject.Generate; noch nicht so den Durchblick habe :D
By the way:
Kreis ohne Füllung -> IntegerÜberlauf :stupid:
Und eine Frage bei dem Kreis:
Die Anzahl der Schritte sind ja: 2 * PI * r *...
-
Forum: Software-Projekte der Mitglieder
by xZise,
5. Jan 2009
Naja das ist das Problem mit den Edits ;)
Okay stimmt das sollte gehen ;)
Tja das nervt mich auch, dass die Transparenzbehandlung nicht die beste ist. Wobei ich jetzt nicht weiß, wie das mit Delphi 2009 aussieht. Das soll ja endlich png-Dateien unterstützen.
Könntest du auch machen ;) und so schlecht ist die Idee gar nicht ;)
-
Forum: Software-Projekte der Mitglieder
by xZise,
5. Jan 2009
Was ist los :) Ist so still geworden, aber auch mit Workaround sieht die Transparenz schrecklich aus.
MfG
xZise
-
Forum: Software-Projekte der Mitglieder
by xZise,
2. Jan 2009
Hmmm also ich habe jetzt die "alte" Methode entfernt und sie neu deklariert:
function TAdVCLFormat.AssignTo(ABitmap: TAdBitmap;
AGraphic: TObject): boolean;
var
pc1, pc2: PCardinal;
x, y: integer;
bmp: TBitmap;
begin
bmp := TBitmap.Create;
try
-
Forum: Software-Projekte der Mitglieder
by xZise,
2. Jan 2009
Achso ;)
Naja ich habe es vermutlich auf das Kopieren der Daten (AssignTo der Klasse TAdVCLFormat^^) eingegrenzt. Aber so richtig weiß ich nicht, was ich da testen könnte.
Was sein könnte, dass er irgendwie die Hintergrundfarbe nicht richtig setzt, weil da wo Transparenz ist, sieht man schwarz (durchscheinen).
Trace von SaveToGrapic
AImgBuf.SaveToGraphic -> procedure...
-
Forum: Software-Projekte der Mitglieder
by xZise,
2. Jan 2009
Ehm warum das denn? Also erstens nehme ich an dass der VCL Code soweit i.O. ist und zweitens könnte ich dieses Bitmap auch mit einem TImage verknüpfen und würde nur eine Schwarze Fläche sehen.
MfG
xZise
Ich meine natürlich nicht den VLC media player sondern die Visual Component Library
-
Forum: Software-Projekte der Mitglieder
by xZise,
2. Jan 2009
Hmmm also damit funktioniert es, aber mit diesem Code nicht:
bmp := TBitmap.Create;
try
AImgBuf.Texture.SaveToGraphic(bmp);
bmp.SaveToFile(ExtractFilePath(ParamStr(0)) + 'Neuer Ordner\' + AName + '-a.bmp');
finally
bmp.Free;
end;
MfG
-
Forum: Software-Projekte der Mitglieder
by xZise,
2. Jan 2009
Naja ist ja nicht so die große Sache. Ich kam nur auf die Idee das so umzusetzen, weil ich eine TFixelList habe die von TSpriteList abgeleitet wurde.
Ah mist, aber ich wollte jetzt nicht alle Tutorials durchsuchen um möglicherweise was zu finden ;)
Okay ich gucke es mir mal an.
Nein ich will nur gucken, ob ein Inhalt eines AdImages wirklich komplett schwarz ist. Und ein SaveToGraphic...
-
Forum: Software-Projekte der Mitglieder
by xZise,
2. Jan 2009
Ich habe übrigens ein Speicherleck in AdDraws.pas gefunden (Z. 2601 - 2608 in Version 0.4.5.1):
procedure TAdTexture.SaveToFile(AFile: string);
var
ms:TMemoryStream;
begin
ms := TMemoryStream.Create;
SaveToStream(ms);
ms.SaveToFile(AFile);
end;
-
Forum: Software-Projekte der Mitglieder
by xZise,
1. Jan 2009
Hmm stimmt, das wäre tatsächlich besser und nachher hilfreicher. Kann Igel ja ändern ;)
Und in welchen Format speichert AdBitmap.SaveToFile die Datei ab? Ich wollte nämlich mal gucken woran es liegt, das unter Delphi 2009 der ImageListEditor nicht funktioniert (also die Vorschau anzeige in der ListView nicht mit Transparenzen umgehen kann). Kann es sein, dass es sich um ein von dir...
-
Forum: Software-Projekte der Mitglieder
by xZise,
1. Jan 2009
Ehm nein ^^ Davor war es eine Funktion der Klasse TSprite jetzt ist es eine der Klasse TSpriteList und TSprite ruft die der TSpriteList auf ;)
MfG
xZise
-
Forum: Software-Projekte der Mitglieder
by xZise,
1. Jan 2009
Neben den ganzen Übersetzungen habe ich die Unit AdSprites erweitert. Und zwar ist es ja nicht sinnvoll in einer Engine nach Sprites zu suchen, sondern direkt in der Liste (so kann diese Funktionalität auch in Abkömmlingen verwendet werden). Deshalb habe ich der Klasse TSpriteList "GetSpritesAt" verpasst:
procedure TSpriteList.GetSpritesAt(ASpriteList: TSpriteList; const AX,
AY: Integer;...
-
Forum: Software-Projekte der Mitglieder
by xZise,
31. Dez 2008
Ich habe mir noch nicht die neueste Version geholt, aber funktioniert es jetzt unter Delphi 2009, dass die Grafiken richtig im ImgEdit angezeigt werden?
Und unter welcher Lizenz steht Andorra 2D und der ImgEdit (ich habe mir daraus das Zeichnen der ListView geholt)?
MfG
xZise
-
Forum: Software-Projekte der Mitglieder
by xZise,
28. Dez 2008
Hallo igel!
Ich habe mal die „GetSpritesAt“ umgesetzt:
{Returns all sprites at the specified position}
procedure GetSpritesAt(const AX, AY : Integer; ASprites : TSpriteList); overload; virtual;
{Returns all sprites at the specified position and of a specified type}
procedure GetSpritesAt(const AX, AY : Integer; ASprites : TSpriteList; AClass : TSpriteClass); overload; virtual;
procedure...
-
Forum: Software-Projekte der Mitglieder
by xZise,
28. Dez 2008
Also Andorra2D verwendet intern AnsiString, und der normale string ist ja seit Delphi 2009 ein Unicodestring. Somit ist dort immer eine Verlustbehaftete Konvertierung.
MfG
xZise
-
Forum: Software-Projekte der Mitglieder
by xZise,
28. Dez 2008
Hallo,
Also DrawBall geht wieder nachdem ich es nochmal gedownloadet habe.
Aber dafür hätte ich gerne eine Lösung:
Übrigens habe ich jetzt doch nicht am ImageEditor gearbeitet gehabt. Kannst dich also austoben Florian!
MfG
xZise
-
Forum: Software-Projekte der Mitglieder
by xZise,
28. Dez 2008
WObei ich unter Windows Vista Home Premium x64 auch jetzt auf einmal Probleme mit Drawball habe (wobei ich da nix geändert habe):
(ich weiß ^^ eine nichts sagende Nachricht)
Ich probiere es mal mit nochmal Downloaden.
MfG
xZise
-
Forum: Software-Projekte der Mitglieder
by xZise,
26. Dez 2008
Wäre es möglich, das du es manchmal aus einem Archiv heraus ausführst?
MfG
xZise