Search found 109 matches: adel

Return to advanced search

Re: To Nageswrao Del Objs on TscrollPanel

function DeleteControl( oPanel, nItem )   local nTop, nLeft      for n := Len( oPanel:aControls ) to nItem + 1 STEP -1      oPanel:aControls[ n ]:nTop := oPanel:aControls[ n - 1 ]:nTop      oPanel:aControls[ n ]:nLeft:= oPanel:aControls[ n - 1 ]:nLeft...
by Silvio.Falconi
Mon Mar 04, 2024 8:33 am
 
Forum: FiveWin for Harbour/xHarbour
Topic: To Nageswrao Del Objs on TscrollPanel
Replies: 17
Views: 498

Re: To Nageswrao Del Objs on TscrollPanel

Nages oPanel:aControls[ nItem ]:End() HB_ADel( oPanel:aControls[ nItem ], nItem, .t. ) ASize( oPanel:aControls, Len( oPanel:aControls ) ) oPanel:SetRange() oPanel:refresh() I saw on oPanel:aControls there are also the records https://i.postimg.cc/QNKWmS1C/mm.png also if I make ASize(...
by Silvio.Falconi
Thu Feb 29, 2024 8:50 am
 
Forum: FiveWin for Harbour/xHarbour
Topic: To Nageswrao Del Objs on TscrollPanel
Replies: 17
Views: 498

To Nageswrao Del Objs on TscrollPanel

... i ] oCol:bLDClickData := { || Erase_Items(oBrw,oPanel) } NEXT Function Erase_Items(oBrw,oPanel) local nItem:= oBrw:aArrayData[ oBrw:nArrayAt ][2] aDel(oBrw:aArraydata,nItem-1) // xbrowser oBrw:aArraydata oPanel:aControls[nItem]:destroy() oBrw:refresh() oPanel:refresh() return nil Function Manage_Items(aData,oBrowse)  ...
by Silvio.Falconi
Mon Feb 26, 2024 12:57 pm
 
Forum: FiveWin for Harbour/xHarbour
Topic: To Nageswrao Del Objs on TscrollPanel
Replies: 17
Views: 498

Problem with oBrowse:aDeleted

To delete a record on Array I use this function del_row( oBrowse ) if ! Empty( oBrowse:aArrayData ) ADel( oBrowse:aArrayData, oBrowse:nArrayAt, .t. ) oBrowse:Refresh() endif xbrowser oBrowse:aDeleted <------ return nil it delete the row but then when I need oBrowse:aDeleted ...
by Silvio.Falconi
Mon Nov 20, 2023 12:36 pm
 
Forum: FiveWin for Harbour/xHarbour
Topic: Problem with oBrowse:aDeleted
Replies: 2
Views: 212

Re: chatGPT writes and executes Harbour code !!!

... the database table containing her family's gift list. Next, she used the AFIELDS keyword to retrieve the names of the fields in the table and the ADEL keyword to delete any unnecessary information. Using the ASORT keyword, Mary sorted the list alphabetically by family member's name. She then used ...
by Jimmy
Mon Dec 26, 2022 8:20 am
 
Forum: FiveWin for Harbour/xHarbour
Topic: chatGPT writes and executes Harbour code !!!
Replies: 35
Views: 2727

Re: edit a cell of a xbrowse

... How can I do to insert a line between two lines and recalculate the line number (RecSelShowKeyNo)? How can I delete a line, I have tried with aDel but then it is not good when I import a new schema cData does not refresh the get columns / rows sample on New data function I load a file txt ...
by Silvio.Falconi
Thu Oct 20, 2022 9:48 am
 
Forum: FiveWin for Harbour/xHarbour
Topic: edit a cell of a xbrowse
Replies: 12
Views: 694

Re: add a number on Random

Perhaps I found a solution thanks to Nages ...lesson STATIC aNatural aNatural := Array( 90 ) Function test() // where is the table buttons AEval( aNatural, { |u,i| aNatural[ i ] := i } ) @xRow,xCol ButtonBMP oOpe[10] Prompt "+" size 30,30 PIXEL FLAT OF oDlg TOOLTIP "Aggiungi un numer...
by Silvio.Falconi
Sat Mar 26, 2022 10:47 pm
 
Forum: FiveWin for Harbour/xHarbour
Topic: add a number on Random
Replies: 8
Views: 446

