Modern software design

Krento Screen Saver

2012-02-02T21:14:00.002+01:00

Some time ago I received the request for Krento Screen Saver from one of the Krento fans and finally found free time to implement it. You can download freeware Krento Screen Saver from my site: http://users.telenet.be/ws36637/download/KrentoSaverSetup.exe

Krento Chrome Window Skin

2012-01-27T12:27:00.000+01:00

Stan Ragets designed a new skin for Krento:

This skin is available for download from his website: http://blog.stanragets.com/2012/01/18/chrome-window-krento-skin

ANSI version of the Quricol Delphi library

2012-01-05T13:24:00.000+01:00

Last year I published the Quricol library for Delphi 2010 or better, but some users still need the support for older Delphi versions. As a result I made an update to Quricol library with support not only the Unicode, but also ANSI Delphi code.


//===============================================================================

// Copyright (c) Serhiy Perevoznyk.  All rights reserved.

// THIS CODE AND INFORMATION IS PROVIDED "AS IS" WITHOUT WARRANTY

// OF ANY KIND, EITHER EXPRESSED OR IMPLIED, INCLUDING BUT NOT

// LIMITED TO THE IMPLIED WARRANTIES OF MERCHANTABILITY AND

// FITNESS FOR A PARTICULAR PURPOSE.

//===============================================================================



unit QuricolCodeAnsi;



interface



uses

  Windows, SysUtils, Classes, Graphics;



type

  TQRCode = class

  public

    class procedure GenerateBitmap(const FileName : string; const Text : string; Margin : integer = 4; PixelSize : integer = 3);

    class procedure GeneratePng(const FileName : string; const Text : string; Margin : integer = 4; PixelSize : integer = 3);

    class function GetBitmap(const Text : string; Margin : integer = 4; PixelSize : integer = 3) : TBitmap;

    class procedure GetPng(Stream : TStream; const Text : string; Margin : integer = 4; PixelSize : integer = 3);

  end;

implementation



procedure GeneratePNGA(fileName: PChar; text : PChar; margin : integer; size : integer); stdcall; external 'quricol32.dll';

function GetHBitmapA(text : PChar; margin : integer; size : integer) : HBITMAP; stdcall; external 'quricol32.dll';

procedure GenerateBMPA(fileName: PChar; text : PChar; margin : integer; size : integer); stdcall; external 'quricol32.dll';

procedure GetPNGA(text : PChar; margin : integer; size : integer; var bufSize : integer; out ppvBits : PByte); stdcall; external 'quricol32.dll';

procedure DestroyBuffer(Buffer : PByte); stdcall; external 'quricol32.dll';



{ TQRCode }

class procedure TQRCode.GenerateBitmap(const FileName, Text: string; Margin,

  PixelSize: integer);

begin

  GenerateBMPA(PChar(FileName), PChar(Text), Margin, PixelSize);

end;



class procedure TQRCode.GeneratePng(const FileName, Text: string; Margin,

  PixelSize: integer);

begin

  GeneratePNGA(PChar(FileName), PChar(Text), Margin, PixelSize);

end;



class function TQRCode.GetBitmap(const Text: string; Margin,

  PixelSize: integer): TBitmap;

var

  Bmp : HBITMAP;

  DIB: TDIBSection;

  ScreenDC : THandle;

  DC : THandle;

begin

  Bmp := GetHBitmapA(PChar(Text), Margin, PixelSize);

  GetObject(Bmp, SizeOf(DIB), @DIB);

  Result := TBitmap.Create();

  Result.Width := DIB.dsBmih.biWidth;

  Result.Height := DIB.dsBmih.biHeight;

  Result.PixelFormat := pf32bit;

  ScreenDC := GetDC(0);

  DC := CreateCompatibleDC(ScreenDC);

  SelectObject(DC, Bmp);

  ReleaseDC(0, ScreenDC);

  BitBlt(Result.Canvas.Handle, 0, 0, Result.Width, Result.Height, DC, 0, 0, SRCCOPY);

  DeleteDC(DC);

  DeleteObject(Bmp);

end;



class procedure TQRCode.GetPng(Stream: TStream; const Text: string; Margin,

  PixelSize: integer);

var

  size : integer;

  i : integer;

  buffer : PByte;

  ps : PByte;

begin

  size := 0;

  GetPNGA(PChar(Text), Margin, PixelSize, size, buffer);

  if (size > 0) then

   begin

     ps := buffer;

     for I := 0 to size - 1 do

       begin

         Stream.Write(ps^, 1);

         inc(ps);

       end;

      DestroyBuffer(buffer);

   end;



end;



end.

Quricol Delphi sample

2012-01-05T13:19:00.000+01:00


program QuricolDemo;



{$APPTYPE CONSOLE}



uses

  SysUtils,

  Graphics,

  Classes,

  QuricolCodeAnsi in 'QuricolCodeAnsi.pas';



var

  bmp : TBitmap;

  MS : TMemoryStream;

begin

  try

    //Generate Windows bitmap and save to file

    TQRCode.GenerateBitmap('delphi1.bmp', 'http://delphi32.blogspot.com');



    //Generate PNG image and save to file

    TQRCode.GeneratePng('delphi1.png', 'http://delphi32.blogspot.com');



    //Generate TBitmap

    bmp := TQRCode.GetBitmap('http://www.krento.net');

    bmp.SaveToFile('delphi2.bmp');



    //Generate PNG to the memory stream

    MS := TMemoryStream.Create;

    TQRCode.GetPng(MS, 'http://www.krento.net');

    MS.Position := 0;

    MS.SaveToFile('delphi2.png');

    MS.Free;



  except

    on E: Exception do

      Writeln(E.ClassName, ': ', E.Message);

  end;

end.

Happy New Year 2012

2011-12-27T15:43:00.001+01:00

Wishing all a very Happy New Year!
May this New Year bring newly found prosperity, love, happiness and delight in your life.

Ik wens jullie een jaar vol geluk, harmonie, rust en tijd om te genieten van de fun in het leven!!!
Het allerbeste voor het komende jaar.

Kerst 2012

2011-12-25T20:25:00.002+01:00

De Kerstman vroeg me wat ik wou als kerstcadeau,
Ik heb niet getwijfeld, en hem gezegd,
dat het enige cadeau dat me héél erg zou plezieren is:
dat hij héél goed zorg zou dragen voor de persoon
die dit nu leest!

DesktopPaparazzo - freeware screen capture tool

2011-12-16T20:09:00.000+01:00

DesktopPaparazzo is a tool to help you capture difficult screenshots.

Some elements are camera shy. Perhaps you want to capture a hint, popup or menu item but every time you press the print screen button your subject disappears from view. Well DesktopPaparazzo is here to help, simply specify a time interval and a folder then DesktopPaparazzo will snap away and provide you with a collection of screen shots leaving you free to set up the screen how you want it. DesktopPaparazzo is extremely easy to configure, you can even decide whether you want to capture the mouse pointer in your screenshot.
Download DesktopPaparazzo: http://users.telenet.be/ws36637/download/DesktopPaparazzoSetup.zip

Watch Desktop Paparazzo Video Tutorial done by Softoxi.com.

SimpleLogoff - one click logoff from Windows

2011-12-05T14:02:00.001+01:00

SimpleLogoff is an open source freeware application for one click logoff from Windows. Download link: https://skydrive.live.com/redir.aspx?cid=b4508367face85d1&resid=B4508367FACE85D1!215&parid=B4508367FACE85D1!134
By executing this application you are logged out without any questions asked.
The application is portable, no any setup needed. The source code is included.

Quricol - QR code generator library

2011-11-29T18:13:00.001+01:00

Quricol is an open source freeware QR code generator library for C++, Microsoft .NET and Delphi based on qrencode - QR Code encoder by Kentaro Fukuchi.The library contains methods to save the generated image to Bitmap or PNG file or generate images on-fly and save it to the stream. Both 32 and 64 bits compiled versions available along with source code.

Download: http://users.telenet.be/ws36637/download/quricol.zip

A QR code (abbreviated from Quick Response code) is a type of matrix barcode (or two-dimensional code).

Reklame: GE RAADT NOOIT VOOR WELK PRODUCT

2011-11-25T12:18:00.001+01:00

C++ library for working with streams

2011-11-24T20:18:00.001+01:00

For one of my internal projects I made a small C++ library for working with different types of streams.
The main library classes are CMemoryStream, CFileStream and CResourceStream. The source code is available for download from my website: http://users.telenet.be/serhiy.perevoznyk/download/GevixLib.zip

How to check Windows version in C++

2011-11-24T10:03:00.001+01:00

BOOL WINAPI IsWindows7()

{

 OSVERSIONINFOEX osvi;

 DWORDLONG dwlConditionMask = 0;

 int op=VER_GREATER_EQUAL;



 // Initialize the OSVERSIONINFOEX structure.

 ZeroMemory(&osvi, sizeof(OSVERSIONINFOEX));

 osvi.dwOSVersionInfoSize = sizeof(OSVERSIONINFOEX);

 osvi.dwMajorVersion = 6;

 osvi.dwMinorVersion = 1; // Windows 7



 // Initialize the condition mask.

 VER_SET_CONDITION( dwlConditionMask, VER_MAJORVERSION, op );

 VER_SET_CONDITION( dwlConditionMask, VER_MINORVERSION, op );



 // Perform the test.

 return VerifyVersionInfo(&osvi,VER_MAJORVERSION | VER_MINORVERSION,dwlConditionMask);

}



BOOL WINAPI IsWindowsVista()

{

 OSVERSIONINFOEX osvi;

 DWORDLONG dwlConditionMask = 0;

 int op=VER_GREATER_EQUAL;



 // Initialize the OSVERSIONINFOEX structure.

 ZeroMemory(&osvi, sizeof(OSVERSIONINFOEX));

 osvi.dwOSVersionInfoSize = sizeof(OSVERSIONINFOEX);

 osvi.dwMajorVersion = 6;



 // Initialize the condition mask.

 VER_SET_CONDITION( dwlConditionMask, VER_MAJORVERSION, op );



 // Perform the test.

 return VerifyVersionInfo(&osvi,VER_MAJORVERSION | VER_MINORVERSION,dwlConditionMask);

}





