Search options (Page 1 of 2)

Is this code (based on previous Derek's suggestion, correct?

procedure Form1_OnShow (Sender: TObject; Action: string);
begin
  if formatdatetime('yyyy-mm-dd',now) >= '2020-10-05' then
  begin
  form1.tablegrid1.visible := false;
  form1.button1.enabled := false;
 form2.show;
 end else
  begin
      form1.tablegrid1.visible := true;
      form1.button1.enabled := true;
      form2.Hide
    end;
   end;
begin
end.

Hi, Brian,
I have something similar: an  Access database with several columns and lot of records (rows) and nothing else.
I want to search, add, edit or delete records using MVD.
Can you (or someone else) set a simple example?
Thanks in advance.

I suppose the  Form1.DataTimePicker1_OnChange   event should be used.

 procedure Form1.DataTimePicker1_OnChange (Sender: TObject; var Cancel: boolean);
           begin
    // Need this part of code. If date eg 30.12.2020 is expired, do something  (disable Button1, make invisible the TableGrid1 or open  Form2.
end

Form1.DataTimePicker1 is not visible.
Any help?

Thanks CDR,

How should look like that part of code for DataTimePicker1 ?
Probably in Form1_OnShow event?
Thanks in advance.

Useful tip, Derek,
Can it  be implemented on main form (Form1) to determine form start-position on screen?
Eg, top 0, left 0 or center position or whole screen (depending on screen-size)?

Hi, Derek,
Thanks for your example.
It is very useful.
Just one more thing.
If I click to X button in form1 to delete the highlighted file, this action will delete a file from the database only, not from "files".
What should be added to delete the selected file in "files" at the same time?

Hi, Derek,
Thank you very much.
As always, your explanation is clear and very helpful.
In addition, if I want to make a link to the whole folder containing several things, I should insert it in some zip file first.
Am I correct?
Thanks again.
Regards

I already found it.
URL at Properties.

No.
After CTRL+P only my default printer is open.
It seems to me I should select the report file .fr3 and then select Open in Designer.

Hi, sibprogsistem,
Thank you for solution.