On 31-May-07, at 10:52 AM, Charles Yeomans wrote:
> Or try this code:
>
> dim N as UInt64 = constUInt64
>
> and inspect the result in the debugger -- I see 0.
There's still some issue in that one const can be initialized with &h
and another can't
If you try with a smaller value in constUInt64, say &h8, you do get a
value
Not sure why but the difference exists
_______________________________________________
Unsubscribe or switch delivery mode:
<http://www.realsoftware.com/support/listmanager/>
Search the archives:
<http://support.realsoftware.com/listarchives/lists.html>
From Thu 31 May 2007 13:29:17 -0400
Return-Path: <realbasic-nug-bounces at lists dot realsoftware dot com>
X-Original-To: listarchive at realsoftware dot com
Delivered-To: listarchive at realsoftware dot com
Received: by xmail.realsoftware.com (Postfix, from userid 1037)
id DB78829D6DA4; Thu, 31 May 2007 10:29:32 -0700 (PDT)
X-Spam-Checker-Version: SpamAssassin 3.1.1 (2006-03-10) on
www.realsoftware.com
X-Spam-Level:
X-Spam-Status: No, score=-1.5 required=4.5 tests=AWL,BAYES_00,NO_REAL_NAME
autolearn=no version=3.1.1
Received: from lists.realsoftware.com (m.realsoftware.com [66.116.103.65])
by xmail.realsoftware.com (Postfix) with ESMTP id 0EC2529D6D9E;
Thu, 31 May 2007 10:29:27 -0700 (PDT)
Received: from real-software-mini.local (localhost [127.0.0.1])
by lists.realsoftware.com (Postfix) with ESMTP id 536A0338006;
Thu, 31 May 2007 12:29:19 -0500 (CDT)
X-Original-To: realbasic-nug at lists dot realsoftware dot com
Delivered-To: realbasic-nug at lists dot realsoftware dot com
Received: from mout.perfora.net (mout.perfora.net [74.208.4.194])
by lists.realsoftware.com (Postfix) with ESMTP id CD3D8337FFB
for <realbasic-nug at lists dot realsoftware dot com>;
Thu, 31 May 2007 12:29:15 -0500 (CDT)
Received: from [172.19.56.140] (helo=pustefix136.perfora.net)
by mrelay.perfora.net (node=mrus1) with ESMTP (Nemesis),
id 0MKpCa-1HtoSb2bet-0001XU; Thu, 31 May 2007 13:29:17 -0400
Message-Id: <26488643 dot 46081180632557616 dot JavaMail dot servlet at perfora>
From: rblists at oatmealandcoffee dot com
To: <realbasic-nug at lists dot realsoftware dot com>
Subject: RE: RB/VB Error Catching Woes
MIME-Version: 1.0
X-Priority: 3
X-Binford: 6100 (more power)
X-Mailer: Webmail
X-Originating-From: 32022859
X-Routing: US
X-Message-Id: <32022859$1180632557212172 dot 19 dot 56 dot 14028868898 at
pustefix136 dot perfora dot net-1748694211>
X-Received: from pustefix136.perfora.net by 64.215.189.102 with HTTP id
32022859 for [realbasic-nug at lists dot realsoftware dot com];
Thu, 31 May 2007 13:29:17 EDT
Date: Thu, 31 May 2007 13:29:17 -0400
X-Provags-ID: V01U2FsdGVkX1819M9quPXFgoS83bGmYRhgXhopr026gvZhVBZ
BSZrEQXPE8RqtqRQCXddlLFfvYyd1zQpMjrOy7S7lLiXvqaNkn En1ZQkkEOo=
X-BeenThere: realbasic-nug at lists dot realsoftware dot com
X-Mailman-Version: 2.1.9
Precedence: list
Reply-To: REALbasic NUG <realbasic-nug at lists dot realsoftware dot com>
Content-Type: text/plain; charset="us-ascii"
Content-Transfer-Encoding: 7bit
Sender: realbasic-nug-bounces at lists dot realsoftware dot com
Errors-To: realbasic-nug-bounces at lists dot realsoftware dot com
Never mind. I found an as yet unfixed bug report for what I encountered:
http://www.realsoftware.com/feedback/viewreport.php?reportid=otrltbzq
It seems my situation muddies the waters a bit. I've added my information, and
have since created an Applescript that does what I need to do.
Cheers
--
Philip Regan
http://www.oatmealandcoffee.com
RB2k7r2, Office 2k4, MAc OS 10.4.9
> Howdy-- (Sorry if this is a repost; I had a slight email issue earlier)
>
> I swear I'm the only person who posts about this stuff, because searches
> reveal
>
> squat. Anyway...
>
> I'm having a massive problem catching errors while getting font information
> from Excel. The following parses text in an Excel cell to get various styling
> information for later use. The occasional problem comes the moment I try to
> get
>
> the name of the font used for a particular character. Sometimes there's an
> error, but none of the error catching methods seem to work.
>
> I think part of the problem might be that I get two different errors,
> NilObjectException or OLEException, when I'm in Debug mode and in a compiled
> app, respectively. However, neither the Try nor the Exception block can
> catchi
>
> either of these errors. The thing that really has my head scratching is that
> when I look at the value for the font name variable I've set, it has the
> correct value but still returns the error.
>
> In the end, I don't mind the errors because the process allows for errors to
> get fixed later. I just need to be able to allow the app to continue all of
> it's work to catch 80% or so of the formatting information, and would prefer
> to
>
> record somewhere the remaining the app couldn't catch. Very similar code in a
> Macro works fine, but I really can't do that due to various restrictions in
> the
>
> overall production process.
>
> Any ideas? Here's the code...
>
> Sub Parse()
>
> //This code sits in a thread, called by "Run".
> dim ExcelApp as ExcelApplication
> dim wb as ExcelWorkbook
> dim ws as ExcelWorksheet
> dim wc as ExcelRange
> dim theChr as ExcelCharacters
> dim theFont as ExcelFont
> dim x as integer
> dim theFontName as string
> dim theFontNameStyle as string
>
> ExcelApp = new ExcelApplication
> wb = ExcelApp.ActiveWorkbook
> ws = wb.ActiveSheet
> wc = ws.Range(TheRange) //string property of the thread
>
> ChrCount = Len(wc.Value)
>
> for x = 1 to ChrCount
> theChr = wc.Characters(x, 1)
> //get the font name
> try
> theFont = theChr.Font
> theFontName = theFont.Name //NilObjectException here but the debugger
> shows the correct value.
> Catch err 'as NilObjectException //doesn't catch anything.
> If err IsA NilObjectException then //returned error in Debug mode
> LogModule.WriteLog("ParseErrorLog", TheRange + ":" + str(x) + " =
> theFontName = Left(theChr.Font.Name, 3)")
> elseif err IsA OLEException then //returned error when compiled
> LogModule.WriteLog("ParseErrorLog", TheRange + ":" + str(x) + " =
> theFontName = Left(theChr.Font.Name, 3)")
> End If
> end try
>
> Next
>
> //I'm done, so let my parent know and stop
> me.ParentCaptionObj.ParsingComplete = true
> me.Kill
>
> Exception err 'as NilObjectException //doesn't catch anything.
> If err IsA NilObjectException then
> LogModule.WriteLog("ParseErrorLog", TheRange + ":" + str(x) + " = " +
> theChr.Value + ": " + ws.Range(TheRange).Text)
> elseif err IsA OLEException then
> LogModule.WriteLog("ParseErrorLog", TheRange + ":" + str(x) + " = " +
> theChr.Value + ": " + ws.Range(TheRange).Text)
> End If
> End Sub
>
> TIA!
> --
> Philip Regan
> http://www.oatmealandcoffee.com
> RB2k7r2, Office 2k4, MAc OS 10.4.9
_______________________________________________
Unsubscribe or switch delivery mode:
<http://www.realsoftware.com/support/listmanager/>
Search the archives:
<http://support.realsoftware.com/listarchives/lists.html>
|