Re: add a number on Random

...       nAt :=  ASCAN(alista, { | a | a  == ltrim(str(atemp[n])) } )            If nAt >0               adel(alista,nAt,.t.)            Endif         Next     return NIL Then I do a For / next cycle to activate the bmp button and finally update ...
by Silvio.Falconi
Sat Mar 26, 2022 8:04 pm
 
Forum: FiveWin for Harbour/xHarbour
Topic: add a number on Random
Replies: 8
Views: 446

Re: To Nages : Conversion txt into xbrowse bad

... have to delete the first line, now I have a file that in the first line of the csv file I have the database fields and I was able to delete with adel (adata, 1) but later when I use oDbf: fw_ArrayToDBF (aData, , bProgress) to save aData in the dbf archive, the procedure inserts a first empty ...
by Silvio.Falconi
Sat Nov 27, 2021 2:53 pm
 
Forum: FiveWin for Harbour/xHarbour
Topic: To Nages : Conversion txt into xbrowse bad
Replies: 7
Views: 779

Re: To Nages : Conversion txt into xbrowse bad

... have to delete the first line, now I have a file that in the first line of the csv file I have the database fields and I was able to delete with adel (adata, 1) but later when I use oDbf: fw_ArrayToDBF (aData, , bProgress) to save aData in the dbf archive, the procedure inserts a first empty ...
by nageswaragunupudi
Fri Nov 26, 2021 4:55 pm
 
Forum: FiveWin for Harbour/xHarbour
Topic: To Nages : Conversion txt into xbrowse bad
Replies: 7
Views: 779

Re: To Nages : Conversion txt into xbrowse bad

... have to delete the first line, now I have a file that in the first line of the csv file I have the database fields and I was able to delete with adel (adata, 1) but later when I use oDbf: fw_ArrayToDBF (aData, , bProgress) to save aData in the dbf archive, the procedure inserts a first empty ...
by Silvio.Falconi
Wed Nov 24, 2021 4:25 pm
 
Forum: FiveWin for Harbour/xHarbour
Topic: To Nages : Conversion txt into xbrowse bad
Replies: 7
Views: 779

Re: To Nages : Conversion txt into xbrowse bad

... c, Chr(1), CRLF ), aData[ i ] := HB_ATokens( c, cSymbol, .t., .t. ) } ) if len( ATail( aData ) ) < 2 ASize( aData, Len( aData ) - 1 ) endif Adel(aData,1) <---------------- erase the first line But when I save aData on Archive, inserts an empty record as you can see here https://i.postimg.cc/jd0QGbyr/frfr.png ...
by Silvio.Falconi
Wed Nov 24, 2021 10:28 am
 
Forum: FiveWin for Harbour/xHarbour
Topic: To Nages : Conversion txt into xbrowse bad
Replies: 7
Views: 779

Re: Adel

For next is the best way
Code: Select all  Expand view

for n := 8 to 5 step -1
   ADel( aArray, n, .t. )
next

// OR

for n := 5 to 8
   ADel( aArray, 5, .t. )  // use 5 not 'n'
next
 
by nageswaragunupudi
Sun Sep 19, 2021 8:08 pm
 
Forum: FiveWin para Harbour/xHarbour
Topic: Adel
Replies: 3
Views: 412

Re: Adel

https://vivaclipper.wordpress.com/tag/adel/ https://vivaclipper.wordpress.com/2014/01/07/adel/ https://www.itlnet.net/programming/program/reference/c53g01c/ng34b.html https://vivaclipper.wordpress.com/2013/01/07/array-basics/ ...
by karinha
Sat Sep 18, 2021 7:53 pm
 
Forum: FiveWin para Harbour/xHarbour
Topic: Adel
Replies: 3
Views: 412

Re: Adel

Sin FOR NEXT adel(a, 5)adel(a, 6)adel(a, 7)adel(a, 8)aSize(a, Len(a)- 4) o bien mi preferida sin FOR NEXT: aDeleteVarios(a, {|x, n| n >= 5 .and. n <= 8}) FUNCTION ...
by hmpaquito
Sat Sep 18, 2021 7:27 pm
 
Forum: FiveWin para Harbour/xHarbour
Topic: Adel
Replies: 3
Views: 412
Next

Return to advanced search