.[ ČeskéHry.cz ].
unit Graph a uzivatelsky vstup
Jdi na stránku Předchozí  1, 2, 3
 
odeslat nové téma   Odpovědět na téma    Obsah fóra České-Hry.cz -> Delphi / Pascal
Zobrazit předchozí téma :: Zobrazit následující téma  
Autor Zpráva
JC



Založen: 06. 10. 2007
Příspěvky: 137

PříspěvekZaslal: 25. říjen 2014, 00:17:57    Předmět: Odpovědět s citátem

Ahoj,

ano jde, mrkni sem:

http://zengl.org/forum/index.php/topic,124.msg522.html#msg522
http://zengl.org/forum/index.php/topic,431.msg2612.html#msg2612

případně si můžeš trošku vylepšit vykreslování spritů v zgl_sprite_2d.pas
Návrat nahoru
Zobrazit informace o autorovi Odeslat soukromou zprávu
skála



Založen: 07. 07. 2014
Příspěvky: 22
Bydliště: Klatovy

PříspěvekZaslal: 26. říjen 2014, 13:23:04    Předmět: Odpovědět s citátem

Zdravim, udělal jsem program podle návodu a stejně mi to vykreslí akorát čtverec.

kód:
program zkoseni;

{$I zglCustomConfig.cfg}

{$IFDEF WINDOWS}
  {$R *.res}
{$ENDIF}

uses
  {$IFDEF USE_ZENGL_STATIC}
  zgl_main,
    zgl_screen,
    zgl_window,
    zgl_timers,
    zgl_keyboard,
    zgl_camera_2d,
    zgl_render_2d,
    zgl_fx,
    zgl_textures,
    zgl_textures_png,
    zgl_textures_jpg,
    zgl_sprite_2d,
    zgl_primitives_2d,
    zgl_font,
    zgl_text,
    zgl_math_2d,
    zgl_utils   , sysutils, crt
  {$ELSE}
  zglHeader
  {$ENDIF}
  ;

var
  fntMain   : zglPFont;

procedure Init;
begin
  fntMain := font_LoadFromFile( 'P:\zenggl\zengl-src-0.3.12\zengl-src-0.3.12\bin\data\font.zfi' );

end;


procedure Draw;
begin
  fx2d_SetVertexes( 0, -16, -10, -16, 0, 0, 0, 0 );
  pr2d_Rect( 300, 300, 100, 100, $FFFFFF, 255, FX2D_VCHANGE );

end;

procedure Timer;
begin
  if key_Press( K_ESCAPE ) Then begin zgl_Exit(); end;
end;

procedure Update( dt : Double );
begin
end;


Begin
  {$IFNDEF USE_ZENGL_STATIC}
  if not zglLoad( libZenGL ) Then exit;
  {$ENDIF}

  timer_Add( @Timer,18);

  zgl_Reg( SYS_LOAD, @Init );
  zgl_Reg( SYS_DRAW, @Draw );
  zgl_Reg( SYS_UPDATE, @Update);

  wnd_SetCaption( 'Zobrazeni' );

  zgl_Enable( CORRECT_RESOLUTION );
  wnd_ShowCursor( TRUE );
  scr_CorrectResolution( zgl_Get( DESKTOP_WIDTH ), zgl_Get( DESKTOP_HEIGHT ));

  scr_SetOptions(zgl_Get( DESKTOP_WIDTH ),zgl_Get( DESKTOP_HEIGHT ), REFRESH_MAXIMUM, TRUE, FALSE );

  zgl_Init();
End.       
Návrat nahoru
Zobrazit informace o autorovi Odeslat soukromou zprávu
skála



Založen: 07. 07. 2014
Příspěvky: 22
Bydliště: Klatovy

PříspěvekZaslal: 27. říjen 2014, 17:26:55    Předmět: Odpovědět s citátem

Vyřešeno, zkosení mi funguje u spritů, lichoběžník holt nepude.
Návrat nahoru
Zobrazit informace o autorovi Odeslat soukromou zprávu
skála



Založen: 07. 07. 2014
Příspěvky: 22
Bydliště: Klatovy

PříspěvekZaslal: 17. listopad 2014, 10:38:04    Předmět: Odpovědět s citátem

Nazdar, ještě by jsem měl jeden dotaz, jak udělám v zenu, aby měl obrázek průhledné pozadí. Pokud z internetu stáhnu nějaký obrázek jako png, tak se vykreslí bez pozadí, ale pokud ho vytvořím sám, například pomocí irfanview, tak se vždy vykreslí bílé pozadí. Když ten obrázek zobrazím v prohlížeči obrázků, tak je pozadí průhledné, tak nevím v čem dělám chybu. V uses unitu pro png mam. Ukazka kodu:
kód:
procedure Init;
begin
  fntMain := font_LoadFromFile( 'P:\zengl-src-0.3.12\bin\data\font.zfi' );
  zam:= tex_LoadFromFile('P:\PRG\towerdefence\aaa.png');

