Hi!
Am Donnerstag, den 17.07.2008, 21:52 +0200 schrieb Mattias Gaertner:
> On Thu, 17 Jul 2008 10:45:22 +0200
> "Vinzent Höfler" <[EMAIL PROTECTED]> wrote:
>
> > leledumbo <[EMAIL PROTECTED]>
> > >
> > > Jonas Maebe-2 wrote:
> > > >
> > > > Because there are easy ways around it (as you mention) and the
> > > > work to implement and maintain this would probably outweigh the
> > > > usefulness.
> > > >
> > > Yes, it's easy but uncomfortable and needs more typing.
> >
> > Well, sure, but printing pointer values in most cases is a pure
> > debugging aid and nothing really useful.
>
> Well. Since the biggest time of programming is spent on debugging I
> guess, there is more need for a PtrToStr than for FloatToStr.
I suggest to extend Write and WriteLn, that for Pointer typed parameters
those are printed in hex, e.g.
Var Edit : TEdit;
Begin
Edit := TEdit.Create;
WriteLn('Edit = ',Pointer(Edit));
End
then prints to the screen
Edit = $B0283958
Would be very handy for debugging, similar like C++'s
cout << "Edit = " << (void*)Edit << endl;
(okok, streams are ugly syntax at least, but the overloaded operator for
untyped (void) pointers comes in handy instead of FreePascal's
IntToHex(PtrUInt(Edit),8)
Bye
Hansi
_______________________________________________
fpc-pascal maillist - fpc-pascal@lists.freepascal.org
http://lists.freepascal.org/mailman/listinfo/fpc-pascal
