Archive for the ‘Uncategorized’ Category

Firebird day in Paris

Wednesday, September 1st, 2010


I will speak at the Firebird Day in Paris on October 1st about Firebird, UIB and Unicode.

Other speakers will be:
- Dmitry Yemanov: v3.0 – either architecture or optimizer related.
- Paul Reeves : PHP Framework and Firebird.
- Alexey Kovyazin (IBSurgeon): anti-corruption approach for Firebird.
- Philippe Makowski (Firebird Foundation President).
- Thierry Laborde (Codegear France).
- Frédéric Guillien.

register here

spams

Friday, July 30th, 2010

Some spammers have altered a fifties messages in the forums.
They have used accounts whose password was the same as the identifier.
I disabled these accounts and deleted the spam, but I lost 50 threads.
I will not reactivate these accounts.

Google Chrome Frame in your Delphi application

Monday, May 24th, 2010

Chrome Frame is an ActiveX control to use Google Chrome in IE.
Unfortunately, this component can not be imported into Delphi as most of the other ActiveX controls.
So I created a component to use Chrome Frame in your application.

First you need Google Chrome Frame.
And this this is the source code.

By default GCF can only load HTTP and HTTPS URI, it is a bit annoying …
but if you enable the “privileged” property it is possible to use the data URI scheme, install extensions and use named profiles.

The Chrome Frame exposes an object named “externalHost” which lets you exchange text messages with your application.
Using JSON and SuperObject it is possible to exchange complex objects with GCF.

I hope this will help to enhance your applications.

threads & anonymous methods

Tuesday, February 23rd, 2010

I had a funny idea this weekend, I was looking for a way to multithread a part of my code without having to break my code.
Using an anonymous method the thread is able to access the local variables of the method that executes the thread.
The trick is very simple and allows great flexibility in the code.

type
  TRefProc = reference to procedure;

function Thread(const proc: TRefProc): THandle;
  function run(const proc: TRefProc): Integer; stdcall;
  begin
    proc;
    Result := 0;
  end;
begin
  CreateThread(nil, 0, @run, PPointer(@proc)^, 0, Result);
end;

procedure DoIt;
var
  done: THandle;
begin
  done := CreateEvent(nil, True, False, nil);
  try
    Thread(procedure
    begin
      sleep(2000);
      SetEvent(done);
    end);
    WaitForSingleObject(done, INFINITE);
  finally
    CloseHandle(done);
  end;
end;

About me

Thursday, February 11th, 2010


I have a good resolution for this new year I will socialize me.

I am 34 years old and live in Metz in France.

I am self taught for nearly 15 years after abandoning my studies in accounting, and after failing the entrance examination of an art school, the world will never know what artist I could be.
I console myself by saying that what I do is also art.

If you like my work, you can follow me on facebooktwitter and buzz of course. If you can not live without me, there is a button “donate” :D


Henri Gourvest

Séminaires Delphinautes le 26 Novembre à Lyon

Tuesday, October 20th, 2009

Amis francophones, je tiendrais une session à ce séminaire sur le theme:

Développement de serveur d’application/web avec Delphi 2010 (REST, MVC, UIB, RTTI, Firebird, JSON, LUA).

Plus d’informations içi:

http://www.grizzlydev.com/seminaires_delphinautes.13.1.46.html

Venez nombreux

web site attack, again …

Monday, June 23rd, 2008

If you receive an email from this web site like this:

“The account owned by xxxxxxx has been deactivated”

it is because I am currently attacked by forum spammers..

sorry for inconvenience.

new website

Sunday, June 22nd, 2008

I recently suffered attacks on my web site, so I upgraded to WordPress, and I installed a recent version of phpbb.