[fpc-pascal] Re: fpc-pascal Digest, Vol 60, Issue 47
Richard Jasmin
jasminr at lavabit.com
Tue Jul 7 23:34:11 CEST 2009
If anyone knows how to do a line without assembler or BGI, as I'm using
VESA, I'm all ears.I can't find the source that is non 32 bit assembler,
even for TP.
fpc-pascal-request at lists.freepascal.org wrote:
> Send fpc-pascal mailing list submissions to
> fpc-pascal at lists.freepascal.org
>
> To subscribe or unsubscribe via the World Wide Web, visit
> http://lists.freepascal.org/mailman/listinfo/fpc-pascal
> or, via email, send a message with subject or body 'help' to
> fpc-pascal-request at lists.freepascal.org
>
> You can reach the person managing the list at
> fpc-pascal-owner at lists.freepascal.org
>
> When replying, please edit your Subject line so it is more specific
> than "Re: Contents of fpc-pascal digest..."
>
>
> Today's Topics:
>
> 1. Re: Insert into ... mysql (John Coppens)
> 2. Re: GRAPHICS HELP : PLEASE PLEASE???? (John Coppens)
> 3. Re: SHA1 implementation (Graeme Geldenhuys)
> 4. Re: Re: SHA1 implementation (Graeme Geldenhuys)
> 5. Re: GRAPHICS HELP : PLEASE PLEASE????
> (Guillermo Mart?nez Jim?nez)
>
>
> ----------------------------------------------------------------------
>
> Message: 1
> Date: Mon, 29 Jun 2009 00:34:57 -0300
> From: John Coppens <john at jcoppens.com>
> Subject: Re: [fpc-pascal] Insert into ... mysql
> To: fpc-pascal at lists.freepascal.org
> Message-ID: <20090629003457.7e48512a.john at jcoppens.com>
> Content-Type: text/plain; charset=ISO-8859-1
>
> On Sun, 28 Jun 2009 15:42:04 -0500
> César Espinoza <cesarespinozasoto at gmail.com> wrote:
>
>
>> But I can't (may be I dont know :-( ) insert data in a table
>>
>
> If you can query, but not insert, there are a few things to check:
>
> - Is the syntax of your insert correct? I mean, does column 'lugar' exist,
> and is it a varchar column, etc.?
> - Are you allowed to insert? (Check the privileges for the person
> as who you log in. Insert, update, select, all have separate 'enables')
> - What is the message returned by mysql_error?
>
> John
>
>
> ------------------------------
>
> Message: 2
> Date: Mon, 29 Jun 2009 00:43:54 -0300
> From: John Coppens <john at jcoppens.com>
> Subject: Re: [fpc-pascal] GRAPHICS HELP : PLEASE PLEASE????
> To: fpc-pascal at lists.freepascal.org
> Message-ID: <20090629004354.ad18ba16.john at jcoppens.com>
> Content-Type: text/plain; charset=ISO-8859-1
>
> On Sun, 28 Jun 2009 18:23:12 -0700 (PDT)
> Zachary Marlow <zachary_marlow at yahoo.com> wrote:
>
>
>> Well
>> Like How to draw a circle , I just need some example code please
>>
>
> Check this tutorial:
>
> http://pascalprogramming.byethost15.com/lesson8.php
>
> John
>
>
> ------------------------------
>
> Message: 3
> Date: Mon, 29 Jun 2009 09:02:52 +0200
> From: Graeme Geldenhuys <graemeg at opensoft.homeip.net>
> Subject: Re: [fpc-pascal] SHA1 implementation
> To: FPC-Pascal users discussions <fpc-pascal at lists.freepascal.org>
> Message-ID: <4A48671C.6020807 at opensoft.homeip.net>
> Content-Type: text/plain; charset=UTF-8
>
> David Butler wrote:
>
>> Have a look at Fundamentals 4's cHash unit:
>> http://sourceforge.net/projects/fundementals/
>>
>
> Thanks, there are some interesting code in there... Cool. :)
>
>
> In the end I did some more Google'ing and found a free implementation
> based on the FIPS 180-1 document. And it's all done in a single unit,
> which makes it nice and easy to use.
>
> I wrote a few unit tests just to confirm that the implementation is
> correct - and it was. :-) The code is free of any license restrictions
> or platform specific code, so would FPC find a unit like this useful in
> the FCL? It makes no difference to me, but I thought I would ask.
>
>
> Regards,
> - Graeme -
>
> _______________________________________________________
> fpGUI - a cross-platform GUI toolkit using Free Pascal
> http://opensoft.homeip.net/fpgui/
>
>
>
> ------------------------------
>
> Message: 4
> Date: Mon, 29 Jun 2009 09:06:04 +0200
> From: Graeme Geldenhuys <graemeg at opensoft.homeip.net>
> Subject: Re: [fpc-pascal] Re: SHA1 implementation
> To: FPC-Pascal users discussions <fpc-pascal at lists.freepascal.org>
> Message-ID: <4A4867DC.1010007 at opensoft.homeip.net>
> Content-Type: text/plain; charset=UTF-8
>
> Paul Nicholls wrote:
>
>> http://wiki.freepascal.org/DCPcrypt
>>
>
> Ah thanks, I already use the Blowfish implementation from that package,
> but for some reason never thought to look in there for the SHA1
> implementation. In the end I got a nice lightweight (single unit)
> implementation that also passes all unit tests based on various
> documentation.
>
>
> Regards,
> - Graeme -
>
> _______________________________________________________
> fpGUI - a cross-platform GUI toolkit using Free Pascal
> http://opensoft.homeip.net/fpgui/
>
>
>
> ------------------------------
>
> Message: 5
> Date: Mon, 29 Jun 2009 09:59:20 +0200
> From: Guillermo Mart?nez Jim?nez <gmartinez at burdjia.com>
> Subject: [fpc-pascal] Re: GRAPHICS HELP : PLEASE PLEASE????
> To: fpc-pascal at lists.freepascal.org
> Message-ID:
> <a2a0fbc20906290059l605b040bq335d11fae64df3c at mail.gmail.com>
> Content-Type: text/plain; charset=ISO-8859-1
>
>
>> From: Zachary Marlow <zachary_marlow at yahoo.com>
>> Subject: Re: [fpc-pascal] GRAPHICS HELP : PLEASE PLEASE????
>> To: FPC-Pascal users discussions <fpc-pascal at lists.freepascal.org>
>> Message-ID: <491787.41572.qm at web35505.mail.mud.yahoo.com>
>> Content-Type: text/plain; charset="iso-8859-1"
>>
>> Well =
>>
>> =A0=A0=A0=A0=A0 Like How to draw a circle , I just need some example code p=
>> lease =
>>
>> =A0
>> PS THANKS FOR READING AND REPLYING
>>
>
> There are a lot of ways to draw a circle. It depends why and where you
> need to draw a circle. There are a lot of differences if you need to
> draw it using X11 or using a graphical library. For example, using the
> Allegro.pas library:
>
> (* Draw circle using Allegro (http://allegro-pas.sourceforge.net/) *)
> PROGRAM circle;
>
> USES
> allegro;
>
> BEGIN
> IF NOT al_init THEN
> BEGIN
> WriteLn ('Error initialising Allegro');
> EXIT;
> END;
> IF al_set_gfx_mode (AL_GFX_AUTODETECT, 320, 240, 0, 0) THEN
> BEGIN
> al_install_keyboard;
> al_circle (al_screen, 160, 100, 50, al_makecol (255, 255, 255));
> al_readkey;
> al_exit;
> END
> ELSE
> WriteLn ('Error setting graphics');
> END.
>
> Another way, using Lazarus add a TPaintBox to the TForm and set the
> "onDraw" event of the TPaintBox to this:
>
> PROCEDURE TForm1.PaintBox1Paint(Sender: TObject);
> VAR
> Tmp: TForm1;
> BEGIN
> Tmp := SELF;
> WITH (Sender AS TPaintBox).Canvas DO
> BEGIN
> Ellipse (0, 0, Tmp.Width - 1, Tmp.Height - 1);
> END;
> END;
>
>
> ------------------------------
>
> _______________________________________________
> fpc-pascal maillist - fpc-pascal at lists.freepascal.org
> http://lists.freepascal.org/mailman/listinfo/fpc-pascal
>
> End of fpc-pascal Digest, Vol 60, Issue 47
> ******************************************
>
> ____________________________________________________________________________________
> Use the link below to report this message as spam.
> https://lavabit.com/apps/teacher?sig=631912&key=2074436861
> ____________________________________________________________________________________
>
>
More information about the fpc-pascal
mailing list