Law

Dobra, znasz jakiś program który kopnie w monitor?
A tak w ogóle to kod jest bardzo rozbudowany i program działa u mnie dobrze, ale u innych już nie.

No tyle to wiem, ale chyba musi być jakaś zasada regulująca to.

Czemu ChangeDisplaySettings czasem działa, a czasem nie? Muszę próbować je uieszczać w różnych miejscach żeby działało.

Jak zablokować ten skrót wyłaczający okno?

Takie cuś:

BMP:=CreateBitmap(100, 100, 1, 16, nil);

I zrobić to żeby wyświetlało więcej niż 16 bitów i, żeby to normalnie wyglądało (teraz to wygląda jak popsuty telewizor).

Jupi, twój dwusteny post! Idę na popijawę!

Pomyliło mi się:-D

Jak się tworzy pustą bitmapę małym nakładem pracy (bo tłuc się z tablicą nie zamierzam)?

Stworzyłem sobie pędzel kreskowany i czy nie da się zmienić koloru tej szpary między kreskami (teraz jest biała).

Tyle to ja nawet wiem, myślałem, że może da się inaczej.

Ja nie mam pojęcia o C++, ale mogę ci powiedzieć że case to w C++ switch, a begin..end; to {..}

Tak sobie myślałem, czy da się obsłużyć joystick\joypad przez WinAPI, czy trzeba użyć czegoś innego??

Dobra, wymyśliłem, że mogę stworzyć pod starą bitmapą tą samą tylko samaskowaną. Niestety nie idzie mi z funkcją MaskBlt:( Pomożecie?

Spróbowałem napisać inny program, po wielu eksperymentach wiem tyle:
Wniosek 1: po zmianie tła na białe i użyciu SRCAND wszystko jest dobrze
Wniosek 2: po zmianie tła na czarne i użyciu MERGEPAINT wszystko jest dobrze
Wniosek 3: w odwrotnych kombinacjach nic nie widać
Wniosek 4: po zmianie tła na różowy i użyciu MERGEPAINT i SRCAND kolory są różowiate
Wniosek 5: jest źle, pomóżcie mi...:(
tu jest kod

DC:=BeginPaint(Handle, Paint);
      BMP:=LoadImage(0, 'snajpra.bmp', IMAGE_BITMAP, 0, 0, LR_DEFAULTSIZE or LR_LOADFROMFILE or LR_LOADTRANSPARENT);
      BMPDC:=CreateCompatibleDC(DC);
      SelectObject(BMPDC, BMP);
      StretchBlt(DC, 0, 10, 150, 150, BMPDC, 0, 0, 60, 60, SRCAND);
      EndPaint(DC, Paint);

Wydaje mi się że powinieneś wpisywać dane do nid dopiero po CreateWindow.

Win32?? Zawsze tam zaglądam w pierwszej kolejności, kolora pędzla nie zmieniałem, sam nie wiem co jest źle...

Faktycznie działa! Teraz nie ma koloru białego... i czarnego, szarego, czerwonego i innych. Ja to robię przez funkcję StretchBlt, ale to chyba nie powinno robić różnicy?

Ale tu o tych bitmapach. No to chodzi o to, żeby wczytać bmpa, żeby zastąpić biały kolor przezroczystym.

poradziłem sobie z tym już.

Mam sobie taką procedurę

procedure Start(Name:PChar);

potem tworzę okno

CreateWindow('Klasa', Name, blablabla....);

i tu się robi problem, program zawiesza się, a kiedy robię tak

CreateWindow('Klasa', 'Nazwa', blablabla....);

to działa.

gdy zastępuje C:\Windows wartością WinDir (C:\WINDOWS, sprawdziłem) uzyskaną prze GetWindowsDirectory, przestaje działać.

        Res:=FindResource(hInstance, 'CLASSIC', 'TTF');
        ACFont:=LoadResource(hInstance, Res);
        ACData:=LockResource(ACFont);
        CreateFile('cade.classic.ttf', 0, 0, nil, CREATE_NEW,
                   FILE_ATTRIBUTE_NORMAL, 0);
        WriteFile(Plik, ACData^, SizeofResource(hInstance, ACFont), HM, nil);
        CloseHandle(Plik);

Coś spieprzyłem?

Chodzi o to że zapisałem cziconkę do resów:
kawałek pliku *.rc

CLASSIC TTF "arcade.classic.ttf"

I teraz chcę wyciągnąć ten plik z resów i zapisać w katalogu 'C:\Windows\Fonts'.

Bu, coś mi nie idzie. Możesz pokazać jakiś przykład, zapisać do pliku plik TTF o nazwie CLASSIC.

Programowo offcorz.

Jak wyciągnąć z zasobów plik i zapisać na dysk?