c++builder - Define and build lapsed timer -

-

in delphi, understand how build lapsing timer. not sure how write code c++builder. not find example.

in delphi wrote code below, copy source somewhere:-

.... type   tframe2 = class(tframe) statusbar1: tstatusbar; timer1: ttimer;  constructor tframe2.create(theowner: tcomponent);  begin    inherited create(theowner);    starttime := now;    timer1.enabled := true;  end;  destructor tframe2.destroy;  begin    inherited destroy  end;  procedure tframe2.timer1timer(sender: tobject);//this event occurs every second. var hour, min, sec, msec : word; diff : ttime;  begin timer1.enabled := false; diff := - starttime; decodetime(diff, hour, min, sec, msec); statusbar1.panels.items[1].text := inttostr(min)+' minutes, '+inttostr(sec)+' seconds.'; timer1.enabled := true; end;  ...

please kindly how same in c++. thanks

try this:

.... class tframe2 : public tframe { __published:     tstatusbar *statusbar1;     ttimer *timer1;     ...     void __fastcall timer1timer(tobject *sender);     ... private:     tdatetime starttime;     ... public:     __fastcall tframe2(tcomponent *theowner); };  __fastcall tframe2::tframe2(tcomponent *theowner)     : tframe(theowner) {     starttime = now();     timer1->enabled = true; }  void __fastcall tframe2::timer1timer(tobject *sender) //this event occurs every second. {     timer1->enabled = false;      tdatetime diff = now() - starttime;     word hour, min, sec, msec;     decodetime(diff, hour, min, sec, msec);     statusbar1->panels->items[1]->text = string(min)+" minutes, "+string(sec)+" seconds.";      timer1->enabled = true; }  ...

alternatively, can simplify timer1timer() this:

void __fastcall tframe2::timer1timer(tobject *sender) //this event occurs every second. {     // not overhead-intense code,     // stopping , re-starting timer     // wasting unnecessary processing time...      //timer1->enabled = true;      tdatetime diff = now() - starttime;     statusbar1->panels->items[1]->text = diff.formatstring("n' minutes, 's' seconds.'");      //timer1->enabled = true; }

personally, not use system clock @ all, in case user changes clock, or auto-rolls dst, while timer running. use cpu ticks instead, either manually:

.... class tframe2 : public tframe { __published:     tstatusbar *statusbar1;     ttimer *timer1;     ...     void __fastcall timer1timer(tobject *sender);     ... private:     dword starttime;     ... public:     __fastcall tframe2(tcomponent *theowner); };  __fastcall tframe2::tframe2(tcomponent *theowner)     : tframe(theowner) {     starttime = gettickcount();     timer1->enabled = true; }  void __fastcall tframe2::timer1timer(tobject *sender) //this event occurs every second. {     //timer1->enabled = false;      dword diff = gettickcount() - starttime;     dword mins = diff / 60000; diff %= 60000;     dword secs = diff / 1000;      statusbar1->panels->items[1]->text = string(mins)+" minutes, "+string(secs)+" seconds.";      //timer1->enabled = true; }  ...

or via tstopwatch:

#include <system.diagnostics.hpp>  .... class tframe2 : public tframe { __published:     tstatusbar *statusbar1;     ttimer *timer1;     ...     void __fastcall timer1timer(tobject *sender);     ... private:     tstopwatch sw;     ... public:     __fastcall tframe2(tcomponent *theowner); };  __fastcall tframe2::tframe2(tcomponent *theowner)     : tframe(theowner) {     sw = tstopwatch::startnew();     timer1->enabled = true; }  void __fastcall tframe2::timer1timer(tobject *sender) //this event occurs every second. {     //timer1->enabled = false;     sw.stop();      ttimespan ts = sw.elapsed;     statusbar1->panels->items[1]->text = string(ts.minutes)+" minutes, "+string(ts.seconds)+" seconds.";      sw.start();     //timer1->enabled = true; }

Comments

Post a Comment

Popular posts from this blog

python - How to create jsonb index using GIN on SQLAlchemy? -

-
here's current code creating index jsonb. index("mytable_data_idx_id_key", mytable.data['id'].astext, postgresql_using='gin') but got error. sqlalchemy.exc.programmingerror: (psycopg2.programmingerror) data type text has no default operator class access method "gin" hint: must specify operator class index or define default operator class data type. [sql: "create index event_data_idx_id_key on event using gin ((data ->> 'id'))"] is there way create index on sqlalchemy? the postgresql specific sqlalchemy docs @ http://docs.sqlalchemy.org/en/latest/dialects/postgresql.html#operator-classes mention postgresql_ops dictionary provide "operator class" used postgresql, , provide example illustrating use: index('my_index', my_table.c.id, my_table.c.data, postgresql_ops={ 'data': 'text_pattern_ops', ...
Read more

PHP DOM loadHTML() method unusual warning -

-
i had following code works fine on localhost: $document = new domdocument(); $document->loadhtml($p_result); $form = $document->getelementsbytagname('form')->item(0); // code continues using $form variable after same code updated on outside server, loadhtml() failed , issued warning. warning: domdocument::loadhtml() expects parameter 1 valid path, string given in path/name/to/script.php returned null instead of object code pretty gets fatal error. note contents of $p_result absolutely same on outside server , on localhost. but why displays kind of warning , why not work? doesn't loadhtml() expects argument 1 string in first place? why method expects parameter 1 valid path ? just make clear i'm not calling loadhtmlfile() , i'm calling loadhtml() . thanks. you're affected one of php bugs . issue present in php 5.6.8 , 5.6.9. have affected php version on server, , bug-free version on localhost. the bug forbids null ...
Read more

c# - TransactionScope not rolling back although no complete() is called -

-
i'm using transactionscope rollback transaction fail bool errorreported = false; action<importerrorlog> newerrorcallback = e => { errorreported = true; errorcallback(e); }; using (var transaction = new transactionscope()) { foreach (importtaskdefinition task in taskdefinition) { loader.load(streamfile, newerrorcallback, task.destinationtable, processingtaskid); } if (!errorreported) transaction.complete(); } i'm sure there no transactionscope started ahead or after code. i'm using entity framework insert in db. regardless state of errorreported transaction never rolled in case of error. what missing ? transactionscope sets transaction.current . that's does. wants transacted must @ property. i believe ef each time connection opened reason. probably, connection open when scope installed. open connection inside of scope or enlist manually. ef has nasty "design decision": default opens ...
Read more