Skocz do zawartości

staniki

Użytkownicy
  • Postów

    122
  • Dołączył

  • Ostatnia wizyta

Treść opublikowana przez staniki

  1. staniki

    Problem z dll'em

    Chcę zrobić dll w Delphi do GMa, który będzie mi tworzył duży textbox (a mianowicie memo) i zapisywał tekst z tego memo do pliku. Zrobiłem coś takiego: library memo; { Important note about DLL memory management: ShareMem must be the first unit in your library's USES clause AND your project's (select Project-View Source) USES clause if your DLL exports any procedures or functions that pass strings as parameters or function results. This applies to all strings passed to and from your DLL--even those that are nested in records and classes. ShareMem is the interface unit to the BORLNDMM.DLL shared memory manager, which must be deployed along with your DLL. To avoid using BORLNDMM.DLL, pass string information using PChar or ShortString parameters. } uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls; var handle: THandle; procedure Init(h:double); cdecl; begin handle:=round(h); end; function CreateMemo(x,y,w,h:double):double; cdecl; var TempMemo: TMemo; begin TempMemo:=TMemo.Create(nil); TempMemo.Left:=round(x); TempMemo.Top:=round(y); TempMemo.Width:=round(w); TempMemo.Height:=round(h); TempMemo.ScrollBars:=ssBoth; TempMemo.ParentWindow := handle; result:=TempMemo.Handle; end; procedure SaveMemoText(h: double; path: string); cdecl; var hand: THandle; TempMemo: TMemo; begin hand:=round(h); TempMemo:=TMemo.Create TempMemo.Lines.SaveToFile(path); end; exports Init, CreateMemo, SaveMemoText; {$R *.res} begin end. i przy wykonywaniu pierwszej funkcji, gra się sypie. Nie umiem dobrze delphi, jestem bardzo począdkujący i prosiłbym was o pomoc. W GMie jest wszystko OK.
  2. staniki

    HL

    Dzięki, spróbuję, zobaczymy co z tego wyjdzie :P
  3. staniki

    HL

    A nie wiesz może jak dodać to HD Pack? :]
  4. staniki

    HL

    Może źle to ująłem, ale mi się grafika nie podoba, widząc co zrobili w 2. :P
  5. staniki

    HL

    Zapewne każdy z was grał w starą grę Half-Life. Ja grałem tylko w część 2 i ciekawi mnie co się działo w części 1. Grafika w 1 jest porażająca i aż się grać nie da. Wie ktoś może jak polepszyć sobie tą grafikę? Słyszałem o HD packu, ale mam starą wersję Non-Steam i nie wiem jak tam wgrać te modele. Może ktoś mi coś poradzi? :crying:
  6. staniki

    3D in Java?

    Czy ktoś zna może tutorial jak zrobić 3D w MidletPascal albo w Javie? Bo mi się strasznie spodobał Counter-Strike Micro: który jak widać jest zrobiony w 3D. Chciałbym zrobić coś w tym stylu, a ponieważ bardziej znam pascala niż javę, najlepszy byłby dla mnie tutorial jak samemu zrobić Fake 3D, ale nie mogę nigdzie czegoś takiego znaleźć.
  7. staniki

    Woda

    Dzięki. Przejrzę je sobie ;P
  8. staniki

    Woda

    Zna ktoś może jakiś tutorial jak zrobić animację realistycznej wody takiej jak tu (to nie jest animacja!): user posted image ?? Albo tu: user posted image
  9. Zrobiłem prosty przykład strzelanki 2D. Przykład zawiera prościutki system przesuwania przedmiotów, oraz łatwych przeciwników, ilość życia + armor i parę innych :]. Przykład głównie opiera się na kolizjach, pobierajcie : Downloadzik (.gm6 + .exe) A tu pare screenów: To tyle :]. Uwaga! Kilka rzeczy, np. drzwi, używa się strzelając do nich, żeby pokazać jak można zrobić system kolizji. EDIT: Dźwięki wziete z Half-Life'a 2, resztę robiłem sam.
  10. Dzięki Tymon, teraz mi w końcu działa :P.
  11. Zrobiłem tak: procedure TForm1.FormKeyPress(Sender: TObject; var Key: Char); begin if (Key=#87) then close; end; i nie działa :(. Powinno się zamknąć, a nie działa.
  12. Mam pytanie, bo od kilku dni próbuję coś programować w Delphi i ciąglę nie mogę znaleźć jednej rzeczy a mianowicie: Jak zrobić, żeby po naciśnięciu klawisza coś się w Delphi wydarzyło, tak jak w GMie jest: if keyboard_check(ord('W')) { /*...*/ } to jak by to było w Delphi? Próbowałem z : procedure TForm1.FormKeyPress(Sender: TObject; var Key: Char); begin {...} end; ale coś mi nie wychodzi. :crying:
  13. staniki

    3D?

    Jaki jest waszym zdaniem najlepszy system 3D? Ultimate 3D, Xtreme 3D, Irllicht, a może jakiś inny? Wiem, że to pytanie było już często zadawanie, ale nie mogłem jakoś znaleźć odpowiedniego tematu -.-. A więc jaki system jest jednocześnie i w miarę łatwy(taki jak Ultimate 3D) i obsługujący najlepiej DirectX 9, chociaż mogą być i jego poprzednicy :]?
  14. Czy da się zrobić tak, aby każdy kąt (vertex) modelu był "twardy" dla kamery/gracza? Twardy, czyli, zeby gracz się na nim zatrzymywał.
  15. Dzięki Borek, i sorry za dłuższą nieobecność, teraz mogę odpowiedzieć na wszystkie wasze pytania :)
  16. A czy można w jakiś łatwy sposób dodać do tego cienie postaci? Graliście w FEAR? To już wiecie o co mi dokładnie chodzi.
  17. na oko wygląda dobrze, ale spróbuję zobaczyć, czy nie ma czegoś źle ;p
  18. Ja robię tak: 1) Robię model w Anim8orze (www.anim8or.com) 2) Zamieniam rozszerzenie przez Marzipana 3) Postępuje tak jak mówił PsichiX :)
  19. staniki

    W jakie gry MMO gracie?

    Ja gram w Knight Online i CSa ( 1.6 i Condition Zero :) )
  20. staniki

    Turbo Pascal

    A czego potrzebujesz dokładnie?
  21. Jak dać grze sygnał (nie mając okna na wierzchu), że coś się wydarzyło? Bo robię autobuy'er do Counter Strike'a i chciałbym dać, że np. po naciśnięciu spacji natychmiast się kupuje. Nie musi to być naciśnięty klawisz, może być tekst cokolwiek, jak próbowałem z keyboard_check_pressed(vk_left), to nie działało. Z góry dzięki.
  22. staniki

    Telefon...

    Ja mam nokię 6300 Gram w: 1) Counter Strike Micro !!!!! :] 2) Call of Duty 3 :) 3) Worms 2007 :lol: 4) Doom RPG :o
×
×
  • Dodaj nową pozycję...