package Ġorg . gui V ista . gui . widget . display Ċ Ċ import Ġg lib 2 . FALSE Ċ import Ġg lib 2 . TRUE Ċ import Ġgtk 3 .* Ċ import Ġkotlinx . c interop . CP o inter Ċ import Ġkotlinx . c interop . reinterpret Ċ import Ġkotlinx . c interop . to K String Ċ import Ġorg . gui V ista . gui . widget . Widget Base Ċ Ċ public Ġactual Ġclass ĠProgress Bar ( progress Bar Ptr : ĠC Pointer < Gtk ProgressBar >? Ġ= Ġnull ) Ġ: ĠWidget Base Ġ{ ĊĠĠĠ Ġoverride Ġval Ġgtk Widget Ptr : ĠC Pointer < Gtk Widget >? Ġ= ĠprogressBar Ptr ?. reinterpret () Ġ?: Ġgtk _ progress _ bar _ new () ĊĠĠĠ Ġpublic Ġval Ġgtk ProgressBar Ptr : ĠC Pointer < Gtk ProgressBar >? ĊĠĠĠĠĠĠĠ Ġget () Ġ= Ġgtk Widget Ptr ?. reinterpret () ĊĠĠĠ Ġpublic Ġactual Ġvar Ġfraction : ĠDouble ĊĠĠĠĠĠĠĠ Ġget () Ġ= Ġgtk _ progress _ bar _ get _ fraction ( gtk ProgressBar Ptr ) ĊĠĠĠĠĠĠĠ Ġset ( value ) Ġ{ ĊĠĠĠĠĠĠĠĠĠĠĠ Ġif Ġ( value Ġin Ġ( 0 . 0 .. 1 . 0 )) Ġgtk _ progress _ bar _ set _ fraction ( gtk ProgressBar Ptr , Ġvalue ) ĊĠĠĠĠĠĠĠ Ġ} ĊĠĠĠ Ġpublic Ġactual Ġvar Ġinverted : ĠBoolean ĊĠĠĠĠĠĠĠ Ġget () Ġ= Ġgtk _ progress _ bar _ get _ inverted ( gtk ProgressBar Ptr ) Ġ== ĠTRUE ĊĠĠĠĠĠĠĠ Ġset ( value ) Ġ= Ġgtk _ progress _ bar _ set _ inverted ( gtk ProgressBar Ptr , Ġif Ġ( value ) ĠTRUE Ġelse ĠFALSE ) ĊĠĠĠ Ġpublic Ġactual Ġvar Ġpulse Step : ĠDouble ĊĠĠĠĠĠĠĠ Ġget () Ġ= Ġgtk _ progress _ bar _ get _ pulse _ step ( gtk ProgressBar Ptr ) ĊĠĠĠĠĠĠĠ Ġset ( value ) Ġ{ ĊĠĠĠĠĠĠĠĠĠĠĠ Ġif Ġ( value Ġin Ġ( 0 . 0 .. 1 . 0 )) Ġgtk _ progress _ bar _ set _ pulse _ step ( gtk ProgressBar Ptr , Ġvalue ) ĊĠĠĠĠĠĠĠ Ġ} ĊĠĠĠ Ġpublic Ġactual Ġvar Ġshow Text : ĠBoolean ĊĠĠĠĠĠĠĠ Ġget () Ġ= Ġgtk _ progress _ bar _ get _ show _ text ( gtk ProgressBar Ptr ) Ġ== ĠTRUE ĊĠĠĠĠĠĠĠ Ġset ( value ) Ġ= Ġgtk _ progress _ bar _ set _ show _ text ( gtk ProgressBar Ptr , Ġif Ġ( value ) ĠTRUE Ġelse ĠFALSE ) ĊĠĠĠ Ġpublic Ġactual Ġvar Ġtext : ĠString ĊĠĠĠĠĠĠĠ Ġget () Ġ= Ġgtk _ progress _ bar _ get _ text ( gtk ProgressBar Ptr )?. to K String () Ġ?: Ġ"" ĊĠĠĠĠĠĠĠ Ġset ( value ) Ġ= Ġgtk _ progress _ bar _ set _ text ( gtk ProgressBar Ptr , Ġvalue ) ĊĊĠĠĠ Ġ/** ĊĠĠĠĠ Ġ* ĠThe Ġpreferred Ġplace Ġto Ġ" el lip size " Ġthe Ġstring , Ġif Ġthe Ġprogress Ġbar Ġdoes Ġnot Ġhave Ġenough Ġroom Ġto Ġdisplay Ġthe ĊĠĠĠĠ Ġ* Ġentire Ġstring , Ġspecified Ġas Ġa ĠP ango El lip size Mode . ĠNote Ġthat Ġsetting Ġthis Ġproperty Ġto Ġa Ġvalue Ġother Ġthan ĊĠĠĠĠ Ġ* ĠP ANG O _ EL LI P SIZE _ NONE Ġhas Ġthe Ġside - effect Ġthat Ġthe Ġprogress Ġbar Ġrequests Ġonly Ġenough Ġspace Ġto Ġdisplay Ġthe ĊĠĠĠĠ Ġ* Ġellipsis Ġ(" ... "). ĠAnother Ġmeans Ġto Ġset Ġa Ġ[ progress Ġbar 's ][ ProgressBar ] Ġwidth Ġis Ġ` gtk _ widget _ set _ size _ request ()`. ĊĠĠĠĠ Ġ* ĊĠĠĠĠ Ġ* ĠDefault Ġvalue Ġis Ġ* P ango El lip size Mode . P ANG O _ EL LI P SIZE _ NONE *. ĊĠĠĠĠ Ġ*/ ĊĠĠĠ Ġpublic Ġvar Ġel lip size : ĠP ango El lip size Mode ĊĠĠĠĠĠĠĠ Ġget () Ġ= Ġgtk _ progress _ bar _ get _ el lip size ( gtk ProgressBar Ptr ) ĊĠĠĠĠĠĠĠ Ġset ( value ) Ġ= Ġgtk _ progress _ bar _ set _ el lip size ( gtk ProgressBar Ptr , Ġvalue ) ĊĊĠĠĠ Ġpublic Ġactual Ġfun Ġpulse () Ġ{ ĊĠĠĠĠĠĠĠ Ġgtk _ progress _ bar _ pulse ( gtk ProgressBar Ptr ) ĊĠĠĠ Ġ} Ċ } Ċ Ċ public Ġfun ĠprogressBar Widget ( ĊĠĠĠ ĠprogressBar Ptr : ĠC Pointer < Gtk ProgressBar >? Ġ= Ġnull , ĊĠĠĠ Ġinit : ĠProgress Bar . () Ġ-> ĠUnit Ġ= Ġ{} Ċ ): ĠProgress Bar Ġ{ ĊĠĠĠ Ġval ĠprogressBar Ġ= ĠProgress Bar ( progress Bar Ptr ) ĊĠĠĠ ĠprogressBar . init () ĊĠĠĠ Ġreturn ĠprogressBar Ċ } Ċ