Topic: World Database From MySQL Basic
World Database from MySQL Convert To SqLite
Compile MVD 1.52
You Can Download For Example Easy Start...
world_db.7z
-Basic 3 Table
Master Table : Country
Detail Table 1 : City
Detail Table 2 : Country Language
-Basic Script
Show Message
Grid Color When Column Set value
//start script
//script 001 show message even form show
procedure frm_001_main_OnShow (Sender: string; Action: string);
begin
showmessage('Hello World! Basic Example')
end;
//script 002 grid color highlight if Country Language Is Official ='T' At frm_001_main
procedure frm_001_main_TableGrid1_OnChange (Sender: string);
var
i,c: integer;
k,q: integer;
begin
c := frm_001_main.TableGrid1.RowCount - 1;
q := frm_001_main.TableGrid1.Columns.Count - 1;
for i := 0 to c do
begin
if frm_001_main.TableGrid1.Cells[19,i] ='T' then
for k := 0 to q do frm_001_main.TableGrid1.Cell[k,i].Color := $507FFF ;
end;
end;
//script 003 grid color highlight if Country Language Is Official ='T' At frm_002_country
procedure frm_002_country_TableGrid2_OnChange (Sender: string);
var
i,c: integer;
k,q: integer;
begin
c := frm_002_country.TableGrid2.RowCount - 1;
q := frm_002_country.TableGrid2.Columns.Count - 1;
for i := 0 to c do
begin
if frm_002_country.TableGrid2.Cells[3,i] ='T' then
for k := 0 to q do frm_002_country.TableGrid2.Cell[k,i].Color := $507FFF ;
end;
end;
//script last can not delete
begin
end.
Form Preview Effect
-Basic Report Design
-Basic Print All And Print Select At Mouse in TableGrid
Thank You
-Dmitry. For More Example And More People In This Forum
Comming Soon
-Report Design Master Detail
-Function In Database
Cal Date Year,Month,Date or Number Day
Concat String Columa+ColumnB Or More
Substring In Text,Date
Script Update Database By Script SQL Resize ,Index ETC
Easy For Beginner Student For Me