Any one can suggest me some well file share website ?

Related posts

• Using FireFox instead of TWebBrowser in Delphi applications (0)
• How to check the email address input is validate in delphi (0)
• Creating an RSS Reader use Delphi (1)

Related posts

• Using FireFox instead of TWebBrowser in Delphi applications (0)
• How to check the email address input is validate in delphi (0)
• File share suggest (4)

Would you like to display HTML in your applications using an open source solution? The Gecko Runtime Environment by the Mozilla Foundation can be embedded in a Delphi application by using the Mozilla ActiveX Control. This article shows how to use this control and points out some of the differences between it and the IE based TWebBrowser. The accompanying source code was written in Delphi 6 but should work in Delphi 5 and later. If you want to use the Mozilla ActiveX Control with Delphi 4 you also need to read Delphi 4 Lizard Taming.

First some background and terminology. In 1998 Netscape released the source code for Communicator, their Internet suite, to the open source community and created Mozilla.org. After several years development, the project finally released Mozilla 1.0 in 2002. By then Netscape had been bought by AOL, who repackaged Mozilla 1.0 as Netscape 7.0. In 2003, AOL closed its Netscape software division and the Mozilla code is now entirely controlled by the non-profit Mozilla Foundation. During development the Communicator code was completely re-written and new technologies were invented such as XUL, a cross platform UI definition language using XML, CSS and JavaScript. The Mozilla Suite of a Browser, Mail and Newsreader, HTML Composer and an Address Book is now being superseded by Firefox (browser), Thunderbird (email), and Nvu (composer). Behind all these applications is the Gecko Runtime Environment (GRE) – a fast, free and standards compliant HTML display engine.

All the Mozilla code is released under an MPL/GPL/LGPL tri-license so you can choose the license that suits your needs when using it. For C programmers, building applications based on the Mozilla code is easy, they can just download the code and start hacking immediately but there is also an option for the rest of us. There is an ActiveX control, written by Adam Lock, which can be used to embed the GRE in other applications. This Mozilla ActiveX Control is written to emulate the familiar IE based TWebBrowser.

There is little documentation for the Mozilla Control but you can use the MSDN WebBrowser documentation and ask questions in the netscape.public.mozilla.embedding newsgroup. Read more.

Related posts

• How to check the email address input is validate in delphi (0)
• File share suggest (4)
• Creating an RSS Reader use Delphi (1)

Updated on 2000-12-06 due to Phil’s and Sven’s comments.
Updated on 2002-06-13 due to Carlos’ comment.
Thanks for improving!

function IsValidEmail(const Value: string): boolean;
 
function CheckAllowed(const s: string): boolean;
var
i: integer;
begin
Result:= false;
for i:= 1 to Length(s) do
begin
// illegal char in s -> no valid address
if not (s[i] in ['a'..'z','A'..'Z','0'..'9','_','-','.']) then
Exit;
end;
Result:= true;
end;
 
var
i: integer;
namePart, serverPart: string;
begin // of IsValidEmail
Result:= false;
i:= Pos('@', Value);
if (i = 0) or (pos('..', Value) > 0) then
Exit;
namePart:= Copy(Value, 1, i - 1);
serverPart:= Copy(Value, i + 1, Length(Value));
if (Length(namePart) = 0)         // @ or name missing
or ((Length(serverPart) < 4))   // name or server missing or
then Exit;                      // too short
i:= Pos('.', serverPart);
// must have dot and at least 3 places from end
if (i < 2) or (i > (Length(serverPart) - 2)) then
Exit;
Result:= CheckAllowed(namePart) and CheckAllowed(serverPart);
end;

Related posts

• Using FireFox instead of TWebBrowser in Delphi applications (0)
• File share suggest (4)
• Creating an RSS Reader use Delphi (1)