ab.com コミュニティ https://www.activebasic.com/forum/ |
|
ポインタ配列を開放 https://www.activebasic.com/forum/viewtopic.php?t=2562 |
ページ 1 / 1 |
作成者: | rikaeigo2 [ 2009年4月05日(日) 22:37 ] |
記事の件名: | ポインタ配列を開放 |
初心者rikaeigo2です。 配列でポインタを100個確保したら開放もループで100個開放するんですか? お願いします。m(__)m |
作成者: | konisi [ 2009年4月07日(火) 00:01 ] |
記事の件名: | |
コード: For i=0 To 100-1 list=calloc( ... ) Nextのように確保した場合は、 コード: For i=0 To 100-1 free(list) Nextのように開放する必要があります。 別解として、 コード: '注:エラー処理を書いてない。 Type A length As Long list As *VoidPtr End Type Sub callocA(ByRef a As A,listlength As Long) Dim i As Long a.length=listlength a.list=calloc(listlength*sizeof(VoidPtr)) For i=0 To length-1 a.list=calloc( ... ) Next End Sub Sub freeA(ByRef a As A) Dim i As Long For i=0 To a.length-1 free(a.list) Next free(a.list) a.length=0 End Subのようにすることは出来ますね。 |
作成者: | rikaeigo2 [ 2009年4月07日(火) 00:08 ] |
記事の件名: | |
konisiさん ありがとうございました。^^ |
ページ 1 / 1 | 全ての表示時間は UTC+09:00 です |
Powered by phpBB® Forum Software © phpBB Limited https://www.phpbb.com/ |