Topic: Beta version 2.3
My Visual Database 2.3 beta
What's new?
- Added class TWebBrowser, allow you create on form web browser to display web pages and pdf documents, example:
procedure Form1_Button1_OnClick (Sender: string; var Cancel: boolean);
var
Web: TWebBrowser;
begin
Web := TWebBrowser.Create(Form1);
TWinControl(Web).Parent := Form1;
Web.Width := Form1.Width;
Web.Height := Form1.Height;
Web.Navigate('http://ya.ru');
end;
- Added functions to get created/modified/accessed time to file
function CreatedFileTime(const FileName: string; var FileTime: TDateTime): boolean
function ModifiedFileTime(const FileName: string; var FileTime: TDateTime): boolean
function AccessedFileTime(const FileName: string; var FileTime: TDateTime): boolean
example:
procedure Form1_Button2_OnClick (Sender: string; var Cancel: boolean);
var
dt: TDateTime;
begin
if CreatedFileTime('c:\temp\1.txt', dt) then
ShowMessage( DateTimeToStr(dt) )
else ShowMessage('Failed to get time.');
end;
- Added a property MultiSelect for ComboBox, allow to select severals values for search
Download:
http://myvisualdatabase.com/download/se … 20beta.zip