BOOL WINAPI IsWindowsXP() 

{

   OSVERSIONINFOEX osvi;

   DWORDLONG dwlConditionMask = 0;

   int op=VER_GREATER_EQUAL;



   // Initialize the OSVERSIONINFOEX structure.



   ZeroMemory(&osvi, sizeof(OSVERSIONINFOEX));

   osvi.dwOSVersionInfoSize = sizeof(OSVERSIONINFOEX);

   osvi.dwMajorVersion = 5;

   osvi.dwMinorVersion = 1;



   // Initialize the condition mask.



   VER_SET_CONDITION( dwlConditionMask, VER_MAJORVERSION, op );

   VER_SET_CONDITION( dwlConditionMask, VER_MINORVERSION, op );



   // Perform the test.



   return VerifyVersionInfo(

      &osvi, 

      VER_MAJORVERSION | VER_MINORVERSION,

      dwlConditionMask);

}



BOOL WINAPI IsWindowsXPSP2() 

{

   OSVERSIONINFOEX osvi;

   DWORDLONG dwlConditionMask = 0;

   int op=VER_GREATER_EQUAL;



   // Initialize the OSVERSIONINFOEX structure.



   ZeroMemory(&osvi, sizeof(OSVERSIONINFOEX));

   osvi.dwOSVersionInfoSize = sizeof(OSVERSIONINFOEX);

   osvi.dwMajorVersion = 5;

   osvi.dwMinorVersion = 1;

   osvi.wServicePackMajor = 2;

   osvi.wServicePackMinor = 0;



   // Initialize the condition mask.



   VER_SET_CONDITION( dwlConditionMask, VER_MAJORVERSION, op );

   VER_SET_CONDITION( dwlConditionMask, VER_MINORVERSION, op );

   VER_SET_CONDITION( dwlConditionMask, VER_SERVICEPACKMAJOR, op );

   VER_SET_CONDITION( dwlConditionMask, VER_SERVICEPACKMINOR, op );



   // Perform the test.



   return VerifyVersionInfo(

      &osvi, 

      VER_MAJORVERSION | VER_MINORVERSION | 

      VER_SERVICEPACKMAJOR | VER_SERVICEPACKMINOR,

      dwlConditionMask);

}

Confucius

2011-11-09T14:22:00.003+01:00

Etienne Vermeersch: 'Migranten in ons land hebben te veel ... - De Standaard

2011-11-02T20:53:00.000+01:00

Etienne Vermeersch: 'Migranten in ons land hebben te veel kinderen'

De aarde telt sinds maandag officieel 7 miljard mensen. Geen reden om te feesten, want de grote populatie bedreigt de natuur en de toegang tot gezondheidszorg. Daarom komt ethicus Etienne Vermeersch met een drastische stelling. 'We moeten afstappen van de opvatting dat iedereen zelf mag kiezen hoeveel kinderen hij krijgt.'

Leuven tekent beroep aan tegen Uplace | brusselnieuws.be

2011-11-02T20:51:00.000+01:00

Leuven tekent beroep aan tegen Uplace

De stad Leuven gaat in beroep tegen de bouwvergunning voor Uplace. Burgemeester Louis Tobback (SP.A) wil geen grootschalig shoppingcenter dicht bij zijn stad en vertrouwt erop dat Uplace er niet komt. "Projectontwikkelaar Verhaeghe grossiert in vernietigingen van de Raad van State," klinkt het.

Google knows me

2011-10-19T16:27:00.000+02:00

Android Circle Launcher Widget for shortcuts on my Nexus S

2011-10-06T21:35:00.000+02:00

Ex-topman Apple Steve Jobs overleden

2011-10-06T09:00:00.004+02:00

Steve Jobs is woensdag op 56-jarige leeftijd overleden. Jobs was de medestichter van computergigant Apple. Hij verliet Apple in augustus 2011 wegens gezondheidsredenen.
De charismatische Jobs was in 1976 medeoprichter van Apple. De Amerikaan kampte al jaren met gezondheidsproblemen en zette in augustus 2011 een stap opzij.

Jobs stond aan de basis van immens populaire producten zoals Apple Macintosh computers, de iPod, de iPhone en de iPad. De oprichter van Apple leed aan kanker. Hij trad in augustus af als CEO, maar bleef wel bestuursvoorzitter.

Pancreaskanker
Jobs werd op 24 februari 1955 geboren in San Francisco. Hij had al verscheidene jaren gezondheidsproblemen. In 2004 werd hij getroffen door pancreaskanker en in 2009 moest hij een levertransplantatie ondergaan.
"We zijn triest dat we moeten melden dat Steve Jobs woensdag is overleden", meldt Apple in een korte mededeling. "Jobs had een briljant karakter, zijn passie en energie hebben geleid tot onbeschrijfelijke innovaties die onze leven hebben verrijkt en verbeterd."

Op de website van Apple staat woensdagavond een foto van Jobs, met zijn geboorte- en sterfjaar.

bron: ZDNet

PI Download: PDF Gallery

2011-10-04T12:39:00.000+02:00

Krento 2.1.333.12 released

2011-09-12T18:42:00.000+02:00

Krento 2.1.333.12 released and available for download from http://users.telenet.be/serhiy.perevoznyk

What's new in this release:

Polish translation by Andrzej
Improved Romanian translation by Radu Barbu
Extended drag-and-drop support for Krento Pulsar:

- when dragging .doc;.xls;.ppt;.docx;.docm;.xlsx;.xlsm;.pptx;.pptm;.vso;.vsd;.mpp;.pub;.xsn;.txt;.rtf;.pdf;.html;.htm;.chm file to Pulsar it will be copied to "My Documents" folder
- when dragging .jpg;.jpeg;.jpe;.gif;.tiff;.tif;.png;.bmp;.rle;.dib;.wmf;.wmz;.emf;.emz;.cgm;.pict;.pic file to Pulsar it will be copied to "My Pictures" folder
- when dragging .wma;.mp3;.acc;.aiff;.wav;.ra;.mid file to Pulsar it will be copied to "My Music" folder

Polish translation of Krento

2011-09-08T19:56:00.002+02:00

Andrzej translated Krento to Polish

You can download the Polish translation of Krento here: http://users.telenet.be/serhiy.perevoznyk/download/pl-PL.lng

Krento 2.1.299.25 released

2011-08-25T17:42:00.000+02:00

Krento 2.1.299.25 released and available for download from http://users.telenet.be/serhiy.perevoznyk

What's new in this release:

New design from Stan Ragets
Improved setup
Decreased memory usage
Increased drawing speed for Krento stones
Fixed Windows shortcut icon resolving method

Disk Usage Krento Toy

2011-08-02T19:26:00.001+02:00

This toy allows you to see the usage of a selected drive as a percentage of capacity. Is the glass half full or empty?
Download : http://users.telenet.be/serhiy.perevoznyk/krento/DirUsage.toy

Author: James Rimell

Metal Mesh Skin

2011-07-07T08:44:00.000+02:00

Stan Ragets created a very beautiful skin for Krento

It is available for download here.

The Fine Art of Stan Ragets
Graphic Design by Stan Ragets

Krento 2.1 release

2011-07-01T23:10:00.000+02:00

Krento 2.1 is available for download from http://users.telenet.be/serhiy.perevoznyk/manual/download.html. In this release I added the possibility to select the style of the manager window. You can choose between the classic layout with the stone caption in the middle of the manager window or the new style with navigation buttons (more practical for netbooks and tablet pc).

The seletion of the style can be done via the advanced settings dialog.

Do not forget to restart Krento to apply your changes.

Krento 2.1 supports skinning of the manager window buttons

More information about new skinning options you can find on the Krento forum

Windows 8 – Microsoft’s Death Knell?

2011-06-28T08:35:00.000+02:00

Found very interesting article: http://www.simonjstuart.com/2011/06/03/windows-8-microsofts-death-knell/

Generate Excel files without using Microsoft Excel (Part 2)

2011-06-22T21:20:00.000+02:00

After publishing my article on CodeProject I received a lot of questions how to change the font, alignment or color of the cells in the resulting Excel file. I improved the code of the ExcelWriter library and added the possibility to format cells. You can download the new release of the ExcelWriter library here: http://users.telenet.be/serhiy.perevoznyk/download/XLSExportDemo.zip

Update from 31 Jan. 2012:
This code is provided to show the possibility of easy export of the information to Excel files, not to manipulate existing Excel files or performing the complex formatting operations. The aim of this demo is to make the export easy and simple. In case if you do more complex tasks I can recommend to use another library, for example http://www.smartxls.com/index.htm. I do not have any plans to extend the provided code in the future.

namespace XLSExportDemo
{
    class Program
    {
        static void Main(string[] args)
        {
            
            ExcelDocument document = new ExcelDocument();
            document.UserName = "Perevoznyk";
            document.CodePage = CultureInfo.CurrentCulture.TextInfo.ANSICodePage;

            document.ColumnWidth(0, 120);
            document.ColumnWidth(1, 80);
            
            document[0, 0].Value = "ExcelWriter Demo";
            document[0 ,0].Font = new System.Drawing.Font("Tahoma", 10, System.Drawing.FontStyle.Bold);
            document[0, 0].ForeColor = ExcelColor.DarkRed;
            document[0, 0].Alignment = Alignment.Centered;
            document[0, 0].BackColor = ExcelColor.Silver;

            document.WriteCell(1, 0, "int");
            document.WriteCell(1, 1, 10);

            document.Cell(2, 0).Value = "double";
            document.Cell(2, 1).Value = 1.5;

            document.Cell(3, 0).Value = "date";
            document.Cell(3, 1).Value = DateTime.Now;
            document.Cell(3, 1).Format = @"dd/mm/yyyy";

            FileStream stream = new FileStream("demo.xls", FileMode.Create);

            document.Save(stream);
            stream.Close();
        }
    }
}

