i suggest use lazarus
it can Intelligent bring out
--
Sent from: http://mseide-msegui-talk.13964.n8.nabble.com/
___
mseide-msegui-talk mailing list
mseide-msegui-talk@lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/mseide-m
grid.rowhidden[aindex]
--
Sent from: http://mseide-msegui-talk.13964.n8.nabble.com/
___
mseide-msegui-talk mailing list
mseide-msegui-talk@lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/mseide-msegui-talk
python for delphi
only for delphi
if have python for mse , it whill nice
--
Sent from: http://mseide-msegui-talk.13964.n8.nabble.com/
___
mseide-msegui-talk mailing list
mseide-msegui-talk@lists.sourceforge.net
https://lists.sourceforge
Probably because classes.registerclass*() instead of mclasses.registerclass*()
has been called in PS-Library.
Martin
got
i forget add "mclasses" in this unit
--
Open source business process management suite built
add mclasses then
FPP.Defines.Assign(FDefines);
uPSComponent.pas(593,32) Error: Incompatible type for arg no. 1: Got
"tstrings", expected "TPersistent"
can i
FPP.Defines.Assign(TPersistent(FDefines));
1
yes i add mclasses in another unit
then
FPP.Defines.Assi
add mclasses then
FPP.Defines.Assign(FDefines);
uPSComponent.pas(593,32) Error: Incompatible type for arg no. 1: Got
"tstrings", expected "TPersistent"
can i
FPP.Defines.Assign(TPersistent(FDefines));
1
i add
FPP.Defines.Assign(classes.TPersistent(FDefines));
then
> Add "mclasses" after "classes" in "uses" of "TPSScript" unit. See README.TXT:
> "
> * 2.8.6 -> 3.0:
> * MSEgui now has own implementations for "classes" and "db" units.
> * FPC has no support for unit alias
> * http://www.mail-archive.com/fpc-pascal%40lists.freepascal.org/msg31117.html
> * Please
> psexec: TPSScript ;
> begin
>
> psexec:= TPSScript.Create(self) ;
Free Pascal Compiler version 2.6.4 [2014/03/06] for i386
Copyright (c) 1993-2014 by Florian Klaempfl and others
Target OS: Win32 for i386
main.pas(44,33) Error: Incompatible type for arg no. 1: Got "tmainfo",
expected "TCom
Twidgetgridbs = class(tcustomwidgetgrid)
public
constructor Create(AOwner: tcomponent);override;
end;
constructor Twidgetgridbs.create(aowner:tcomponent);
begin
inherited;
.
end;
Error: There is no method in an ancestor class to be overridden:
"constructor Twidgetgridbs.Create(TComponent);"
7.2.0-alfa
--
The best possible search technologies are now affordable for all companies.
Download your FREE open source Enterprise Search Engine today!
Our experts will assist you in its installation for $59/mo, no com
E:\update\mseide-mseguig\lib\common\db\msezeos.pas(46,14) Error: There
is no method in an ancestor class to be overridden:
"tmsezreadonlyquery.getfieldclass(TFieldType):Class Of TField;"
E:\update\mseide-mseguig\lib\common\db\msezeos.pas(47,14) Error: There
is no method in an ancestor class to be
i have done
but still error
--
Precog is a next-generation analytics platform capable of advanced
analytics on semi-structured data. The platform includes APIs for building
apps and a phenomenal toolset for data science.
Script.LoadFromStream(strout);
Error: Incompatible type for arg no. 1: Got "tmemorystream", expected
"TStream"
psexec:= TPSScript.Create(self);
Error: Incompatible type for arg no. 1: Got "Twarehouse", expected
"TComponent"
why ?
-
>>>
>>> Martin
>>
>> a login form
>>
> There is a main form in iconic state and a visible login form and if the user
> clicks on the window icon the windowmanager should not show the main form,
> correct? Linux or Windows?
>
yes windows
---
> The window manager probably shows a form if the taskbar icon has been clicked.
> Which modal form?
>
> Martin
>
a login form
--
Don't let slow site performance ruin your business. Deploy New Relic APM
Deploy New Reli
> On Tuesday 25 September 2012 15:38:14 liuzg2 wrote:
>>> On designtime disable form.options fo_main, set form.visible to false.
>>
>> do it well
>> but can not see application icon in taskbar
>>
> .window.windowpos:= wp_minimized;
>
> Martin
when
>
> Please try again with git master c8f760f55b17f0104d4a6da3a0d2baacee4ce05e and
> report if it is OK now.
>
> Martin
that is ok
--
Don't let slow site performance ruin your business. Deploy New Relic APM
Deploy New R
when i only create a form like this ,this form show Immediately ,why?
var
xf:tintffo;
xx:tbaseffo;
begin
xf:=tintffo.create(nil,true);
xx:=tbaseffo.create(self);
--
Got visibility?
Most devs has no idea what their pro
> On designtime disable form.options fo_main, set form.visible to false.
do it well
but can not see application icon in taskbar
--
Live Security Virtual Conference
Exclusive live event will cover all the ways today's s
try if BCDToCurr(do1,cu1) then
Move(cu1, buffer1^, SizeOf(cu1))
except
end;
end;
i do not know is it right.
--
Live Security Virtual Conference
Exclusive live event will cover all the ways today's se
found a address
http://social.msdn.microsoft.com/Forums/nb-NO/transactsql/thread/a3550c1a-7203-4c2b-ae1b-a50dc8952d18
may be do a check first
--
Live Security Virtual Conference
Exclusive live event will cover all the
freepascal 2.6
unit odbcconn;
function TODBCConnection.LoadField(cursor: TSQLCursor; FieldDef:
TFieldDef; buffer: pointer; out CreateBlob : boolean): boolean;
{$ELSE}
function TODBCConnection.LoadField(cursor: TSQLCursor; FieldDef:
TFieldDef; buffer: pointer):boolean;
{$ENDIF}
var
ODBCCur
lazarus +fpc 2.6 it is ok
so it is not ODBC driver bug
--
Live Security Virtual Conference
Exclusive live event will cover all the ways today's security and
threat landscape has changed and how IT managers can respond. D
于 2012-08-08 14:18, Martin Schreiber 写道:
> Am 08.08.2012 07:01, schrieb liuzg2:
>>
>>> On Wednesday 08 August 2012 03:18:40 liuzg2 wrote:
>>>>> On Tuesday 07 August 2012 10:51:32 liuzg2 wrote:
>>>>>> ftbcd: begin
>>>>>>
> On Wednesday 08 August 2012 03:18:40 liuzg2 wrote:
>>> On Tuesday 07 August 2012 10:51:32 liuzg2 wrote:
>>>> ftbcd: begin
>>>>Res:=SQLGetData(ODBCCursor.FSTMTHandle, fno, SQL_C_DOUBLE, @do1,
>>>> SizeOf(Doubl
> On Tuesday 07 August 2012 10:51:32 liuzg2 wrote:
>>
>>
>> ftbcd: begin
>> Res:=SQLGetData(ODBCCursor.FSTMTHandle, fno, SQL_C_DOUBLE, @do1,
>>SizeOf(Double), @StrLenOrInd);
>>
>> >>>cu1:= do1;
>&g
于 2012-08-07 15:40, Martin Schreiber 写道:
> On Tuesday 07 August 2012 08:27:10 liuzg2 wrote:
>>>> EInvalidOp : Invalid floating point operation
>>>> $0073C9A0 TODBCCONNECTION__LOADFIELD, line 1580 of
>>>> H:/update/mseide-msegui/lib/common/db/modbcconn
>>
>>
>> EInvalidOp : Invalid floating point operation
>>$0073C9A0 TODBCCONNECTION__LOADFIELD, line 1580 of
>> H:/update/mseide-msegui/lib/common/db/modbcconn.pas
>
> Which MSEgui version? Line 1580 is not in loadfield(). Please send a simple
> testcase.
>
> Martin
>
2.9 unstable freepasca
I open a table with tmsesqlquery. but open it with lazarus ok.
what wrong
Invalid floating point operation
An exception occurred at $0073C9A0 :
EInvalidOp : Invalid floating point operation
$0073C9A0 TODBCCONNECTION__LOADFIELD, line 1580 of
H:/update/mseide-msegui/lib/common/db/modbcconn.p
and i think it is freepascal odbc bug too! please send it if it is a bug
--
Better than sec? Nothing is better than sec when it comes to
monitoring Big Data applications. Try Boundary one-second
resolution app monito
this is the source i changed modbcconn.pas
line 323
MessageText:array[0..SQL_MAX_MESSAGE_LENGTH]of char;
SqlState,TotalMessage:string; RecNumber :SQLSMALLINT; begin // check
result if ODBCSucces(LastReturnCode) then begin Exit; // no error;
all is ok end; // build TotalMessag
then return error message from odbcconnect was trunck
the message now is
Could not execute statement. ODBC error details: Record 1: SqlState:
23000; NativeError: 2627; Message: [Microsoft][ODBC SQL Server
Driver][SQL Server]违反了 PRIMARY KEY 约束 'PK_SNAKE_USER'。不能在对象
'dbo.SNAKE_US; Record 2: SqlSt
--
This SF email is sponsosred by:
Try Windows Azure free for 90 days Click Here
http://p.sf.net/sfu/sfd2d-msazure
___
mseide-msegui-talk mailing list
mseide-msegui-talk@lists.
when og_mousescrollcol and only one colthen select a row,then mouse left down and move to right scrollbar raise at megrids.pas13436 line outer of index ---21CN手机邮Android客户端,邮件随身享! -
fixrows can not mergecols something changed ---21CN手机邮Android客户端,邮件随身享! --
Virtualization & Cloud Management Using Capacity Planning
Cloud computing makes use of virtualization -
got
datacols.delete(i)---21CN手机邮Android客户端,邮件随身享! --
Virtualization & Cloud Management Using Capacity Planning
Cloud computing makes use of virtualization - but cloud computing
also
how to delete a col with code
i use the destroy
but fales
---21CN手机邮Android客户端,邮件随身享! --
Virtualization & Cloud Management Using Capacity Planning
Cloud computing makes
>>
>> when i set ttreeitemedit.itemlist.imagewidth>0
>> all other ttreelistedititem not set [imagenr] draw a empty
>>
> Already fixed in git master d7c0daee4f1e54f2ec2401ce2db409ec9acb76b9, no?
>
> Martin
yes fixed
--
i set like this
with ttreeitemedit1 do begin
itemlist.beginupdate;
root:=ttreelistedititem.Create;
root.caption:='fdgfd';
itemlist.add(root);
root.expanded:=true;
cd:=ttreelistedititem.Create;
cd.imagelist:= timagelist1;
cd.imagenr:=26;
cd.caption:='fdgfd';
root.add(cd);
itemlis
> I want to set the widgts.optionsedit [oe_readonly] in program code.
>
> But I cannot find where it is defined to include it on the uses statement.
>
> Where are the optionsedits defined?
>
>
copy and find from source
mseeditglob
---
> Martin Schreiber wrote:
>
>>>
>>> when set ttreeitemedit.itemlist.imagewidth =15
>>> then see bjpg.png
>>
>> Please send your testcase.
>>
> Got it, another regression. You are a really good tester. ;-)
> I'll fix it ASAP.
>
> Martin
>
your are a good programer.
but only one not a group
;
var root,cd: ttreelistedititem;
begin
with ttreeitemedit1 do begin
itemlist.beginupdate;
root:=ttreelistedititem.Create;
root.caption:='fdgfd';
itemlist.add(root);
root.expanded:=true;
cd:=ttreelistedititem.Create;
cd.imagelist:= timagelist1;
cd.imagenr:=26;
cd.caption:='fdgfd';
root.add(cd);
> On Friday, 10. February 2012 08.17:13 liuzg2 wrote:
>> tdropdownwidgetcontroller
>> tdirdropdownedit
>> tcalendardatetimeedit
>>
>> it must close dropdown without select use key [esc]
>> and tdropdownlistcontroller can close dropdown without select
&g
tdropdownwidgetcontroller
tdirdropdownedit
tcalendardatetimeedit
it must close dropdown without select use key [esc]
and tdropdownlistcontroller can close dropdown without select
use mouseclick other component or main form.
mssql 2005 winxp
i write a sql connect with odbc
in mssqlerver manager studio ,it return ok;
i put the sql into tmsequery,and active in mseide.
sometimes display invalid floating point operation
sometimes not .
why ?.may be need disables FPU exceptions (Set8087CW($133f);)
or other?
odbc bug?
>>> On Tuesday, 31. January 2012 03.59:46 liuzg2 wrote:
>>>> filedialog button should click when filenameedit is
>>>> readonly.
>>>> not can chang edit.value only .
>>>>
>>>>
>>>> i user a dialogstringedit(show a m
于 2012-01-31 14:17, Martin Schreiber 写道:
> On Tuesday, 31. January 2012 03.59:46 liuzg2 wrote:
>>
>> filedialog button should click when filenameedit is
>> readonly.
>> not can chang edit.value only .
>>
>>
>> i user a dialogstringedit(show a memoedi
于 2012-01-25 18:22, Martin Schreiber 写道:
> On Wednesday, 25. January 2012 08.45:59 liuzg2 wrote:
>> i create tfilenameedit into a twidgetgrid
>>
>> var xx:tfilenameedit;
>> begin
>> xx:=tfilenameedit.create(self);
>>
>> twidgetgrid1.datacols[0].ed
> On Sunday, 29. January 2012 14.19:41 liuzg2 wrote:
>> function TODBCConnection.RowsAffected(cursor: TSQLCursor): TRowsCount;
>> var
>> RowCount: SQLINTEGER;
>> begin
>> if assigned(cursor) then
>> if ODBCSucces( SQLRowCount((cursor as TODBCC
function TODBCConnection.RowsAffected(cursor: TSQLCursor): TRowsCount;
var
RowCount: SQLINTEGER;
begin
if assigned(cursor) then
if ODBCSucces( SQLRowCount((cursor as TODBCCursor).FSTMTHandle,
RowCount) ) then
Result:=RowCount
else
Result:=-1
else
Result:=-1;
can you add odbc 's rowsreturned and rowsaffected
--
Try before you buy = See our experts in action!
The most comprehensive online learning library for Microsoft developers
is just $99.99! Visual Studio, SharePoint,
var chagefor:tcolrowchangfo;
i:integer;
wid:twidget;
begin
wid:=nil;
for i:=0 to self.childrencount-1 do
begin
if self.children[i].Name='colrowchangfo'
then
wid:= self.children[i];
end;
if wid<> nil then tcolrowchangfo(wid).Free;
chagefor:=tcolrowchangfo.cr
happy new year for every body
--
Keep Your Developer Skills Current with LearnDevNow!
The most comprehensive online learning library for Microsoft developers
is just $99.99! Visual Studio, SharePoint, SQL - plus HTML5, CS
i create tfilenameedit into a twidgetgrid
var xx:tfilenameedit;
begin
xx:=tfilenameedit.create(self);
twidgetgrid1.datacols[0].editwidget:=xx;
twidgetgrid1.datacols[0].readonly:=true;
it can not input char
but filedialog still can exe;
if set it readonly in designtime ,all is ok.
---
>> esqlist3 error langcon no sunch table :caotions
> We tested in Windows and in all windows are OK. I think that is caused
> by libsqlite3.dll did not called successfully. I use sqlite3 to save
> all constant string to translate language. Do you use Windows Chinese
> version? 64bit or 32bit?
esqlist3 error langcon no sunch table :caotions
--
RSA(R) Conference 2012
Mar 27 - Feb 2
Save $400 by Jan. 27
Register now!
http://p.sf.net/sfu/rsa-sfdev2dev2
___
mseide-mseg
i download the win demo
can install
but can not open when open then main application.
--
RSA(R) Conference 2012
Mar 27 - Feb 2
Save $400 by Jan. 27
Register now!
http://p.sf.net/sfu/rsa-sfdev2dev2
__
i create agrid myself
and
agrid.datacols.count:=6;
for i:=0 to agrid.datacols.count-1
do
begin
agrid.datacols[i].editwidget:=tstringedit.create(self)
end;
and when i set
agrid.datacols.count:=0;
the six editwidget free or
i must free myself?
-
i create agrid myself
and
agrid.datacols.count:=6;
for i:=0 to agrid.datacols.count-1
do
begin
agrid.datacols[i].editwidget:=tstringedit.create(self)
end;
and when i set
agrid.datacols.count:=0;
the six editwidget free or
i must free myself?
-
not use linux recently.in linux ,chinese have owner font .you must download yourself
---21CN手机邮Android客户端,邮件随身享! --
Ridiculously easy VDI. With Citrix VDI-in-a-Box, you do
can not connect youtube in china>> Please provide the YouTube link since there're a lot of entries of>> different persons from this festival.> > Upps! Sorry it's copied from facebook. I forgot to copy link, here it is :> > http://www.youtube.com/watch?v=Yg1HqAeXpww>
---
when kind is dtk_time
hh:mm:ss can not see ss
--
Ridiculously easy VDI. With Citrix VDI-in-a-Box, you don't need a complex
infrastructure or vast IT resources to deliver seamless, secure access to
virtual desktops. With
>>
> tsqlresult is not scrollable and has a buffer for the current record only.
> cols[0] is the first field, cols[1] the second field and so on.
> tsqlresult.next loads the next record. tmsesqlquery is scrollable and has
> buffers for all records of the resultset.
>
finaly i go back to tmsesql
> > > ok !> but found another bug . (odbcdatabase )> when fisrt get> tsqlresult1.cols[0].asinteger result ok> then> next> tsqlresult1.cols[0].asinteger> tsqlresult1.cols[0].asinteger> tsqlresult1.cols[0].asinteger> ...> result =484808> > and same for> tsqlresult1.cols[i].asstring> >
>>
>> update from git master before .that is ok (firebird)
>>
> Please try again with git master c056c3403af6cf8b13094ceea1e861d7ebffeadb.
>
> Martin
ok !
but found another bug . (odbcdatabase )
when fisrt get
tsqlresult1.cols[0].asintegerresult ok
then
next
tsqlresult1.cols[0].asinteg
>
>
>
> after update git master
> recompile source,that is ok.
>asstring get Garbled
>asmsestring get error message 'invalid type cast .'
>
> database firebird ( character set utf8.)
>
found
i set database(firebird) and sqlresult option dbo_utf8 already
but i mu
>
>> git master c71ff06d7752ab8b3a62333ee90c28460d957aa0 has support for
>> ftwidestring in tsqlresult, please test.
>>
>> Martin
>
> i test in home , not ftwidestring.
> get error in msesqlresult
>995 row setlength(result,int1);
>
> not test ftwidestring
>
after update git master
> git master c71ff06d7752ab8b3a62333ee90c28460d957aa0 has support for
> ftwidestring in tsqlresult, please test.
>
> Martin
i test in home , not ftwidestring.
get error in msesqlresult
995 row setlength(result,int1);
not test ftwidestring
-
codepage 936 tsqlresult1.dbcols[0].asstring --- result a Error string tsqlresult1.dbcols[0].asmsestring --- result a Error string and tmsesqlquery1.fields[0].asstring --result a Correct sring. and tmsesqlquery1.fields[0].aswidestring --result a Correct sring.
yes same odbcco
only tsqlresult error
--
Ridiculously easy VDI. With Citrix VDI-in-a-Box, you don't need a complex
infrastructure or vast IT resources to deliver seamless, secure access to
virtual desktops. With this all-in-one soluti
ftWideString
---卡巴斯基,价值非凡的安全保护 --
Ridiculously easy VDI. With Citrix VDI-in-a-Box, you don't need a complex
infrastructure or vast IT resources to deliver seamless, secure
codepage 936 tsqlresult1.dbcols[0].asstring --- result a Error string tsqlresult1.dbcols[0].asmsestring --- result a Error string and tmsesqlquery1.fields[0].asstring --result a Correct sring. and tmsesqlquery1.fields[0].aswidestring --result a Correct sring.
--
i connect then mssqlserver use mseodbcconnectand i get a chinese string tsqlresult.dbcols[0].asstring --- result a Error stringtsqlresult.dbcols[0].asmsestring --- result a Error stringand tsqlresult.fields[0].asstring --result a Correct sring.and tsqlresult.fields[0].aswidestring
于 2011/12/26 14:51, Martin Schreiber 写道:
> On 12/26/2011 01:21 AM, liuzg2 wrote:
>> my app use the font name:='stf_roman' charset:='GB2312'
>>but when catch error or showmessage()
>> it looks not like use my app font.
>>
> How do you set the f
my app use the font name:='stf_roman' charset:='GB2312'
but when catch error or showmessage()
it looks not like use my app font.
<><>--
Write once. Port to many.
Get the SDK and tools to simplify cross-platform app develo
> i set this
> iscellclick(info,[ccr_buttonpress],[ss_ctrl])
> but it trigger when no ctrl pressed
>
>
found
if iscellclick(info,[ccr_buttonpress],[ss_ctrl])
then
if info.mouseeventinfopo^.shiftstate*[ss_ctrl] =[ss_ctrl]
---
i set this
iscellclick(info,[ccr_buttonpress],[ss_ctrl])
but it trigger when no ctrl pressed
--
Write once. Port to many.
Get the SDK and tools to simplify cross-platform app development. Create
new or port existing ap
got it
.datacols[n].options co_nohscroll
[n] should begin from 0 not 1 or 2 or ...
--
Learn Windows Azure Live! Tuesday, Dec 13, 2011
Microsoft is holding a special Learn Windows Azure training event for
developers.
>> i have 5 col in a twidgetgrid
>> how to froze the first 2 col
>> or how to froze the last 2 col .
>>
> What do you mean with freeze? In order to inhibit horizontal scrolling
> activate.datacols[n].options co_nohscroll.
> In order to show fix cols on the right of the grid set
> .fixcols.oppo
79 matches
Mail list logo