end;


procedure Draw;
begin
  ssprite2d_Draw(zam,0,0,100,100, 0,255 );

end;


Díky za každou radu.
Návrat nahoru
Zobrazit informace o autorovi Odeslat soukromou zprávu
JC



Založen: 06. 10. 2007
Příspěvky: 137

PříspěvekZaslal: 18. listopad 2014, 11:58:39    Předmět: Odpovědět s citátem

Ahoj,

buť není nastavené transparentní pozadí a nebo obrázek ukládáš v nějakém "nestandardním" formátu (png má mnoho verzí)

zkus sem nahrát ten obrázek, uvidíme
Návrat nahoru
Zobrazit informace o autorovi Odeslat soukromou zprávu
skála



Založen: 07. 07. 2014
Příspěvky: 22
Bydliště: Klatovy

PříspěvekZaslal: 18. listopad 2014, 17:10:39    Předmět: Odpovědět s citátem

Jenom dotaz, jak mam nahrát obrázek z počítače. Zatim jsem našel jen jak sem dát odkaz na net.
Návrat nahoru
Zobrazit informace o autorovi Odeslat soukromou zprávu
Mem



Založen: 28. 07. 2007
Příspěvky: 1959
Bydliště: Olomouc

PříspěvekZaslal: 18. listopad 2014, 18:20:31    Předmět: Odpovědět s citátem

To jsi našel správně. Takže využij libovolnou službu pro nahrávání obrázků, třeba http://imgur.com/, a tady potom vlož odkaz na ten obrázek v img tagu
Návrat nahoru
Zobrazit informace o autorovi Odeslat soukromou zprávu Zobrazit autorovi WWW stránky
skála



Založen: 07. 07. 2014
Příspěvky: 22
Bydliště: Klatovy

PříspěvekZaslal: 18. listopad 2014, 18:23:24    Předmět: Odpovědět s citátem

Tady je:
http://imgur.com/UxNCZkh
Návrat nahoru
Zobrazit informace o autorovi Odeslat soukromou zprávu
JC



Založen: 06. 10. 2007
Příspěvky: 137

PříspěvekZaslal: 19. listopad 2014, 00:21:25    Předmět: Odpovědět s citátem

U obrázku není nastavené transparentní pozadí, v ZenGL by to šlo případně vyřešit tak, že bys nastavil masku na bílou barvu, ale ten obrázek není dobře udělaný, jelikož tam jsou i odstíny šedé na okrajích šipky atd. Správně by to mělo být nějak takto - http://imgur.com/iRudd6J

viz.: https://www.youtube.com/watch?v=PLA2FaOXkkg
Návrat nahoru
Zobrazit informace o autorovi Odeslat soukromou zprávu
skála



Založen: 07. 07. 2014
Příspěvky: 22
Bydliště: Klatovy

PříspěvekZaslal: 20. listopad 2014, 19:34:56    Předmět: Odpovědět s citátem

Díky za radu, stáhnul jsem si GIMP a v něm to jde v pohodě.
Návrat nahoru
Zobrazit informace o autorovi Odeslat soukromou zprávu
skála



Založen: 07. 07. 2014
Příspěvky: 22
Bydliště: Klatovy

PříspěvekZaslal: 30. listopad 2014, 20:23:52    Předmět: Odpovědět s citátem

Zdravim, už jsem tady zase s dotazem. Jde v zengl zalamovat text, například bych chtěl psát do obdelníku. Díky
Návrat nahoru
Zobrazit informace o autorovi Odeslat soukromou zprávu
JC



Založen: 06. 10. 2007
Příspěvky: 137

PříspěvekZaslal: 1. prosinec 2014, 19:17:31    Předmět: Odpovědět s citátem

ano jde, koukni se na Demo06
Návrat nahoru
Zobrazit informace o autorovi Odeslat soukromou zprávu
Zobrazit příspěvky z předchozích:   
odeslat nové téma   Odpovědět na téma    Obsah fóra České-Hry.cz -> Delphi / Pascal Časy uváděny v GMT + 1 hodina
Jdi na stránku Předchozí  1, 2, 3
Strana 3 z 3

 
Přejdi na:  
Nemůžete odesílat nové téma do tohoto fóra
Nemůžete odpovídat na témata v tomto fóru
Nemůžete upravovat své příspěvky v tomto fóru
Nemůžete mazat své příspěvky v tomto fóru
Nemůžete hlasovat v tomto fóru


Powered by phpBB © 2001, 2005 phpBB Group


Vzhled udelal powermac
Styl "vykraden" z phpBB stylu MonkiDream - upraveno by rezna