PDF Gallery - freeware JPEG to PDF converter

2011-06-14T22:18:00.001+02:00

PDF Gallery is a freeware images to PDF converter. PDF Gallery is a very simple to use, but powerful file conversion tool designed to convert the JPEG, PNG and BMP images into PDF files.
Running PDF Gallery does not require any Adobe or image processing programs installed on your computer. It has no extra dependencies and can work in portable mode.
PDF Gallery can convert every image to a separate PDF file or combine multiple images to one PDF file in portrait or landscape layout. It works very fast the size of the resulting PDF file and its quality can be controlled by the user. PDF Gallery supports drag and drop, image stretch, page orientation and offset, images order and other useful features.
It is compatible with Windows XP, Windows Vista and Windows 7.

Download PDF Gallery: http://users.telenet.be/serhiy.perevoznyk/download/PDFGallerySetup.zip

If you like this tool, please help me by link back to this site on your blog or your friend site.

You can download more freeware applications from http://delphi32.blogspot.com/p/freeware-downloads.html

Temporary problem with my website

2011-06-14T11:57:00.001+02:00

This weekend my website http://www.krento.net was down due to the heavy traffic. I am sorry for inconvenience, but I really didn't expect so many visitors at once. Now the site is operational again.

Update from 16.06.2011
If you can't access krento.net site try an alternative address: http://users.telenet.be/serhiy.perevoznyk/krento.html

Adding Windows 7 Jump List to a Delphi 2010 application

2011-05-25T12:45:00.003+02:00

Recently I decided to update one of my Delphi applications and make it more shiny when running on Windows 7. I looked up in the list of the new Windows 7 features and selected the Windows 7 taskbar Jump List as a nice feature for my application. As of Windows 7, the taskbar has been extended with a possibility to create a list of destinations and common tasks associated with an application.This is the application's Jump List. The Jump List is available whether the taskbar button is in a launcher state (the application isn't running) or whether it represents one or more windows.

As a result of this work I made a Delphi 2010 library for easy manipulating of Windows 7 Jump List.
You can download the full source code here:
https://cid-b4508367face85d1.office.live.com/self.aspx/Public/Win7Delphi.zip

The Jump List class is similar to Microsoft .NET 4.0 JumpList class

TJumpList = class sealed
  ...
  public
    constructor Create;
    destructor Destroy; override;
    procedure Clear;
    procedure AddToRecentCategory(ItemPath: string); overload;
    procedure AddToRecentCategory(JumpPath: TJumpPath); overload;
    procedure AddToRecentCategory(JumpTask: TJumpTask); overload;
    function AddJumpPath : TJumpPath;
    function AddJumpTask : TJumpTask;
    function AddJumpSeparator : TJumpSeparator;
    function AddJumpItem<T : TJumpItem, constructor> : T;
    procedure Apply;
    procedure DeleteList;
    property ShowFrequentCategory : boolean read FShowFrequentCategory write FShowFrequentCategory;
    property ShowRecentCategory : boolean read FShowRecentCategory write FShowRecentCategory;
    property JumpItems : TList<TJumpItem> read FJumpItems;
    property ApplicationId : string read FApplicationId write SetApplicationId;
  end;

and can handle 3 types of items: Tasks, Paths and Separators. In case if you wish to add Path item to the list you have to register your application as a file type handler for the specific file extension you are going to use.
For more details see my previous post.

The library is simple enough. Here is a short sample how to use it in your application.

First step is to provide an application id

JumpList := TJumpList.Create;
  JumpList.ApplicationId := 'TaskbarDemo.Unique.Id';

Then you can add some items to the Jump List and apply your changes.

var
  Item : TJumpTask;
begin

  Item := TJumpTask.Create;
  Item.Title := 'Custom Task';
  Item.ApplicationPath := ParamStr(0);
  Item.Arguments := '/doit';
  Item.CustomCategory := 'Custom Category';

  JumpList.JumpItems.Add(Item);

  JumpList.Apply;
end;

That's all. Just download and use it. But if you want more details here is the advanced version of the story.

When I decided to add the Jump List to my application I checked VCL first hoping that the Jump List class or component is already available. Unfortunately I found only some interfaces and type definitions of Windows API ported to Delphi, but not a complete ready to use class. The second step was searching Google. I found some examples how to make a Jump List in Delphi, but most of them were quite incomplete.
There was almost no information how to handle ShellItem items or how to properly register the application as a file type handler. Finally I decided to create the Jump List class by myself.

The first important point was usage of the Application User Model Id. Application User Model IDs (AppIDs) are used extensively by the taskbar in Windows 7 and later systems to associate processes, files, and windows with a particular application.

An application must provide its AppID in the following form. It is limited to 128 characters.

CompanyName.ProductName.SubProduct.VersionInformation

Usually when describing the usage of the Jump List the authors pay not too much attention to it, but without providing an Application User Model Id not all features of the Jump List work properly.
Id must be provided at the start of the application and before to call any other methods of the Jump List class.

If you are planning to use the Recent or Frequent categories in your Jump List do not forget to associate the file extensions of the files which can be opened by your application with the application executable.
If this step is not done and you try to add a ShellItem item to the Jump List then it fails. The file registration helper class is also included in the library.

var
  F : TFileRegistrationHelper;
begin
  F := TFileRegistrationHelper.Create('Microsoft.Samples.TaskbarDemo', ParamStr(0),
  'TaskbarDemo Document', 'TaskbarDemo.AppID.1.0.0.0', '.w7c');
  F.RegisterToHandleFileType(True);
end;

Delphi class for managing file associations

2011-05-19T16:03:00.001+02:00

File associations provide a straightforward and useful way for users and developers to customize the Shell's treatment of defined file types.

Application developers can use file associations to link an application to one or more desired file types, and customize the Shell's treatment of that application's file type. For example, when the application installs, it can check for the existence of the appropriate file associations, and either create or override them as appropriate. The file association can then cause the Shell to display custom icons for files of the given types. The file association can also control how the Shell interprets user input for a file of a given type. For example, when a user double-clicks a file, the Shell launches the application and uses it to open the file.

The following Delphi class can be used to associate the application with the given file extension and compatible with Windows XP, Vista and Windows 7.

// ----------------------------------------------------------------------------------
// Windows 7 Delphi interface
//
// Serhiy Perevoznyk 
//
// THIS CODE AND INFORMATION ARE PROVIDED "AS IS" WITHOUT WARRANTY OF ANY KIND,
// EITHER EXPRESSED OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE IMPLIED WARRANTIES
// OF MERCHANTABILITY AND/OR FITNESS FOR A PARTICULAR PURPOSE.
// ----------------------------------------------------------------------------------

unit FileRegistrationHelper;

interface

uses
  Windows,
  SysUtils,
  ShlObj,
  ShlWApi;

type
  // Provides a straightforward and useful way for users and developers to
  // customize the Shell's treatment of defined file types.
  // Use file associations any time you need to control, extend, or modify the
  // Shell's treatment of certain file types.
  TFileRegistrationHelper = class
  {$REGION 'Private'}
  private
    FProgID : string;
    FAppPath : string;
    FFriendlyName : string;
    FAppUserModelID : string;
    FExtToRegister : string;
    function RegisterProgid(DoRegister : boolean) : HRESULT;
    function RegisterToHandleExt(pszExt : string; fRegister : boolean) : HRESULT;
    function RegSetString(Key : HKEY; pszSubKey : string; pszValue : string; pszData : string) : HRESULT;
 {$ENDREGION}
 public
    constructor Create(const ProgramId, Path, FriendlyName,
          AppUserModelID, Extension : string);
    function RegisterToHandleFileType : HRESULT;
    function IsFileTypeRegistered : boolean;
    function UnRegisterFileTypeHandler : HRESULT;
 end;

implementation

{ TFileRegistrationHelper }

function TFileRegistrationHelper.IsFileTypeRegistered: boolean;
var
 hkeyProgid : HKEY;
begin
  Result := false;
  if (SUCCEEDED(HResultFromWin32(RegOpenKey(HKEY_CLASSES_ROOT, PWideChar(FProgID), hkeyProgid)))) then
  begin
    Result := true;
    RegCloseKey(hkeyProgid);
  end;
end;

constructor TFileRegistrationHelper.Create(const ProgramId, Path, FriendlyName,
  AppUserModelID, Extension: string);
begin
  FProgID := ProgramId;
  FAppPath := Path;
  FFriendlyName := FriendlyName;
  FAppUserModelID := AppUserModelID;
  FExtToRegister  := Extension;
end;


function TFileRegistrationHelper.RegisterProgid(DoRegister: boolean): HRESULT;
var
 hkeyProgid : HKEY;
 lRes : integer;
 hkeyShell : HKEY;
 szIcon : string;
 szCmdLine : string;
