Hallo, ich versuche ein Array das ich mit FolderItems gefüllt habe,
wieder auszulesen.
Ich habe eigentlich gedacht ich kann es per:
For i = 0 to UBound(array_mit_folderitems)
// Mach was draus
Next
auslesen. Aber ubound akzepiert anscheinend keine folderitems.
Ich bin mir noch nicht sicher ob ich auch die Files bzw die
Folderitems(Dateireferenzen) im Array angelegt habe.
Do
If Obj.FolderItemAvailable then
array_mit_folderitems() = obj.folderItem
me.AddRow(array_mit_folderitems.DisplayName)
//Me.AddRow(Obj.Text)
End if
Loop until Not obj.NextItem
Eigentlich sollte das funktionieren. Die geDragten Files werden in der
Listbox angezeigt.
Besten Dank für Hilfe
Christian
From Tue 18 Apr 2006 00:28:09 +0200
Return-Path: <realbasic-nug dot de-bounces at lists dot realsoftware dot com>
Received: from lists.realsoftware.com (209.198.132.125) by realsoftware.com
with ESMTP (Eudora Internet Mail Server 3.1.3);
Mon, 17 Apr 2006 17:28:16 -0500
Received: from lists.realsoftware.com (localhost [127.0.0.1])
by lists.realsoftware.com (Postfix) with ESMTP
id 9948611FA052; Mon, 17 Apr 2006 17:28:14 -0500 (CDT)
X-Original-To: realbasic-nug dot de at lists dot realsoftware dot com
Delivered-To: realbasic-nug dot de at lists dot realsoftware dot com
Received: from smtprelay05.ispgateway.de (smtprelay05.ispgateway.de
[80.67.18.43])
by lists.realsoftware.com (Postfix) with ESMTP id 0970211FA046
for <realbasic-nug dot de at lists dot realsoftware dot com>;
Mon, 17 Apr 2006 17:28:10 -0500 (CDT)
Received: (qmail 25215 invoked from network); 17 Apr 2006 22:28:10 -0000
Received: from unknown (HELO [192.168.1.80]) (363246 at [84 dot 175 dot 124 dot
134])
(envelope-sender <support at monkeybreadsoftware dot de>)
by smtprelay05.ispgateway.de (qmail-ldap-1.03) with SMTP
for <realbasic-nug dot de at lists dot realsoftware dot com>;
17 Apr 2006 22:28:10 -0000
To: realbasic-nug dot de at lists dot realsoftware dot com (REALbasic NUG
German)
In-Reply-To: <4444109C dot 3090005 at schani dot com>
From: support at monkeybreadsoftware dot de (Christian Schmitz)
Date: Tue, 18 Apr 2006 00:28:09 +0200
Message-ID: <1hdyrwa dot 1kl5vmm5q3q99M%support at monkeybreadsoftware dot de>
MIME-Version: 1.0
Content-Type: text/plain; charset=ISO-8859-1
Content-Transfer-Encoding: quoted-printable
Organization: Monkeybread Software Germany
X-Face: nrf3>{WQ6c&r+7 at e)"]0G60`-6ND^)I2mI%>)QGYa=9"=7jhd-g2|b3!>Al0+
Ccb%xGQshhi|g at QU2$
User-Agent: MacSOUP/D-2.7 (Mac OS X version 10.4.6)
Subject: Re: Array mit Folderitems auslesen ?
X-BeenThere: realbasic-nug dot de at lists dot realsoftware dot com
X-Mailman-Version: 2.1.2
Precedence: list
Reply-To: REALbasic NUG German <realbasic-nug dot de at lists dot realsoftware dot
com>
Sender: realbasic-nug dot de-bounces at lists dot realsoftware dot com
Errors-To: realbasic-nug dot de-bounces at lists dot realsoftware dot com
SChani <realbasic at schani dot com> wrote:
Aber ubound akzepiert anscheinend keine folderitems.
wie? was?
dim f(3) as FolderItem
=20
MsgBox str(UBound(f))
zeigt mit 3 an!
Ich bin mir noch nicht sicher ob ich auch die Files bzw die=20
Folderitems(Dateireferenzen) im Array angelegt habe.
redim array_mit_folderitems(-1)
wenn du vorher das Array leeren willst.
Do
If Obj.FolderItemAvailable then
=20
array_mit_folderitems() =3D obj.folderItem
array_mit_folderitems.append obj.folderitem
h=E4ngt das folderitem an das Array.
me.AddRow(array_mit_folderitems.DisplayName)
=20
//Me.AddRow(Obj.Text)
End if
Loop until Not obj.NextItem
=20
=20
Eigentlich sollte das funktionieren. Die geDragten Files werden in der
Listbox angezeigt.
Gru=DF
Christian
--=20
Around eleven thousand functions in one REALbasic plug-in.=20
The Monkeybread Software Realbasic Plugin v6.1.
<http://www.monkeybreadsoftware.de/realbasic/plugins.shtml>
|