Thx for your answer,
Is this option planed?
or
Can I map external .dll for this purpose?
Thx,
Krokodil,
My Visual Database → Posts by krokodil_sk
Thx for your answer,
Is this option planed?
or
Can I map external .dll for this purpose?
Thx,
Krokodil,
Hi mr.Dimitry,
This work only on port = 110?
With SSL/TLS on port 995 not working ?
Thx,
Brgds,
Krokodil
Hi,
1.
Button action = Report
After i set report file *.fr3 and open in excel.
How can i change the general cell format to some date format ,in openned file?
I cant find nothing from fastreport about that.
2.
Export ,with button or script, to Excel Sheet2?
It is possible?
Thx,
Dmitry,
project already sent.
Brgds,
Krokodil
Dear Dimitry,
I found one bug.
After use MVD 3.02 alpha.
MVD returned error please view attachment.
This error show after click on button.
When i use MVD 2.8 no error show and anything work OK.
I use MYSQL.
If you want i can send my project.
This ComMatrixOsoby.commatrixosoby_emergency have type BOOLEAN not INTEGER what you see in error.
Recreating the database not help.
Bgrds,
Krokodil
Dear Dimitry,
GetComputerName working OK ,sorry for vexation.
My fault.
You can delete this 5 posts from "What to implement first?".
Brgds,
Krokodil
I mean create :
Script
Functions → System → GetComputerName : string
Brgds,
Krokodil
Hello Dmitry,
i think GetComputerName function need everybody with login form.
Brgds,
Krokodil
Great Dimitry,
working.
Thx,
Krokodil
1. Attached example project
2. Working , THX
Bgrd,
Krokodil
Hi anybody,
can you please help me :
procedure FmReport_BtTest_OnClick (Sender: string; var Cancel: boolean);
var
frxDBDataset1, : TfrxDBDataset;
report : TDataSet;
begin
SQLQuery('SELECT xy from xy where xy');
frxDBDataset1 := TfrxDBDataset.Create(Form1);
frxDBDataset1.UserName := 'report';
frxDBDataset1.CloseDataSource := True;
frxDBDataset1.OpenDataSource := True;
frxDBDataset1.DataSet := report;
Form1.frxReport.Clear;
Form1.frxReport.DataSets.Clear;
Form1.frxReport.DataSets.Add(frxDBDataset1);
// DESIGN MODE - WORKING OK
// Form1.frxReport.LoadFromFile(ExtractFilePath(Application.ExeName)+'Report\test.fr3');
// Form1.frxReport.DesignReport;
// OPEN REPORT IN Excel NOT WORKING
Form1.frxReport.LoadFromFile(ExtractFilePath(Application.ExeName)+'Report\test.fr3');
Form1.frxReport.PrepareReport();
Form1.frxRTFExport1.FileName := ChangeFileExt(GetTempFileName,'.xlsx');
Form1.frxRTFExport1.ShowDialog := False;
Form1.frxReport.Export(Form1.frxRTFexport1);
// PREVIEW MODE - WORKING OK
// frxDBDataset1.DataSet.Close;
// Form1.frxReport.LoadFromFile(ExtractFilePath(Application.ExeName)+'Report\test.fr3');
// Form1.frxReport.ShowReport;
frxDBDataset1.Free;
end;
1.OPEN REPORT IN Excel NOT WORKING i dont know why error message is:
"Excel cant open the file xy.xlsx becouse file format or its extension is invalid"
Please where is the problem ?
In the forum a find only open in PDF..
2.And the another question:
When the SQLQuery is too long. How can i write him on more rows ?
Thx,
Krokodil
I already make it :
this is the solution:
SELECT a.id
FROM (SUBQUERY 1) a
JOIN (SUBQUERY 2) b
ON b.id = a.id
JOIN (SUBQUERY 3) c
ON c.id = a.id
JOIN (SUBQUERY 4) d
ON d.id = a.id;
Brgds,
Krokodil
Hi anybody,
Please can you help where is the problem.
MYSQL
Select NameList_name from NameList where NameList.id In
(Select NameList.id from NameList where id_company =
(Select company.id From company where company_company Like "XY"))
And
(Select id_NameList from NameListGoods where id_NameListGoodsKind =
(Select NameListGoodsKind.id from NameListGoodsKind where NameListGoodsKind_NameListGoodsKind LIKE "XX"))
And
(Select id_NameList from NameListStateFrom where id_StateFrom =
(Select StateFrom.id from StateFrom where StateFrom_state Like "XXX"))
And
(Select id_NameList from NameListStateTo where id_StateTo =
( Select StateTo.id from StateTo where StateTo_state Like "XYX"));
This returned me ""SQL Server Subquery returned more than 1 value""
I want to search in:
Select NameList_name from NameList where NameList.id
The right NameList.id penetrance
what is returned from others subquery.
Example:
Table Namelist:
ID Name
1 a
2 b
3 c
4 d
5 e
subquery1 :
(Select NameList.id from NameList where id_company =
(Select company.id From company where company_company Like "XY"))
Return me : numbers : 1,4,5
subquery2 :
(Select id_NameList from NameListGoods where id_NameListGoodsKind =
(Select NameListGoodsKind.id from NameListGoodsKind where NameListGoodsKind_NameListGoodsKind LIKE "XX"))
Return me : numbers 2,4,3
subquery3 :
(Select id_NameList from NameListStateFrom where id_StateFrom =
(Select StateFrom.id from StateFrom where StateFrom_state Like "XXX"))
Return me : numbers 3,4,1
subquery4 :
(Select id_NameList from NameListStateTo where id_StateTo =
( Select StateTo.id from StateTo where StateTo_state Like "XYX"));
Return me : numbers 5,4,2,1
Head Query
Penetrance from this results is number 4.Then i need to show me the Name from Namelist where Namelist.id=4;
Thx for help,
DriveSoft
Thx for you answer but
if i use
Form1.TableGrid1.Cell[x,y].FontStyle := fsUnderline;
Version MVD = 2,8 beta
Still i have a error :
Undeclared indentifier : FontStyle
K.
Yes clGreen working that same as clRed but clHotLight not working.
and
Form1.TableGrid1.Cell[0,i].TextStyle := fsUnderline;
Not exist
Thx,
K.
Hi ,
Please can you help me ?
1.Grid fsUnderline with Cell[x,c]
Work:
FmPrepravcaPrihlasenia.TgPrihlasenia.Cell[4,c].TextColor := clred;
FmPrepravcaPrihlasenia.TgPrihlasenia.Columns[4].Cursor := crHandPoint;
Dont work :
FmPrepravcaPrihlasenia.TgPrihlasenia.Cell[4,c].TextColor := clHotLight;
FmPrepravcaPrihlasenia.TgPrihlasenia.Cell[3,c].Font.Style := fsUnderline;
FmPrepravcaPrihlasenia.TgPrihlasenia.Cell[3,c].TextStyle := fsUnderline;
What is the syntax for Cell[3,c].TextStyle := fsUnderline; and TextColor := clHotLight ??
2."Mailto" CC or BCC
If i use "mailto" can i send email to CC or BCC ?
Thx, for you ansfers
Krokodil
Thx for quick answer,
is there some another method to automatical send mail to 7 people ?
Maybe i don't recommend to send him as CC or BCC.
Just to: ?
Or send mail with default email software?
Thx,
K.
Hi,
Is possible to send email with sendmail to CC or to BCC ?
Thx,
K.
Hi,
can you please help me ?
1. Load table grid from database by script - That is OK BUT ...
2. How I can to rewrite-change, grid values in table grid , by keyboard? Then save it,like save record ’’save table grid as object’’ with one button
Thx for tips,
Krokodil
Hi,
this is my project.
Already not finished....
About : 22 019 lines and more then 80 forms.
K.
Great works fine.
Thx,
Hi,
i need some little help.
I dont know why my mysql calculate field returns my always = ' ' nothing
here is my code:
Concat(
(
SELECT Class.Class_Class FROM Class WHERE Class.id = id_Class
)
,(COALESCE(employees.lastname,'')), ' - ' , (COALESCE(employees.firstname,'')),
(
SELECT school. school_ school FROM school WHERE school.id = id_ school
))
When the id_Class or the id_school is not set on save form to databaze ' employees ' .Concat returing me empty cell.
Thx,
K.
Thx,
working,
begin
frmEmployee.Button1.Cancel := False;
end.
BRgds,
K.
Please and how i can disable the ESC button to close form on all forms ?
Thx
My Visual Database → Posts by krokodil_sk
Powered by PunBB, supported by Informer Technologies, Inc.
Theme Hydrogen by Kushi