begin
  if (DoRegister) then
  begin
      Result := HResultFromWin32(RegCreateKeyEx(HKEY_CLASSES_ROOT, PWideChar(FProgID), 0, nil, REG_OPTION_NON_VOLATILE,
          KEY_SET_VALUE or KEY_CREATE_SUB_KEY , nil, hkeyProgid, nil));
      if (SUCCEEDED(Result)) then
      begin
          RegSetString(hkeyProgid, '', 'FriendlyTypeName', FFriendlyName);
          Result := RegSetString(hkeyProgid, '', 'AppUserModelID', FAppUserModelID);
          if (SUCCEEDED(Result)) then
          begin
              szIcon := FAppPath + ',0';
              Result := RegSetString(hkeyProgid, 'DefaultIcon', '', szIcon);
              if (SUCCEEDED(Result)) then
              begin
                  Result := RegSetString(hkeyProgid, 'CurVer', '', FProgID);
                  if (SUCCEEDED(Result)) then
                  begin
                      Result := HResultFromWin32(RegCreateKeyEx(hkeyProgid, 'shell', 0, nil, REG_OPTION_NON_VOLATILE,
                          KEY_SET_VALUE or KEY_CREATE_SUB_KEY, nil, hkeyShell, nil));
                      if (SUCCEEDED(Result)) then
                      begin
                          // The list of verbs provided by the ProgID is located uner the "shell" key.  Here, only
                          // the single "Open" verb is registered.
                          szCmdLine := '"' + FAppPath + '" "%1"';
                          Result := RegSetString(hkeyShell, 'Open\Command', '', szCmdLine);
                          if (SUCCEEDED(Result)) then
                          begin
                              // Set "Open" as the default verb for this ProgID.
                              Result := RegSetString(hkeyShell, '', '', 'Open');
                          end;
                          RegCloseKey(hkeyShell);
                      end
                  end
              end
          end;
          RegCloseKey(hkeyProgid);
      end
  end
  else
  begin
      lRes := SHDeleteKey(HKEY_CLASSES_ROOT, PWideChar(FProgID));
      if ( (ERROR_SUCCESS = lRes) or (ERROR_FILE_NOT_FOUND = lRes)) then
        Result := S_OK
         else
           Result := HResultFromWin32(lRes);
  end;
end;

function TFileRegistrationHelper.RegisterToHandleExt(pszExt: string;
  fRegister: boolean): HRESULT;
var
  szKey : string;
  hkeyProgidList : HKEY;
  hkeyExtension  : HKEY;
begin
  szKey := pszExt;
  Result := HResultFromWin32(RegCreateKeyEx(HKEY_CLASSES_ROOT, PWideChar(szKey), 0, nil, REG_OPTION_NON_VOLATILE,
                KEY_SET_VALUE, nil, hkeyExtension, nil));
  if Succeeded(Result) then
   begin
     RegSetString(hkeyExtension, '', '', PWideChar(FProgId));
     RegCloseKey(hkeyExtension);
   end;
  // All ProgIDs that can handle a given file type should be listed under OpenWithProgids, even if listed
  // as the default, so they can be enumerated in the Open With dialog, and so the Jump Lists can find
  // the correct ProgID to use when relaunching a document with the specific application the Jump List is
  // associated with.
  szKey := szKey + '\OpenWithProgids';
  Result := HResultFromWin32(RegCreateKeyEx(HKEY_CLASSES_ROOT, PWideChar(szKey), 0, nil, REG_OPTION_NON_VOLATILE,
                KEY_SET_VALUE, nil, hkeyProgidList, nil));
  if (SUCCEEDED(Result)) then
    begin
       if (fRegister) then
         begin
           Result := HResultFromWin32(RegSetValueEx(hkeyProgidList, PWideChar(FProgID), 0, REG_NONE, nil, 0));
         end
            else
               begin
                    Result := HResultFromWin32(RegDeleteValue(hkeyProgidList, PWideChar(FProgID)));
               end;
         RegCloseKey(hkeyProgidList);
    end;
end;

function TFileRegistrationHelper.RegisterToHandleFileType: HRESULT;
begin
  Result := RegisterProgid(TRUE);
  if (SUCCEEDED(Result)) then
  begin
    Result := RegisterToHandleExt(FExtToRegister, TRUE);
    if (SUCCEEDED(Result)) then
      // Notify that file associations have changed
      SHChangeNotify(SHCNE_ASSOCCHANGED, SHCNF_IDLIST, nil, nil);
   end;
end;

function TFileRegistrationHelper.RegSetString(Key: HKEY; pszSubKey, pszValue,
  pszData: string): HRESULT;
begin
  Result := HResultFromWin32(SHSetValue(Key, PWideChar(pszSubKey), PWideChar(pszValue), REG_SZ, PWideChar(pszData), (Length(pszData) + 1) * sizeof(CHAR)));
end;

function TFileRegistrationHelper.UnRegisterFileTypeHandler: HRESULT;
begin
  Result := RegisterProgid(FALSE);
  if (SUCCEEDED(Result)) then
    begin
       Result := RegisterToHandleExt(FExtToRegister, FALSE);
       if (SUCCEEDED(Result)) then
         // Notify that file associations have changed
         SHChangeNotify(SHCNE_ASSOCCHANGED, SHCNF_IDLIST, nil, nil);
    end;
end;

end.

As A Software Engineer, Do You Really Like Your Job? | Agile Zone

2011-05-17T21:53:00.000+02:00

As A Software Engineer, Do You Really Like Your Job? | Agile Zone

Krento 2.0.956.28 release

2011-04-28T15:37:00.001+02:00

Krento 2.0.956.28 is available for download from http://www.krento.net
This is bugs fixing release. More details is available on the Krento forum.

If you can't access krento.net site try another address: http://users.telenet.be/serhiy.perevoznyk/krento.html

Smir - backup and restore Windows desktop icons position

2011-04-28T13:07:00.000+02:00

Smir is a freeware tools for backup and restore Windows desktop icons positions. The application is portable, no setup needed. The information is stored to the text file without accessing the Windows registry.

Download Smir:

If you switch your monitor resolution the icons shortcuts position on the Windows desktop becomes scrambled.
Smir allows to save the unlimited number of the desktop icons layouts and quickly restore any of them.
You can save the layout for every screen resolution or for different tasks you are performing, etc...

If you like this tool, please help me by link back to this site on your blog or your friend site.

See also other freeware applications

Diswy - freeware application to show or hide desktop icons

2011-04-08T11:52:00.004+02:00

I made a small application that can be useful if for whatever purpose you want to hide all the icons on your desktop without having to delete them. Just run Diswy and all icons will disappear from your desktop, run it again and they become visible. The application is portable - no setup needed. It does not change any Windows files and does not delete your icons. The effect is not permanent. As soon as you restart you PC all you icons will be visible again.

Download Diswy:

If you like this tool, please help me by link back to this site on your blog or your friend site.

You can also download Smir - the freeware tool for backup and restore Windows desktop icons positions: http://delphi32.blogspot.com/2011/04/smir-backup-and-restore-windows-desktop.html

Prank on a Belgian call center (with captions in English)

2011-03-16T21:44:00.000+01:00

Service System "Uninstalling Dictators"

2011-03-04T08:42:00.002+01:00

Como usar o Krento

2011-03-01T20:37:00.000+01:00

Running Stack Docklet 2.0 from Krento

2011-02-24T22:08:00.000+01:00

Krento can run RocketDock docklets and StackDocklet 2.0 probably one of the most popular docklets for RocketDock.

