• One Piece

          It was a time when pirates ruled the seas. Several bands of pirates were battling over the great hidden treasure, One Piece, which was left by the now legendary pirate captain, Gold Roger. There was a young boy who admired the pirates, his name was Monkey D. Luffy. One day, he mistakenly eats the devil's fruit and turns himself into a rubber human being. Ten years have passed...
    More

  • Bleach

          Summary: Kurosaki Ichigo is not a regular 15 year old, because he has always had the ability to see spirits and ghosts. One day, a female Shinigami (God of Death) named Kuchiki Rukia appears before him, hunting for an evil spirit. But during the confrontation, the Shinigami’s powers are transfered to Ichigo. Thus begins the adventures of Ichigo and Rukia and their m...
    More

  • Pokemon Season 1 ( Indigo League )

          Ash Ketchum (Satoshi in the original Japanese series) has just become a Pokémon trainer in the Kanto Region. He picked Pikachu because, after breaking his alarm clock, Ash was late for his appointment and all the conventional starter Pokémon (Bulbasaur, Charmander and Squirtle) were gone. He has a childhood rival named Gary (Shigeru in the original Japanese series). Ash accidentally d...
    More

  • Eyeshield 21

          Kobayakawa Sena is a little guy who always get picked on by the bullies in school. Since elementary school, he always play the role of the `errand boy` to the extent that he has become swift and fast in his movements. Coincidentally, Hiruma Youichi and Kurita Ryukan are looking for a fast running back for their American Football team (Amefuto) and want to put Sena in the...
    More

  • Naruto Shippuuden

          The story revolves mainly around Uzumaki Naruto’s and Haruno Sakura’s new adventures and their search for Uchiha Sasuke after he left Konoha-gakure (Leaf Village) to gain Orochimaru’s power. The plot also shows a more active Akatsuki in their quest for obtaining all the tailed beasts. After his failed attempt to retrieve Sasuke, Naruto learns that circumstances have g...
    More

  • Pandora Hearts ( .rmvb )

          Summary: Oz Bezarius, heir to one of the duke houses, has just turned fifteen. His life is rich and carefree, darkened only by the constant absence of his father. At his coming-of-age ceremony, however, everything changes. For no reason that he can discern, he’s cast into the prison known as the “Abyss”, only to be saved by a “chain” known as Alice, the bloodstained black rabbit. Wh...
    More

  • Naruto TV Series All Episode [RMVB]

          Naruto Alternative title: Наруто (Russian) ناروتو (Arabic) ナルト (Japanese) 火影忍者 (Chinese (Taiwan)) 나루토 (Korean) Genres: action, comedy, drama, fantasy Themes: ninja Age rating: Teenagers (May contain bloody violence, bad language, nudity) [English Sub][Japanese Voice] Plot Summary: Naruto closely follows the life of a boy who is feared and detested by the villagers o...
    More

  • Rurouni Kenshin

          Ten years after the start of the Meiji Era, a Rurouni wanders into Tokyo to find a new life with his new friends. Vowing never to kill, he tries to escape his fate as the greatest killer of the Edo dynasty. An old menace threatens the new Meiji Era, the villian is Shishio Makoto, the successor to the Hitokiri Battousai who was suposed to have died in the Boshin Wars....
    More

Windows

[ Delphi ] – Control the windows task bar and the windows start button

Jan 5th

Posted by delphi geek in Windows

No comments

procedure TForm1.Button1Click(Sender: TObject);
var
  hTaskBar : THandle;
begin
  hTaskbar := FindWindow('Shell_TrayWnd', Nil);
  ShowWindow(hTaskBar, SW_HIDE);

end;

// Show the windows task bar.
procedure TForm1.Button2Click(Sender: TObject);
var
  hTaskBar : THandle;
begin
  hTaskbar := FindWindow('Shell_TrayWnd', Nil);
  ShowWindow(hTaskBar, SW_SHOWNORMAL);
end;
 More >

 

Very PoorPoorRegularGoodVery Good ( Rate this post ! )
Loading ... Loading ...

[ Delphi ] – Show the find folder dialog

Jan 5th

Posted by delphi geek in Windows

No comments

procedure TForm1.Button1Click(Sender: TObject);
var
  TitleName : string;
  lpItemID : PItemIDList;
  BrowseInfo : TBrowseInfo;
  DisplayName : array[0..MAX_PATH] of char;

  TempPath : array[0..MAX_PATH] of char;
begin
  FillChar(BrowseInfo, sizeof(TBrowseInfo), #0);
  BrowseInfo.hwndOwner := Form1.Handle; More >

 

Very PoorPoorRegularGoodVery Good ( Rate this post ! )
Loading ... Loading ...

[ Delphi ] – Enable and disable CD autorun

Jan 5th

Posted by delphi geek in Windows

No comments

procedure TForm1.SetCDAutoRun(AAutoRun: Boolean);
const
  DoAutoRun: array[Boolean] of Integer = (0, 1);
var

  Reg: TRegistry;
begin
  try
    Reg := TRegistry.Create;
    Reg.RootKey := HKEY_LOCAL_MACHINE;
    if Reg.KeyExists('System\CurrentControlSet\Services\Class\CDROM') then More >

 

Very PoorPoorRegularGoodVery Good ( Rate this post ! )
Loading ... Loading ...
12345»10...Last »