The setup of this docklet is not really trivial (maybe because it's a beta version), but can give a really interesting result. Here is the detailed instruction how to install the StackDocklet 2.0 for Krento.

1. Download StackDocklet 2.0 The download link from the author's website is broken, but you can download it from Megaupload site: http://www.megaupload.com/?d=1SWE1N31
2. Extract the content of the StackDocklet2.0.rar archive to your hard drive.
3. Copy all files from the archive to Krento "Docklets" folder
This folder is located inside the Krento Data Folder.

Open Krento Data Folder, find inside "Dockets" folder and copy StackDocklet 2.0 files there.

One of the files StackDocklet.dll you have to copy to other location: Krento Application folder. This is a folder where Krento.exe is located. By default it's C:\Program Files\Krento folder.

When all these steps is done you can launch Krento and if everything is done correctly you will see StackDocklet running on your desktop.

eIDreader2010: NIEUW eid mini versie 2

2011-02-15T08:26:00.000+01:00

eIDreader2010: NIEUW eid mini versie 2:

Nieuwe versie, nieuwe website...

DocX office ondersteuning.

http://www.hetnetop.be/eidreader/

Handleiding : http://d.pr/66FY

Programma : http://d.pr/s1OR

Krento 2.0.176.11 is out

2011-02-11T20:52:00.000+01:00

Krento 2.0.176.11 is out and can be downloaded from http://www.krento.net

What's new in this release:

New way of activating the application ring: just keep right mouse button pressed for 0.5 sec
Added ActivateCursor option to Krento.ini file. When Krento is activated via keyboard the mouse cursor is not moved the the application ring center, but stays in it originan position
Added "Select Circle" menu item to the main Krento menu for more easy circle selection without going back or forward through all existing circles
Updated Krento translation
New way of the Application Ring selection. When pressing the Ctrl + Tab keyboard shortcut the new ring selection dialog appears:

Using Tab key while keep pressing the Ctrl key is possible to select the desired application ring (similar to the task selection in Windows using Alt + Tab keys).

Marleen Lefevre: Volgende week woensdag : Maureen (Hoksem) in Idool...

2011-02-09T22:34:00.000+01:00

Marleen Lefevre: Volgende week woensdag : Maureen (Hoksem) in Idool...: "zeker kijken. Vanzelfsprekend zijn we al op voorhand fan van onze toffe dorpsgenote."

Como personalizar o seu DESKTOP usando o KRENTO.

2011-02-09T08:28:00.000+01:00

TiltStr::不定期版: Krento ver.2.0.0.0 - 日本語言語ファイル

2011-02-04T20:45:00.000+01:00

TiltStr::不定期版: Krento ver.2.0.0.0 - 日本語言語ファイル

Krento 2.0 released

2011-02-03T12:33:00.006+01:00

Krento version 2.0 is released and available for download for free from http://www.krento.net

What's new in this release:

The limitation of 12 stones per application ring is gone
You can add an additional stones to the application ring
You can remove stones from the application ring

You can reorder stones on the ring
Stone icon can be an animated GIF image
New high-speed built-in web server. Krento can be controlled using web browser
Improved compatibility with Windows 7
Improved 64 bit support
Added more than 20 new built-in stones

Improved skins drawing. Most of the skins was redesigned and some new skins added.
New option IntegrateToolbar added to the Krento.ini file. When activated, Krento shows the jump list in Windows 7

Extended support for Krento Toys. Now Toys can be written in C#, VB or JavaScript and distributed as a script source files. No compilation needed. It makes possible to create new Toys without using Visual Studio.
Added the hint window with the name of the current Application Ring.
Added new buttons for more easy navigation between the rings and activating the setting dialog
Added additional high-resolution images for the most popular applications and web sites. You can extend this collection by yourself in very easy way.
The menu skin can be changed directly from the main menu.
Ctrl + Left Mouse Button Click shows the list of the available application rings
During the setup the speed optimization for your PC is performed
For better speed many functions was translated from C# to C++
Improved drag and drop support for Krento stones
Many other internal fixes...

KRENTO APLICACION PARA WINDOWS

2011-01-30T12:35:00.001+01:00

Code 39 barcode in C#

2011-01-20T20:02:00.000+01:00

Some time ago I published the EAN 13 barcode generator source code. Now in addition to it made I simple Code 39 generator.

using System;
using System.Collections.Generic;
using System.Text;
using System.Drawing;
using System.Drawing.Drawing2D;
using System.Drawing.Imaging;

namespace Karna.Barcode
{
    public class Code39
    {
        static readonly string star = "*";
        private Image image;
        private string barcodeId;
        private int width;
        private int height;


        public Code39(Image image)
        {
            this.image = image;
            this.width = 210;
            this.height = 146;
        }

        public int Width
        {
            get { return this.width; }
            set { this.width = value; }
        }

        public int Height
        {
            get { return this.height; }
            set { this.height = value; }
        }

        public string BarcodeId
        {
            get { return barcodeId; }
            set
            {
                if (value == null)
                    return;

                if (!value.StartsWith(Code39.star))
                {
                    value = Code39.star + value;
                }

                if (!value.EndsWith(Code39.star))
                {
                    value = value + Code39.star;
                }

                barcodeId = value;

                char encChar;

                StringBuilder sb = new StringBuilder();

                for (int i = 0; i < value.Length; i++)
                {
                    if (sb.Length > 0)
                    {
                        sb.Append('0');
                    }

                    encChar = value[i];

                    switch (encChar)
                    #region Char Table
                    {
                        case '0': sb.Append("101001101101");
                            break;
                        case '1': sb.Append("110100101011");
                            break;
                        case '2': sb.Append("101100101011");
                            break;
                        case '3': sb.Append("110110010101");
                            break;
                        case '4': sb.Append("101001101011");
                            break;
                        case '5': sb.Append("110100110101");
                            break;
                        case '6': sb.Append("101100110101");
                            break;
                        case '7': sb.Append("101001011011");
                            break;
                        case '8': sb.Append("110100101101");
                            break;
                        case '9': sb.Append("101100101101");
                            break;
                        case 'A': sb.Append("110101001011");
                            break;
                        case 'B': sb.Append("101101001011");
                            break;
                        case 'C': sb.Append("110110100101");
                            break;
                        case 'D': sb.Append("101011001011");
                            break;
                        case 'E': sb.Append("110101100101");
                            break;
                        case 'F': sb.Append("101101100101");
                            break;
                        case 'G': sb.Append("101010011011");
                            break;
                        case 'H': sb.Append("110101001101");
                            break;
                        case 'I': sb.Append("101101001101");
                            break;
                        case 'J': sb.Append("101011001101");
                            break;
                        case 'K': sb.Append("110101010011");
                            break;
                        case 'L': sb.Append("101101010011");
                            break;
                        case 'M': sb.Append("110110101001");
                            break;
                        case 'N': sb.Append("101011010011");
                            break;
                        case 'O': sb.Append("110101101001");
                            break;
                        case 'P': sb.Append("101101101001");
                            break;
                        case 'Q': sb.Append("101010110011");
                            break;
                        case 'R': sb.Append("110101011001");
                            break;
                        case 'S': sb.Append("101101011001");
                            break;
                        case 'T': sb.Append("101011011001");
                            break;
                        case 'U': sb.Append("110010101011");
                            break;
                        case 'V': sb.Append("100110101011");
                            break;
                        case 'W': sb.Append("110011010101");
                            break;
                        case 'X': sb.Append("100101101011");
                            break;
                        case 'Y': sb.Append("110010110101");
                            break;
                        case 'Z': sb.Append("100110110101");
                            break;
                        case '-': sb.Append("100101011011");
                            break;
                        case '.': sb.Append("110010101101");
                            break;
                        case ' ': sb.Append("100110101101");
                            break;
                        case '$': sb.Append("100100100101");
                            break;
                        case '/': sb.Append("100100101001");
                            break;
                        case '+': sb.Append("100101001001");
                            break;
                        case '%': sb.Append("101001001001");
                            break;
                        case '*': sb.Append("100101101101");
                            break;
                        default:
                            break;
                    }
                    #endregion
                }
                
                string drawString = sb.ToString();

                Bitmap bitmap = new Bitmap(width, height, PixelFormat.Format32bppArgb);
                Graphics canvas = Graphics.FromImage(bitmap);
                canvas.Clear(Color.White);

                canvas.SmoothingMode = SmoothingMode.HighQuality;
                canvas.InterpolationMode = InterpolationMode.HighQualityBicubic;
                canvas.PixelOffsetMode = PixelOffsetMode.HighQuality;
                canvas.CompositingQuality = CompositingQuality.HighQuality;

                int length = drawString.Length;
                int start = 0;
                int final = 0;
                int count = 0;

                while (start < length)
                {

                    while (final < length)
                    {
                        if (drawString[final] == '1')
                        {
                            final++;
                        }
                        else
                        {
                            break;
                        }
                    }

                    count = final - start;

                    if (count > 0)
                    {
                        RectangleF bounds = new RectangleF(0, 0, bitmap.Width, bitmap.Height);
                        RectangleF rect = bounds;
                        rect.X += bounds.Width * start / length;
                        rect.Width = bounds.Width * count / length;
                        canvas.FillRectangle(Brushes.Black, rect);
                    }

                    while (final < length)
                    {
                        if (drawString[final] == '0')
                        {
                            final++;
                        }
                        else
                        {
                            break;
                        }
                    }

                    start = final;
                }

                if (image != null)
                {
                    Graphics g = Graphics.FromImage(image);
                    g.InterpolationMode = InterpolationMode.HighQualityBicubic;
                    g.SmoothingMode = SmoothingMode.HighQuality;
                    g.DrawImage(bitmap, 0, 0, image.Width, image.Height);
                    g.Dispose();
                }

                canvas.Dispose();
            }
        }
    }
}

Moble version of my blog

2011-01-18T22:37:00.000+01:00

The mobile version of my blog is available from now via following url: http://delphi32.mobify.me

How to implement a mobile version of your blog in three simple steps

2011-01-18T22:33:00.000+01:00

I want to illustrate you a simple way to implement a mobile version of your blog/website in three simple steps using Mobify.me, an awesome on-line service that allow you to design mobile versions of a website just with some clicks.

Read the full article

Steve Jobs weer ziek thuis

2011-01-18T21:32:00.000+01:00

Voor een derde keer al moet Steve Jobs, ceo van Apple, met ziekteverlof gaan. Coo Tim Cook neemt opnieuw tijdelijk de leiding in handen.

Na een diagnose van pancreaskanker in 2004 en een zes maanden lang ziekteverlof in 2009 (voor onder meer een levertransplantatie), is dit dus een derde keer dat Steve Jobs (55) meldt om medische redenen verlof te nemen. Hij kondigde dit aan in een mededeling aan het personeel, zoals op de website van Apple werd gemeld. Ook nu weer, zoals in 2009, geeft hij tijdelijk het roer in handen van coo Tim Cook, die toen overigens een goede beurt maakte.

Steve Jobs weer ziek thuis - Datanews.be

Apple schuldig aan machtsmisbruik? - Datanews.be

2011-01-18T21:30:00.000+01:00

De Belgische mededingingsautoriteiten moeten, in opdracht van minister van Economie Vincent Van Quickenborne, (informeel) onderzoeken of Apple zich schuldig maakt aan machtsmisbruik. Dat na berichten over het feit dat uitgevers iPad-abonnementen op hun kranten of tijdschriften enkel nog via iTunes mogen verkopen.

Lees meer - Datanews.be

winapi - why is my Win32 gdi+ game unusably slow on Windows 7? - Stack Overflow

2011-01-14T11:39:00.000+01:00

winapi - why is my Win32 gdi+ game unusably slow on Windows 7? - Stack Overflow

building libpng in visual studio 2008 « Bobobobo’s Weblog

2011-01-14T10:48:00.000+01:00

building libpng in visual studio 2008 « Bobobobo’s Weblog

Gelukkig Nieuwjaar !!!

2010-12-31T13:17:00.002+01:00

Neem 12 maanden en reinig ze goed
van alle bitterheid, gierigheid, jaloersheid en angst
en snij elke maand in 30 of 31 gelijke stukken
zodat de voorraad voor een jaar toereikend is.
Bereid elke dag 1 stuk,
met één deel arbeid
en twee delen humor en vrolijkheid.
Voeg er drie volle soeplepels optimisme aan toe,
een portie vertrouwen,
een koffielepel verdraagzaamheid,
enkele snippertjes geduld
en een snuifje voorkomendheid.
Het geheel rijkelijk met liefde overgieten,
en wanneer alles klaar is
op smaak brengen met een scheutje fijngevoeligheid.
Versier het aldus bereide gerecht
met een bosje kleine attenties
en dien dagelijks op
met een vriendelijk woord
en een deugddoende lach!

Download and install Krento

2010-12-27T19:06:00.000+01:00

Full HD Wallpapers + Space, Earth, Nebulae, Planets, Stars, Sunrises, by Fernando Rodrigues

2010-12-22T20:13:00.000+01:00

Full HD Wallpapers + Space, Earth, Nebulae, Planets, Stars, Sunrises, by Fernando Rodrigues

2560x1600 Sunrise from space desktop wallpapers and stock photos

2010-12-22T20:11:00.000+01:00

2560x1600 Sunrise from space desktop wallpapers and stock photos

Free High Definition Wallpapers - WallpaperHD.net - Space, Stars and Planet

2010-12-22T20:09:00.001+01:00

Free High Definition Wallpapers - WallpaperHD.net - Space, Stars and Planet

Krento - i use this on windows

2010-12-22T19:17:00.000+01:00

Krento - i use this on windows

Ticker Maker

2010-12-17T23:38:00.000+01:00

Want a spiffy new RSS ticker for your website or blog? You can make it on http://www.coverpop.com/flowpop site

Krento is 100% trusted !

2010-12-15T22:08:00.001+01:00

December 13, 2010

Serhiy Perevoznyk,

we have done new complete security tests. To assure our users that Krento is clean and safe to install, we awarded your software again with our DownloadAtlas.com 100% Safe award.

让桌面干干净净六款桌面管理工具推荐--科技频道-中华网

2010-11-30T22:27:00.000+01:00

让桌面干干净净六款桌面管理工具推荐--科技频道-中华网

Do czego służy aplikacja Krento? `86` - PatrykBednarskiPC

2010-11-11T16:55:00.001+01:00

Wallpapers with HD

2010-11-11T16:50:00.001+01:00

Almost every day I tweet an interesting links to the freeware HD wallpapers collections like this:
http://wallpaperwhd.blogspot.com is a website where you can get cool wallpapers. It is very good quality and it's free. If you are looking for high definition wallpapers for your Windows desktop just follow me on Twitter: http://twitter.com/perevoznyk and you will receive the regular update about HD wallpapers available for download.

Verdien jij meer of minder dan de gemiddelde Belg?

2010-11-05T20:29:00.000+01:00

A stone's throw away

2010-10-02T11:39:00.000+02:00

It has been our experience that many Windows desktop enhancements are more trouble than they're worth; they tend to slow down our system's performance, have unintuitive interfaces, and make the things they set out to enhance more complicated than ever. Krento is among the better desktop enhancements we've seen, but it's still far from perfect.

Krento sets out to combine two things with which we're familiar from our experience as a Mac user: a dock and widgets. When not in use, Krento appears as an attractive, gently pulsing orb in the bottom corner of the desktop. Click on the orb and the Krento Stones Manager appears. This is a circular arrangement of 12 "stones," each of which represents a shortcut to an application, document, Web site, or other useful location. The Kento Application Ring is a stone within the manager that opens into a ring of its own, allowing you to group applications together in one place. In general, we liked Krento; it looks cool and is in some ways easier to navigate than the Windows Start menu. The program definitely has room for improvement, though. We found it odd that each stone is numbered, and that though there's no way to reorder the stones relative to one another, they do--for some reason--rotate each time you use one of them. This means that the stone you're looking for is never in the same place. We kept feeling like we ought to be able to drag and drop stones, either to reorder them or to move an application into the Application Ring, but the program has no such functionality. The program's online user manual was pretty helpful, once we located it, but at times it was vague; it told us that we could download new stones and toys, for example, but it didn't say where. (Answer: the Krento user forum.) Overall, Krento is interesting and worth checking out, but plan to approach it with a sense of adventure and some patience.

Krento installs and uninstalls without issues. We recommend this program.

Published on http://download.cnet.com.
The original article source: http://download.cnet.com/8301-20_4-10476133-10084490.html

Krento award on Software Informer

2010-09-30T20:31:00.002+02:00

Windows Magnification API .NET

2010-09-06T21:52:00.000+02:00

The Magnification API provides assistive technology vendors with the means for developing screen magnification applications for Windows Vista and later operating systems.The API enables you to display a simple control that magnifies a specified portion of the display by a specified factor. Images as well as text are displayed.
Unfortunately, Microsoft provided only native C++ API functions without .NET equivalent, so I decided to make a simple .NET wrapper in C#.
The full C# source code is available for download: http://users.telenet.be/serhiy.perevoznyk/download/Magnification.zip

The magnification class is based on native Windows API calls. Here is a small excerpt from the library sources:

using System;
using System.Collections.Generic;
using System.Text;
using System.Runtime.InteropServices;

namespace Karna.Magnification
{

    internal static class NativeMethods
    {

        public const string WC_MAGNIFIER = "Magnifier";

        [DllImport("user32.dll", CharSet = CharSet.Auto, ExactSpelling = true)]
        public static extern int GetSystemMetrics(int nIndex);

        [DllImport("user32.dll", CharSet = CharSet.Auto, ExactSpelling = true)]
        public static extern IntPtr SetTimer(IntPtr hWnd, int nIDEvent, int uElapse, IntPtr lpTimerFunc);

        [DllImport("user32.dll", CharSet = CharSet.Auto, ExactSpelling = true)]
        [return: MarshalAs(UnmanagedType.Bool)]
        public static extern bool KillTimer(IntPtr hwnd, int idEvent);

        [DllImport("user32.dll", CharSet = CharSet.Auto, ExactSpelling = true)]
        [return: MarshalAs(UnmanagedType.Bool)]
        public static extern bool GetClientRect(IntPtr hWnd, [In, Out] ref RECT rect);

        [DllImport("user32.dll", CharSet = CharSet.Auto, ExactSpelling = true)]
        [return: MarshalAs(UnmanagedType.Bool)]
        public static extern bool SetWindowPos(IntPtr hWnd, IntPtr hWndInsertAfter, int x, int y, int cx, int cy, int flags);

        [DllImport("user32.dll", EntryPoint = "CreateWindowExW", CharSet = CharSet.Unicode, CallingConvention = CallingConvention.StdCall)]
        public extern static IntPtr CreateWindow(int dwExStyle, string lpClassName, string lpWindowName, int dwStyle, int x, int y, int nWidth, int nHeight, IntPtr hWndParent, IntPtr hMenu, IntPtr hInstance, IntPtr lParam);

        [DllImport("user32.dll", CharSet = CharSet.Auto, SetLastError = true, ExactSpelling = true)]
        [return: MarshalAs(UnmanagedType.Bool)]
        public static extern bool SetLayeredWindowAttributes(IntPtr hwnd, int crKey, byte bAlpha, LayeredWindowAttributeFlags dwFlags);

        [DllImport("kernel32.dll", CharSet = CharSet.Unicode)]
        public static extern IntPtr GetModuleHandle([MarshalAs(UnmanagedType.LPWStr)] string modName);

        [DllImport("user32.dll", CharSet = CharSet.Auto, ExactSpelling = true)]
        [return: MarshalAs(UnmanagedType.Bool)]
        public static extern bool GetCursorPos(ref POINT pt);

        [DllImport("user32.dll", CharSet = CharSet.Auto, ExactSpelling = true)]
        [return: MarshalAs(UnmanagedType.Bool)]
        public static extern bool InvalidateRect(IntPtr hWnd, IntPtr rect, [MarshalAs(UnmanagedType.Bool)] bool erase);

        [DllImport("Magnification.dll", CallingConvention=CallingConvention.StdCall)]
        [return: MarshalAs(UnmanagedType.Bool)]
        public static extern bool MagInitialize();

        [DllImport("Magnification.dll", CallingConvention = CallingConvention.StdCall)]
        [return: MarshalAs(UnmanagedType.Bool)]
        public static extern bool MagUninitialize();

        [DllImport("Magnification.dll", CallingConvention = CallingConvention.StdCall)]
        [return: MarshalAs(UnmanagedType.Bool)]
        public static extern bool MagSetWindowSource(IntPtr hwnd, RECT rect);

        [DllImport("Magnification.dll", CallingConvention = CallingConvention.StdCall)]
        [return: MarshalAs(UnmanagedType.Bool)]
        public static extern bool MagGetWindowSource(IntPtr hwnd, ref RECT pRect);

        [DllImport("Magnification.dll", CallingConvention = CallingConvention.StdCall)]
        [return: MarshalAs(UnmanagedType.Bool)]
        public static extern bool MagSetWindowTransform(IntPtr hwnd, ref Transformation pTransform);

        [DllImport("Magnification.dll", CallingConvention = CallingConvention.StdCall)]
        [return: MarshalAs(UnmanagedType.Bool)]
        public static extern bool MagGetWindowTransform(IntPtr hwnd, ref Transformation pTransform);

        [DllImport("Magnification.dll", CallingConvention = CallingConvention.StdCall)]
        [return: MarshalAs(UnmanagedType.Bool)]
        public static extern bool MagSetWindowFilterList(IntPtr hwnd, int dwFilterMode, int count, IntPtr pHWND);

        [DllImport("Magnification.dll", CallingConvention = CallingConvention.StdCall)]
        public static extern int MagGetWindowFilterList(IntPtr hwnd, IntPtr pdwFilterMode, int count, IntPtr pHWND);

        [DllImport("Magnification.dll", CallingConvention = CallingConvention.StdCall)]
        [return: MarshalAs(UnmanagedType.Bool)]
        public static extern bool MagSetColorEffect(IntPtr hwnd, ref ColorEffect pEffect);

        [DllImport("Magnification.dll", CallingConvention = CallingConvention.StdCall)]
        [return: MarshalAs(UnmanagedType.Bool)]
        public static extern bool MagGetColorEffect(IntPtr hwnd, ref ColorEffect pEffect);
    }
}

The classic Tetris game as Windows Forms control

2010-08-25T20:20:00.000+02:00

This is just plain old Tetris, written in C# and implemented as a Windows Forms control, so you can insert it in your own .NET application. I assume you have played Tetris before and know the rules of this simple but interesting game.

Download full source code: http://users.telenet.be/serhiy.perevoznyk/download/Karna.Tetris.zip

Japanese Krento

2010-08-03T19:43:00.000+02:00

The new release of Krento with support of Japanese language is available for download from http://www.krento.net

Krento 1.6.25.28 release

2010-07-28T18:27:00.000+02:00

New version of Krento is available for download from http://www.krento.net

This time not only x86 and x64 versions are available, but the special Itanium edition as well: http://users.telenet.be/serhiy.perevoznyk/download/krentoi64_setup.exe
There are few bugs fixed:
* Invisible controls focusing in the options dialog
* Setting of the working directory for the executables
* Relative path to the target for the portable edition
All these problems were reported via Krento Support Forum http://krento.eamped.com

To solve the problem with relative paths in the portable version of Krento I introduced the new environment variable %KRENTO_DRIVE% that points to the current USB drive from which Krento is running. Now you can specify the name of the file like %KRENTO_DRIVE%\AIDA\aida32.exe. If your USB drive has the drive letter F: assigned, for example, then %KRENTO_DRIVE% value is equal to F: (without backslash).

Krento user manual is online

2010-07-01T20:51:00.000+02:00

The first version of the Krento user manual is available online:
http://users.telenet.be/serhiy.perevoznyk/manual/index.html
The manual will be also included in Krento setup and available offline starting from the next release of Krento.
Now the users should have less questions how to use Krento features. And the support forum can be used as an additional informational resource http://krento.forumer.com

Update 30.11.2011
The new address of the Krento support forum is http://krento.eamped.com

Krento 1.6 release

2010-06-24T19:51:00.000+02:00

Krento 1.6 released and available for download from http://www.krento.net

Krento is a widget engine that supports 3 different types of widgets. One type that can do small,
but useful actions, like launching applications, named "Krento Stones", another one that has more decorative purposes named "Krento Toys". "Krento Toys" are similar to Google Gadgets or Windows Sidebar widgets.
This naming convention helps to avoid misunderstanding when downloading and installing different types of Krento widgets. In addition Krento supports RocketDock docklets, but places it directly to the desktop the same way as "Krento Toys".

Release information:
* Automatically checks for new Krento releases
* Added support for RocketDock docklets
* Added possibility to select a folder (not only file or shortcut) as a target for "File Launcher" stone
* Added configuration screen to all types of Krento Stones

RocketDock docklets support

You can add RocketDock docklets to Krento by dropping them in the "Docklets" folder located in Krento Data Folder. Afther you restart Krento the docklets will be activated on your desktop.

Extending Krento functionality using Krento Toys

2010-05-27T20:51:00.000+02:00

Krento widgets designed to run on your desktop (Krento Toys). Widgets are desktop toys to entertain and to inform. Think of them like things you’d put on a real desk: a picture frame, a newspaper or live goldfish! But they’re on your PC desktop, not your real desk. You’ll get it once you see it. They could be a fun addition to your boring computer. Download Krento Toys from http://krento.forumer.com

Selecting Folder in Krento

2010-05-25T22:36:00.000+02:00

Krento 1.5.246.17 release

2010-05-17T21:33:00.002+02:00

Krento 1.5.246.17 is available for download from http://www.krento.net

Release information

Multilingual release.

The following languages are supported:

English Translator: Serhiy Perevoznyk
Dutch Translator: Sven Wyns
Spanish Translator: Sven Wyns
Portuguese Translator: Knight Rider (SoQuadrinhos)
Russian Translator: Ded2007
French Belgium Translator: Jacques Putseys
French France Translator: Paul Van Muysewinkel
Romanian Translator: Oxana Rojcova
German Translator: Andreas Pitzer
Latvian Translator: Juris "3Dman" Perkons

Added possibility to select a folder (not only file or shortcut) as a target for "File Launcher" stone
Extended Pulsar popup menu for more easy setup of Krento Stones, Toys and Skins
A lot of small improvements (visit Krento support forum http://krento.forumer.com for details)

Update 30.11.2011
The new address of the Krento support forum is http://krento.eamped.com

Download extra Krento Stones

2010-05-11T21:56:00.000+02:00

Krento comes with 15 embedded Stones (special Krento widgets), but this set can be extended by downloading and installing additional Stones.

New Stones are available for download:

Krento Data Folder Stone http://users.telenet.be/serhiy.perevoznyk/krento/KrentoDataFolder.stone
Open / close CD tray Stone http://users.telenet.be/serhiy.perevoznyk/krento/CDTrayStone.stone

How to install Krento Stones?

Download Krento Stone to your PC
Launch Krento
Drag and drop stone to Krento Pulsar

You need Krento 1.5 installed to use this functionality.

Krento GoldFish Toy

2010-05-11T20:27:00.000+02:00

Krento Goldfish Toy is available for download: http://users.telenet.be/serhiy.perevoznyk/krento/GoldFish.toy

For using this Krento Toy you need Krento 1.5 installed.

Krento 64 bit edition - 5 stars award on Best Software 4 Download

2010-05-11T19:34:00.001+02:00

Krento 64 bit edition has been reviewed by Best Software 4 Download and got 5 stars award

Krento screenshot

2010-05-11T19:30:00.000+02:00

Krento as a part of HTPC desktop.

Parlement ontbonden, verkiezingen op 13 juni

2010-05-07T21:05:00.000+02:00

Kamer en Senaat hebben donderdagavond de lijst met grondwetsartikels goedgekeurd die in de volgende legislatuur voor herziening vatbaar zijn.

De ministerraad heeft de datum voor de komende federale verkiezingen vrijdagochtend officieel vastgelegd op 13 juni. Het leek al langer 13 juni te worden, maar dat ligt nu ook officieel vast, bevestigde uittredend premier Yves Leterme vrijdag na afloop van de ministerraad

Herstel winterschade aan Vlaamse wegen kost meer dan 88 miljoen - België - Nieuws - Knack

2010-05-07T20:59:00.001+02:00

Herstel winterschade aan Vlaamse wegen kost meer dan 88 miljoen - België - Nieuws - Knack

De kostprijs voor het herstellen van de winterschade aan de Vlaamse gewest- en autosnelwegen wordt geraamd op meer dan 88 miljoen euro.

Krento CPU Information Toy

2010-05-07T19:49:00.000+02:00

Krento CPU Information toy is available for download:
http://users.telenet.be/serhiy.perevoznyk/krento/CPUInfo.toy

You need Krento 1.5 installed to run this toy. You can download more toys from Krento forum:
http://krento.11.forumer.com/viewforum.php?f=14

Update 30.11.2011
The new address of the Krento support forum is http://krento.eamped.com

Krento Clock Toy

2010-05-07T19:46:00.000+02:00

New Krento "Clock" toy is available for download. You need Krento 1.5 to run it.
http://users.telenet.be/serhiy.perevoznyk/krento/VistaClock.toy

More Krento toys you can find on Krento forum: http://krento.11.forumer.com/viewforum.php?f=14

Update 30.11.2011
The new address of the Krento support forum is http://krento.eamped.com

How to install Krento toy

2010-05-07T18:49:00.000+02:00

KissMe: very first Krento toy is available for download

2010-05-05T19:36:00.002+02:00

KissMe: very first Krento toy is available for download

What is "Krento Toy"?

It is a small, lightweight single-purpose application, or software widget, that can sit on a Microsoft Windows user's computer desktop.

Why Krento uses word "Toy" in place of "widget"?

Krento is a widget engine that supports 2 different types of widgets. One type that can do small, but useful actions, like launching applications, named Krento Stones and another one that has more decorative purposes named Krento Toys.
It helps to avoid misunderstanding when downloading and installing different types of Krento widgets.

How to find Krento Data Folder

2010-05-05T12:45:00.000+02:00

Change Krento Menu Skin

2010-05-04T19:57:00.000+02:00

Change Krento Skin

2010-05-04T19:56:00.000+02:00

Krento Select Language

2010-05-04T09:48:00.000+02:00

2010-05-03T21:59:00.004+02:00

The native Krento skin is a set of the ini text file and few images. The default name of the ini file is background.ini You can use Notepad to create and edit background.ini file.

Ini file (skin settings file) has the following structure:


[Info] 
 Name = User Friendly Name of the skin 
 FontName = Tahoma 
 FontSize = 14 
 Color = White 
 HotImage = DoDown.png 
 StoneInfo = StoneInfo.png 
 
 [Background] 
 Image = background.png 
 LeftWidth    = 12 
 RightWidth    = 12 
 TopHeight   = 12 
 BottomHeight   = 12 
 OutsideBorderTop   = 0 
 OutsideBorderBottom   = 0 
 OutsideBorderLeft    = 0 
 OutsideBorderRight    = 0 
 TextOffset = 14 
 
 [Stone] 
 Image = background.png 
 OutsideBorderTop   = 12 
 OutsideBorderBottom   = 12 
 OutsideBorderLeft    = 12 
 OutsideBorderRight    = 12 
 Border = 0

If the size of the stone skin drawing is smaller than total size of the image (image has unused transparent area between the image border and the skin border) this area size is specified by using OutsideBorderXXX parameters for stone manager.
The size of the unstretchable area for the manager background is defined as OutsideBorderXXX parameter and XXXWidth/XXXHeight parameter.
For the stone background only OutsideBorderXXX parameter is used and it equals to the total size of the unstretchable area.

OutsideBorderLeft
OutsideBorderBottom
OutsideBorderRight
OutsideBorderTop
TopHeight
LeftWidth
LeftWidth + OutsideBorderLeft = Total unstretched area size at the left side
OutsideBorderBottom + BottomHeight = Total unstretched area size at the bottom
BottomHeight
OutsideBorderRight + RightWidth = Total unstretched area size at the right side
RightWidth
OutsideBorderTop + TopHeight = Total unstretched area size at the top
TextOffset (This value can be negative as well)
Text Area - the area of the Stone Manager where text is displayed
Streched area of the skin. This part of the skin is used to fill the central part of the stone or manager window
Non stretched corner of the skin.

One more sample of Krento skin ini file:

[Info] Name = Krento Gloss Blue
FontName = Tahoma
FontSize = 14
Color = 254, 37, 103, 162
HotImage = DoDown.png
StoneInfo = StoneInfo.png

[Background]
Image = background.png
LeftWidth = 0
RightWidth = 0
TopHeight = 0
BottomHeight = 0
OutsideBorderTop = 8
OutsideBorderBottom = 8
OutsideBorderLeft = 52
OutsideBorderRight = 52
TextOffset = -8

[Stone]
Image = background.png
OutsideBorderTop = 8
OutsideBorderBottom = 8
OutsideBorderLeft = 52
OutsideBorderRight = 52
Border = 0

The skin is packaged by default as PKZIP file with extension .kskin, for example MySkin.kskin

It is recommended to add all files to kskin file including subfolder name.

Installing of Krento skin (.kskin) file is very simple - just drag and drop it to Krento Pulsar.

You can download few existing skin files and analyze it.

Krento 1.5 release

2010-04-29T21:26:00.000+02:00

Krento 1.5 available for download from http://www.krento.net
This is a next stable release of Krento and it contains all most important features that was planned initially when I started Krento development.

Release information:

Multilanguage release. The following languages are supported:

English Translator: Serhiy Perevoznyk
Dutch Translator: Sven Wyns
Spanish Translator: Sven Wyns
Portuguese Translator: Knight Rider (SoQuadrinhos)
Russian Translator: Ded2007
French Belgium Translator: Jacques Putseys
French France Translator: Paul Van Muysewinkel
Romanian Translator: Oxana Rojcova

The translation to every language was done manually, not by using Google API or other mechanical ways of translation. The name of the translator is shown in About Box window

Whats new in this release:

Extended set of Krento stones. Krento has 15 build-in stones:

01. File or web site launcher
02. My Documents
03. My Music
04. My Pictures
05. My current IP address
06. My Computer
07. Recycle Bin
08. Shutdown Computer
09. Stand By Computer
10. Hibernate Computer
11. Restart Computer
12. Current time
13. Current date
14. Krento Applications Ring
15. Close Krento

Added support for external stones. Now is possible to develop and distribute new stones apart from Krento.
Added plugins support. Now is possible to extend the functionality of Krento using plugins
Added new type of widgets - Krento Toys. Krento Toys are similar to Windows Sidebar widgets and stay on the desktop not linked to Krento Stones Manager.
Added possibility to assign custom hot-key combinations to most of Krento actions (for advanced users only)
Added drag and drop support for "My Documents", "My Pictures", "My Music" and "Recycle Bin" stones
Extended drag and drop support for "File or web site launcher" stone: when shift button is pressed the dragged file will not replace the stone's target but will be passed to the stone application as a command line parameter. For example, you can create the stone with Notepad as a target and drag the text file to it. In this case Notepad starts and opens the dragged file.
When you do Ctrl + Click on Stones Manager window, the ring selection dialog will be shown
You can change current circle by pressing Ctrl + Alt + Fxx (F1..F12) for first 12 circles

This is just a very short list of the new features. Additional information about this release will come here and on Krento forum: http://krento.forumer.com

eID mini 2010 Belgium Id Card reader FREEWARE

2010-04-29T20:46:00.000+02:00

Regering België valt door tegenstelling Walen/Vlamingen

2010-04-22T22:24:00.000+02:00

Voorzitter Alexander de Croo van de Vlaamse liberale partij Open VLD is uit de regering Leterme II gestapt omdat er nog steeds geen akkoord is over de toekomst van het kiesdistrict Brussel-Halle-Vilvoorde (BHV). Premier Yves Leterme is vertrokken om het ontslag van zijn regering aan koning Albert II aan te bieden.

Voor Pasen had er echt een besluit moeten vallen over de splitsing van het kiesdistrict, vond het Open VLD. De andere vier regeringspartijen (Vlaamse christendemocraten en Franse christendemocraten, liberalen en socialisten) wilden er nog langer over praten.

eID eIDreader 2010, eMiNi: eMiNi Dual Engine, nieuwe HTML editor en eID convertor !

2010-04-20T21:05:00.001+02:00

Nieuw, kies zelf uw 'read-engine' Gebruik de middleware (indien geinstalleerd) of de snellere Native Lib. Maak zelf de keuze en vergelijk.

Lees uw eerder opgeslagen middleware eID bestanden en converteer ze naar het eMiNi CSV formaat, inclusief de foto.

Nu ook met nieuwe HTML editor ingebouwd.

eID eIDreader 2010, eMiNi: eMiNi Dual Engine, nieuwe HTML editor en eID convertor !

Licancabur Volcano

2010-04-19T22:00:00.000+02:00

Licancabur Volcano is located on the border between Chile and Bolivia. Photo from National Geographic

Erupting Volcano wallpaper

2010-04-19T21:57:00.000+02:00

Download Erupting Volcano wallpaper, 'lighting and volcano'.

Krento 1.4.562.1 release

2010-04-01T19:17:00.001+02:00

Krento 1.4.562.1 released and available for download from http://www.krento.net
or from RapidShare server: http://rapidshare.com/files/375130636/krento_setup.exe

Release information:

* Multilanguage release. The following languages are supported:
1. English
2. Dutch
3. Spanish
4. Portuguese
5. Russian
The translation to every language was done manually, not by using Google API or
other mechanical way of the translation.

* Added support for environment variables in the target name, custom icon names,
names of the circle files, etc..
Now you can specify the stone target like %PROGRAMFILES%\My company\My Application.exe
All Krento related file names are stored now using new syntax:
Theme=%APPDATA%\Krento\Menus\Aero Royale\background.ini

* For portable version of Krento added %KRENTO_PORTABLE% environment variable.
This variable is defined by Krento during the startup and stored in the process environment block
(without writing to the registry). As a result you can specify the circle name like
%KRENTO_PORTABLE%\Stones\Default.circle

* Fixed problem with downloading site icon, when icon is not an .ico, but .gif file

* Changed procedure of detecting the webpage encoding.

* You can select now previous circle by pressing Backspace key

Krento Websites Management

2010-03-30T18:07:00.001+02:00

Krento 1.4.509.29 release

2010-03-29T21:48:00.001+02:00

Krento 1.4.509.29 released and available for download from http://www.krento.net

Release information:

* Full support for drag and drop of virtual objects from Windows Explorer.
You can drag now not only files and folders, but Control Panel applets,
printers, Mobile Devices, Disk Drives, etc... Krento is probably the only one
application from all Docks and Launchers that can handle virtual objects properly.
* Fixed problem with stone description when dragging drives to Krento stone
* Fixed "Invalid / Missing File" message when dragging not a file, but a folder to Krento stone

Modern software design

Krento Screen Saver

Krento Chrome Window Skin

ANSI version of the Quricol Delphi library

Quricol Delphi sample

Happy New Year 2012

Kerst 2012

DesktopPaparazzo - freeware screen capture tool

SimpleLogoff - one click logoff from Windows

Quricol - QR code generator library

Reklame: GE RAADT NOOIT VOOR WELK PRODUCT

C++ library for working with streams

How to check Windows version in C++

Confucius

Etienne Vermeersch: 'Migranten in ons land hebben te veel ... - De Standaard

Leuven tekent beroep aan tegen Uplace | brusselnieuws.be

Google knows me

Android Circle Launcher Widget for shortcuts on my Nexus S

Ex-topman Apple Steve Jobs overleden

PI Download: PDF Gallery

Krento 2.1.333.12 released

Polish translation of Krento

Krento 2.1.299.25 released

Disk Usage Krento Toy

Metal Mesh Skin

Krento 2.1 release

Windows 8 – Microsoft’s Death Knell?

Generate Excel files without using Microsoft Excel (Part 2)

PDF Gallery - freeware JPEG to PDF converter

Temporary problem with my website

Adding Windows 7 Jump List to a Delphi 2010 application

Delphi class for managing file associations

As A Software Engineer, Do You Really Like Your Job? | Agile Zone

Krento 2.0.956.28 release

Smir - backup and restore Windows desktop icons position

Diswy - freeware application to show or hide desktop icons

Prank on a Belgian call center (with captions in English)

Service System "Uninstalling Dictators"

Como usar o Krento

Running Stack Docklet 2.0 from Krento

eIDreader2010: NIEUW eid mini versie 2

Krento 2.0.176.11 is out

Marleen Lefevre: Volgende week woensdag : Maureen (Hoksem) in Idool...

Como personalizar o seu DESKTOP usando o KRENTO.

TiltStr::不定期版: Krento ver.2.0.0.0 - 日本語言語ファイル

Krento 2.0 released

KRENTO APLICACION PARA WINDOWS

Code 39 barcode in C#

Moble version of my blog

How to implement a mobile version of your blog in three simple steps

Steve Jobs weer ziek thuis

Apple schuldig aan machtsmisbruik? - Datanews.be

winapi - why is my Win32 gdi+ game unusably slow on Windows 7? - Stack Overflow

building libpng in visual studio 2008 « Bobobobo’s Weblog

Gelukkig Nieuwjaar !!!

Download and install Krento

Full HD Wallpapers + Space, Earth, Nebulae, Planets, Stars, Sunrises, by Fernando Rodrigues

2560x1600 Sunrise from space desktop wallpapers and stock photos

Free High Definition Wallpapers - WallpaperHD.net - Space, Stars and Planet

Krento - i use this on windows

Ticker Maker

Krento is 100% trusted !

让桌面干干净净 六款桌面管理工具推荐--科技频道-中华网

Do czego służy aplikacja Krento? `86` - PatrykBednarskiPC

Wallpapers with HD

Verdien jij meer of minder dan de gemiddelde Belg?

A stone's throw away

Krento award on Software Informer

Windows Magnification API .NET

The classic Tetris game as Windows Forms control

Japanese Krento

Krento 1.6.25.28 release

Krento user manual is online

Krento 1.6 release

Extending Krento functionality using Krento Toys

Selecting Folder in Krento

Krento 1.5.246.17 release

Download extra Krento Stones

Krento GoldFish Toy

Krento 64 bit edition - 5 stars award on Best Software 4 Download

让桌面干干净净六款桌面管理工具推荐--科技频道-中华网