Hello,
Please see this demo too:
https://github.com/silvioprog/lazsolutions/tree/master/Demos/LSPlayWAV
It is a cross function to play wav files.
--
Silvio Clécio
My public projects - github.com/silvioprog
___
fpc-pascal maillist - fpc-pascal
1.pas(9,3) Fatal: Can not find unit openal_nt used by Unit1.
--
Silvio Clécio
My public projects - github.com/silvioprog
___
fpc-pascal maillist - fpc-pascal@lists.freepascal.org
http://lists.freepascal.org/mailman/listinfo/fpc-pascal
you could send only the files to play audio? :/
--
Silvio Clécio
My public projects - github.com/silvioprog
___
fpc-pascal maillist - fpc-pascal@lists.freepascal.org
http://lists.freepascal.org/mailman/listinfo/fpc-pascal
2012/6/11 Michalis Kamburelis :
> silvioprog wrote:
>>
>> Nice project. :)
>>
>> castle_game_engine-3.0.0-src.zip = +-70MB.
>>
>
> Most of the size comes from the examples, they contain also example 3D data
> files (models, animations etc.). I prefer to g
work on multiple platforms.
>
> --
> Regards,
> - Graeme -
So, how to play audio (wav/mp3) with only SDL framework in Free Pascal?
--
Silvio Clécio
My public projects - github.com/silvioprog
___
fpc-pascal maillist - fpc-pascal@lists.fre
2012/6/12 Graeme Geldenhuys :
> On 12 June 2012 16:17, silvioprog wrote:
>>
>> So, how to play audio (wav/mp3) with only SDL framework in Free Pascal?
>
>
> Simply reading a SDL tutorial or two, will quickly let you understand
> the following code. TSoundEngine is j
2012/6/14 Graeme Geldenhuys :
> Hi,
>
> On 14 June 2012 02:19, silvioprog wrote:
>> Y!!
>>
>> Worked fine with this demo in attached!
>
>
> Glad you got it working in the end.
>
>
>> I found this demo in:
>
&g
low guys,
How to use TBlowFishEnCryptStream? Is there any example for mortals? :)
--
Silvio Clécio
My public projects - github.com/silvioprog
___
fpc-pascal maillist - fpc-pascal@lists.freepascal.org
http://lists.freepascal.org/mailman/listinfo/fpc-pascal
ogramme, as if the lack of
> graphical interface make the problem to happen.
>
> If i write an lcl application with a dbgrid, and the same connection
> configuration, everything is Ok, including debugging.
>
> Please, i don't want to use PHP! ;p
>
> Thank you for your h
ata.
>
> Michael.
I saw, but I did not understand this example. :/
--
Silvio Clécio
My public projects - github.com/silvioprog
___
fpc-pascal maillist - fpc-pascal@lists.freepascal.org
http://lists.freepascal.org/mailman/listinfo/fpc-pascal
te(key,s2);
>
> SetLength(temp,s2.Size);
> de.Read(temp[1],s2.Size);
> WriteLn('decrypted: ' + temp);
> de.Free;
>
> s2.Free;
> end.
>
> --
> View this message in context:
> http://free-pascal-general.1045716.n5.nabble.c
2012/6/23 silvioprog :
> 2012/6/23 leledumbo :
>>> How to use TBlowFishEnCryptStream? Is there any example for mortals?
>>
>> No but I guess the doc is clear enough.
>>
>> To encrypt:
>> 1. Create TBlowFishEnCryptStream instance supplying a key and the
;, S);
end.
I got:
C:\Users\silvioprog\Desktop\test>project1.exe
An unhandled exception occurred at $004115F1:
EHTTPClient: Invalid protocol : ""
$004115F1
$0041189E
$004118FE
$0040167F main, line 13 of project1.lpr
With:
==
2012/11/23 Michael Van Canneyt
> On Fri, 23 Nov 2012, luciano de souza wrote:
>
> Hello listers,
>> Using Synapse, the developer has very good features to deal with the
>> HTTP protocol. But imagine you want only to do a "get" in a URL and
>> take a string back. I imagine it can be done with th
ble to implement a
TFPSMTPClient. What do you think about?
--
Silvio Clécio
My public projects - github.com/silvioprog
___
fpc-pascal maillist - fpc-pascal@lists.freepascal.org
http://lists.freepascal.org/mailman/listinfo/fpc-pascal
Hello,
This topic has started in FPC-Devel, but I regard more people wile can be
interested. Is EazyRSS useful for anyone? Should it be included in the
standard units of Free Pascal since the web development has been a trend?
-- Forwarded message --
From: silvioprog
Date: 2012
Guys,
Is "Assign" method implemented for dataset in FPC?
2012/12/3 Marcos Douglas
> Hi,
>
> What is the faster way to copy a DataSet to another?
> The FPC provides some functionality for this?
>
> Thanks,
> Marcos Douglas
--
Silvio Clécio
My public p
dbExpress, IBQuery or Zeos implements it?
2012/12/3 Marcos Douglas
> On Mon, Dec 3, 2012 at 2:32 PM, Michael Van Canneyt
> wrote:
> >
> >
> > On Mon, 3 Dec 2012, Marcos Douglas wrote:
> >
> >> On Mon, Dec 3, 2012 at 2:03 PM, wrote:
> >>&g
t end ===
> >
> > As a sidenote: as long as you don't access an object member at all you'd
> > even be able to cast a primitive type like Integer to an object and call
> > methods on it... (not that I'd suggest to do this... ;) )
> >
> > Regards
next version, see http://sourceforge.net/p/**
> pasdoc/feature-requests/50/<http://sourceforge.net/p/pasdoc/feature-requests/50/>:)
>
> Michalis
>
I'll send the patchs as soon as I get back from vacation.
Thank you guy! :)
--
Silvio Clécio
My public projects - github.com/silvioprog
ery good project
and I have never used it, in future projects, it can be a very good option.
:)
--
Silvio Clécio
My public projects - github.com/silvioprog
___
fpc-pascal maillist - fpc-pascal@lists.freepascal.org
http://lists.freepascal.org/mailman/listinfo/fpc-pascal
2012/12/16 Sven Barth
> On 15.12.2012 04:24, silvioprog wrote:
>
>> More than 15,000 lines of source code, more than 90 test cases, more
>> than one year of work. Today, a new framework for web development was
>> born. It's name is Brook and its nice features are
Hello friends,
Please see this issue:
http://bugs.freepascal.org/view.php?id=23647
Thank you!
--
Silvio Clécio
My public projects - github.com/silvioprog
___
fpc-pascal maillist - fpc-pascal@lists.freepascal.org
http://lists.freepascal.org/mailman
functions)
Thank you!
ps. Marshal of Delphi is case insensitive.
ps2. So, I send this my questions only to fpc-devel or fpc-pascal? :/
--
Silvio Clécio
My public projects - github.com/silvioprog
___
fpc-pascal maillist - fpc-pascal@lists.freepascal.org
http://lists.freepascal.org/mailman/listinfo/fpc-pascal
2013/1/24 Michael Van Canneyt
> [...]
> Maybe we can have a property for this.
This would be an excellent idea. This new property could be to False by
default.
I'll open an issue about this.
--
Silvio Clécio
My public projects - github.com
Done: http://bugs.freepascal.org/view.php?id=23745
2013/1/24 silvioprog
> 2013/1/24 Michael Van Canneyt
>
>> [...]
>> Maybe we can have a property for this.
>>
>
> This would be an excellent idea. This new property could be to False by
> default.
2013/1/24 Michael Van Canneyt
> On Thu, 24 Jan 2013, silvioprog wrote:2013/1/24 Michael Van Canneyt <
> mich...@freepascal.org>
>
>> [...]
>> Maybe we can have a property for this.
>>
>> This would be an excellent idea. This new property could be to
Hello,
TFPCanvasDrawer provides anti-alias support?
Thank you!
--
Silvio Clécio
My public projects - github.com/silvioprog
___
fpc-pascal maillist - fpc-pascal@lists.freepascal.org
http://lists.freepascal.org/mailman/listinfo/fpc-pascal
2013/1/28 Michael Van Canneyt
> On Mon, 28 Jan 2013, silvioprog wrote:
>
>> Hello,
>> TFPCanvasDrawer provides anti-alias support?
>>
>
> Not for lines.
Sniff. :'(
I'm trying to generate charts in my CGI apps:
http://silvioprog.com.br/cgi-bin/cgi1
work, but it worth a try.
>
>
> Leonardo M. Ramé
> http://leonardorame.blogspot.com
>
I'll test it now, thank you Leo! :)
Is this the official link to download it?:
https://lazpaint.svn.sourceforge.net/svnroot/lazpaint
--
Silvio Cléc
2013/1/28 Graeme Geldenhuys
> On 01/28/13 23:32, silvioprog wrote:
> >> Not for lines.
> >
> >
> > Sniff. :'(
> >
> > I'm trying to generate charts in my CGI apps:
>
> Use AggPas. That is exactly why I incorporated it into fpGUI. I needed
2013/1/28 silvioprog
> 2013/1/28 Graeme Geldenhuys
>
>> On 01/28/13 23:32, silvioprog wrote:
>> >> Not for lines.
>> >
>> >
>> > Sniff. :'(
>> >
>> > I'm trying to generate charts in my CGI apps:
>>
>>
Create(img);
img.CanvasBGRA.Font.Antialiasing := true;
img.CanvasBGRA.Font.Name := 'Arial';
d.DoGetFontOrientation := @CanvasGetFontOrientationFunc;
chart.Draw(d, Rect(0, 0, chart.Width, chart.Height));
img.SaveToFile('test.png');
img.Free;
bs.Free;
chart.Free;
end.
Hello,
What is "cross-compiler installation" mentioned in this article?:
http://wiki.freepascal.org/Android (please see: http://imagebin.org/247728)
And where do I download it?
Thank you!
--
Silvio Clécio
My public projects - github.com/
2013/2/22 Henry Vermaak
> On Fri, Feb 22, 2013 at 10:52:09AM -0300, silvioprog wrote:
> > Hello,
> >
> > What is "cross-compiler installation" mentioned in this article?:
> >
> > http://wiki.freepascal.org/Android (please see:
> http://imagebin.
2013/2/22 Henry Vermaak
> On Fri, Feb 22, 2013 at 10:52:09AM -0300, silvioprog wrote:
> > Hello,
> >
> > What is "cross-compiler installation" mentioned in this article?:
> >
> > http://wiki.freepascal.org/Android (please see:
> http://imagebin.
2013/2/22 Sven Barth
> On 22.02.2013 15:09, silvioprog wrote:
>
>> 2013/2/22 Henry Vermaak > <mailto:henry.vermaak@gmail.**com >>
>>
>>
>> On Fri, Feb 22, 2013 at 10:52:09AM -0300, silvioprog wrote:
>> > Hello,
>> >
>&
; Sven
>
Phew, now I'm monitoring it. :)
--
Silvio Clécio
My public projects - github.com/silvioprog
___
fpc-pascal maillist - fpc-pascal@lists.freepascal.org
http://lists.freepascal.org/mailman/listinfo/fpc-pascal
ilers, while .pas is used more
> commonly now.
>
> Groete,
> Reinier
... and, .pas is commonly found code of units (e.g.: yeahbaby.pas -> unit
yeahbaby;); .pp is commonly found code that generates the executable (e.g.:
ohgod.pp -> program ohgod;).
--
Silvio C
Em 22/02/2013 14:18, "Sven Barth" escreveu:
> On 22.02.2013 16:15, silvioprog wrote:
>
>> 2013/2/22 Sven Barth > <mailto:pascaldragon@**googlemail.com >>
>>
>> You are not the only one:
>>
>> http://bugs.freepascal.org/__**view.p
Hello,
There are a setup to install FPC 2.6.2 stable 64 bit? In SF (
http://sourceforge.net/projects/freepascal/files) have only 32.
Thanks.
--
Silvio Clécio
My public projects - github.com/silvioprog
___
fpc-pascal maillist - fpc-pascal
2013/2/26 Gabor Boros
> 2013.02.26. 15:20 keltezéssel, silvioprog írta:
>
>> Hello,
>>
>> There are a setup to install FPC 2.6.2 stable 64 bit? In SF
>> (http://sourceforge.net/**projects/freepascal/files<http://sourceforge.net/projects/freepascal/file
Well:
{$mode jascal}{$H+}
:)
--
Silvio Clécio
My public projects - github.com/silvioprog
___
fpc-pascal maillist - fpc-pascal@lists.freepascal.org
http://lists.freepascal.org/mailman/listinfo/fpc-pascal
Hello,
Please see:
http://bugs.freepascal.org/view.php?id=23970
Thank you!
--
Silvio Clécio
My public projects - github.com/silvioprog
___
fpc-pascal maillist - fpc-pascal@lists.freepascal.org
http://lists.freepascal.org/mailman/listinfo/fpc
2013/2/28 Michael Van Canneyt
> On Thu, 28 Feb 2013, silvioprog wrote:
>
>> Hello,
>> Please see:
>>
>> http://bugs.freepascal.org/**view.php?id=23970<http://bugs.freepascal.org/view.php?id=23970>
>>
>
> Fixed.
>
> Michael.
Wow, very fas
2013/2/28 luiz americo pereira camara
> 2013/2/28 Michael Van Canneyt :
> >
> >
> > On Thu, 28 Feb 2013, silvioprog wrote:
> >
> >> Hello,
> >> Please see:
> >>
> >> http://bugs.freepascal.org/view.php?id=23970
> >
> &
2013/2/28 Michael Van Canneyt
>
> On Thu, 28 Feb 2013, silvioprog wrote:
>
> 2013/2/28 luiz americo pereira camara
>> 2013/2/28 Michael Van Canneyt :
>> >
>> >
>> > On Thu, 28 Feb 2013, silvioprog wrote:
>>
Hello,
Now, it's possible to compile Brook in current released Free Pascal and
Lazarus, however, not yet released the new release of Brook, however you
can download a snapshot here:
https://github.com/silvioprog/brookframework/archive/master.zip
Or, for those who follow Brook via GIT, p
't show the
sources, but simply for my concurrent (http://www.habarisoft.com) does not
copy it easily.
I could implement it smoothly on a weekend, but there's another problem, I
need to finish another project I'm doing, because my time i
Oops, I forgot the link:
https://github.com/silvioprog/brookframework/issues/14
2013/3/21 silvioprog
> 2013/3/21 Sven Barth
>
>> Am 20.03.2013 09:18, schrieb Michael Schnell:
>>
>> Of course Android is a rather hot topic in the fpc and Lazarus
>>> developer
2013/3/21 Marcos Douglas
> On Thu, Mar 21, 2013 at 12:30 PM, silvioprog wrote:
> > 2013/3/21 Sven Barth
> >>
> >> Am 20.03.2013 09:18, schrieb Michael Schnell:
> >>
> >>> Of course Android is a rather hot topic in the fpc and Lazarus
>
2013/3/21 Flávio Etrusco
> On Thu, Mar 21, 2013 at 1:39 PM, silvioprog wrote:
> > 2013/3/21 Marcos Douglas
> >>
> >> On Thu, Mar 21, 2013 at 12:30 PM, silvioprog
> wrote:
> >> > 2013/3/21 Sven Barth
> >> > (...)
> >>
> >
I sent an end answer in issue about S3:
https://github.com/silvioprog/brookframework/issues/14
Sorry for my delays in answer please.
--
Silvio Clécio
My public projects - github.com/silvioprog
___
fpc-pascal maillist - fpc-pascal
Hello,
How to get HMAC_SHA1 using native functions of FPC?
HMAC_SHA1:
http://en.wikipedia.org/wiki/Hash-based_message_authentication_code#Examples_of_HMAC_.28MD5.2C_SHA1.2C_SHA256.29
Thank you!
--
Silvio Clécio
My public projects - github.com/silvioprog
2013/3/23 David Butler
> Hi
>
> You can find a hash library that supports HMAC-SHA1 here:
>
> http://fundementals.sourceforge.net/dl.html
>
But it's not native in Free Pascal. x(
--
Silvio Clécio
My public projects - github.com/silvioprog
2013/3/23 Tomas Hajny
> On Sat, March 23, 2013 06:28, silvioprog wrote:
>
> Hi,
>
> > How to get HMAC_SHA1 using native functions of FPC?
> >
> > HMAC_SHA1:
> >
> http://en.wikipedia.org/wiki/Hash-based_message_authentication_code#Examples_of_HMAC_.28MD5.2
ash := GenerateHash(seed,hash);
> end;
>
> function ValidateHMAC(text: string; seed: LongInt; hmac: string): boolean;
> var hash1, hash2: string;
> begin
> hash1 := GenerateHash(seed,text);
> hash2 := GenerateHash(seed,hash1);
> Result := CompareMem(@(hmac[1]),@(hash2[1]),20
m looking for. I'll
compare it with PHP function and if it make hash correctly, I believe that
I'll isolate only the part that interests me hehe... :)
--
Silvio Clécio
My public projects - github.com/silvioprog
___
fpc-pascal mail
7;The quick brown fox jumped over the lazy dog.',
'secret');
end.
Result:
]M?p { ? #?>O"?c I
--
Silvio Clécio
My public projects - github.com/silvioprog
___
fpc-pascal maillist - fpc-pascal@lists.freepascal.org
http://lists.freepas
0; $i < $block_size; $i++) {
$ko .= chr(ord(substr($k, $i, 1)) ^ 0x5C);
}
$h = sha1($ko . pack('H*', sha1($ki . $data)));
if ($raw_output) {
return pack('H*', $h);
} else {
return $h;
}
}
echo hmac_sha1("The quick brown fox jumped over the lazy dog.", "secre
ointer(Result)^);
end;
function SHA1DigestToHex(const Digest: T160BitDigest): AnsiString;
begin
Result := DigestToHex(Digest, Sizeof(Digest));
end;
procedure TForm1.Button1Click(Sender: TObject);
begin
Edit1.Text := SHA1DigestToHex(CalcHMAC_SHA1('secret',
'The quick
fox jumped over the lazy dog.')).
Result: 0b7252985d63555b31db4755f37efe218c509711 (same result in PHP, JS
and Phyton! ;) )
So, can you add this code (I'll make HMACMD5 too) in FCL hashes?
(>fpc\VER\source\packages\hash\src)
Thank you very much buddies! :)
--
Silvio Clécio
M
Oops...
2013/3/24 silvioprog
> [...]
> Result: 0b7252985d63555b31db4755f37efe218c509711 (same result in PHP, JS
> and Phyton! ;) )
>
... Result *in my PC*: 0b7252985d63555b31db4755f37efe218c509711
--
Silvio Clécio
My public projects - github.co
Clécio
My public projects - github.com/silvioprog
___
fpc-pascal maillist - fpc-pascal@lists.freepascal.org
http://lists.freepascal.org/mailman/listinfo/fpc-pascal
r Byte(VKey[I]));
VIPad[I] := Char(Byte(VIPad[I]) xor Byte(VKey[I]));
end;
VIPad := VIPad + AMessage;
Result := SHA1Print(SHA1String(VOPad + SHA1Raw(Pointer(VIPad)^,
Length(VIPad;
end;
--
Silvio Clécio
My public projects - github.com/silvioprog
__
but I can run faster now. :)
Thanks guys!
--
Silvio Clécio
My public projects - github.com/silvioprog
___
fpc-pascal maillist - fpc-pascal@lists.freepascal.org
http://lists.freepascal.org/mailman/listinfo/fpc-pascal
I changed it to:
http://pastebin.com/mxeWtncP
And now:
cHash: 00:00:02:188 HMAC: 00:00:00:966
2013/3/24 silvioprog
> My function is more fast that cHash (
> http://fundementals.sourceforge.net/dl.html). The comparison result is:
>
> HMAC: 00:00:01:689 cHash: 00:00:02:038
>
2013/3/24 Sven Barth
> On 24.03.2013 16:59, silvioprog wrote:
>
>> My function is more fast that cHash
>> (http://fundementals.**sourceforge.net/dl.html<http://fundementals.sourceforge.net/dl.html>).
>> The comparison result is:
>>
>> HMAC: 00:00:01:689
2013/3/24 Sven Barth
> On 24.03.2013 19:35, silvioprog wrote:
>
>> 2013/3/24 Sven Barth > <mailto:pascaldragon@**googlemail.com >>
>>
>>
>> On 24.03.2013 16:59, silvioprog wrote:
>>
>> My function is more fast that cHash
>>
My public projects - github.com/silvioprog
___
fpc-pascal maillist - fpc-pascal@lists.freepascal.org
http://lists.freepascal.org/mailman/listinfo/fpc-pascal
Oops ...
2013/3/25 silvioprog
[...]
> (seven for MD5 and nine for SHA1), ...
>
... seven for both.
--
Silvio Clécio
My public projects - github.com/silvioprog
___
fpc-pascal maillist - fpc-pascal@lists.freepascal.org
http://lists.freepasc
Hello,
I've the following structure of directories:
-src
-examples
-tests
And this file:
fpmake.pp - (http://pastebin.com/DTw9QyqF)
Now, what steps to create my Makefile and Makefile.fpc files?
Thank you!
--
Silvio Clécio
My public projects - github.com/silvi
2013/3/25 Mattias Gaertner
> On Mon, 25 Mar 2013 14:53:04 -0300
> silvioprog wrote:
>
> > Hello,
> >
> > I've the following structure of directories:
> >
> > -src
> > -examples
> > -tests
> >
> > And this file:
> >
> &
geoget.ararat.cz/ - Geocaching solution
Hello Lukas, thank you very much for the information friend. :)
I've a friend who uses Synapse with Delphi and I'll indicate this routine!
;)
--
Silvio Clécio
My public projects - github.com/silvioprog
___
fpc-pascal maillist - fpc-pascal@lists.freepascal.org
http://lists.freepascal.org/mailman/listinfo/fpc-pascal
2013/3/24 Sven Barth
> On 24.03.2013 16:59, silvioprog wrote:
>
>> My function is more fast that cHash
>> (http://fundementals.**sourceforge.net/dl.html<http://fundementals.sourceforge.net/dl.html>).
>> The comparison result is:
>>
>> HMAC: 00:00:01:689
t: THMACCtx; data: Pointer; size:
> Cardinal): LongBool; cdecl; libeay;
> function HMAC_Final(var context: THMACCtx; digest: Pointer; var
> digestSize: LongWord): LongBool; cdecl; libeay;
>
> implementation
>
> {$ifdef static}
> {$linklib libssl.a}
> {$linklib libcrypto.
2013/3/26 Anthony Walter
> On Mon, Mar 25, 2013 at 11:24 PM, silvioprog wrote:
>
>> Nice.
>>
>> But there situations that the user does not have the OpenSSL lib.
>>
>> The routines I sent does not depend on external libs.
>>
>> --
>> Silvi
2013/3/26 Anthony Walter
> On Tue, Mar 26, 2013 at 12:23 AM, silvioprog wrote:
>
>> Don't know why so much work if you can use it directly from the FCL.
>>
>
> Because...
>
> OpenSSL is quite robust, well documented. tested, and proven
> OpenSSL provides
2013/3/26 Anthony Walter
> On Tue, Mar 26, 2013 at 1:20 AM, silvioprog wrote:
>
>> I don't know if you noticed, but I sent the ALL test cases required by
>> the RFC 2202 (http://tools.ietf.org/html/rfc2202), i.e., it's enough to
>> check whether the algo
2013/3/26 Sven Barth
> Am 26.03.2013 06:53, schrieb Anthony Walter:
>
> On Tue, Mar 26, 2013 at 1:20 AM, silvioprog wrote:
>
>> I don't know if you noticed, but I sent the ALL test cases required by
>> the RFC 2202 (http://tools.ietf.org/html/rfc2202), i.e., it
://stream1.gifsoup.com/webroot/animatedgifs6/2077970_o.gif). :p
--
Silvio Clécio
My public projects - github.com/silvioprog
___
fpc-pascal maillist - fpc-pascal@lists.freepascal.org
http://lists.freepascal.org/mailman/listinfo/fpc-pascal
Hello,
Please see:
http://bugs.freepascal.org/view.php?id=24229
Thanks,
--
Silvio Clécio
My public projects - github.com/silvioprog
___
fpc-pascal maillist - fpc-pascal@lists.freepascal.org
http://lists.freepascal.org/mailman/listinfo/fpc-pascal
dn't be turned on by default.
>>
>
> No problem. I've changed the default value of VerboseErrors to true. Rev.
> 24154.
>
> Michael.
>
Worked like a charm, thank you very much! :)
--
Silvio Clécio
My public projects - github.com/silvioprog
___
fpc-pascal maillist - fpc-pascal@lists.freepascal.org
http://lists.freepascal.org/mailman/listinfo/fpc-pascal
t; Tel.: +352 58 00 93 - 93
> www.sitasoftware.lu
> [image: Your IT Partner]
>
>
Thank for the explanation. ;)
--
Silvio Clécio
My public projects - github.com/silvioprog
___
fpc-pascal maillist - fpc-pascal@lists.freepascal.org
http://lists.freepascal.org/mailman/listinfo/fpc-pascal
2013/4/18 Jeppe Græsdal Johansen
> Den 18-04-2013 07:03, silvioprog skrev:
>
> Hi,
>
> I tried to use TThread in a small sample, but it don't works. The code
> is very simple, and I'm sending it in attached.
>
> Thanks,
>
> --
> Silvio Clécio
&
Hi,
Well, the TSocketServer has the event DoConnect, but, how to I know when a
client is disconnected? (eg, when I kill a client with Ctrl+Alt+Del)
I find a event such as DoDisconnect, but it doesn't exists.
Thank you!
--
Silvio Clécio
My public projects - github.com/silvi
2013/4/19 silvioprog
> Hi,
>
> Well, the TSocketServer has the event DoConnect, but, how to I know when a
> client is disconnected? (eg, when I kill a client with Ctrl+Alt+Del)
>
> I find a event such as DoDisconnect, but it doesn't exists.
>
> Thank you!
>
Syn
cket for writing and one for reading, separately by threads.
Thank you!
* https://bitbucket.org/silvioprog/tcpipcomp (this repo is temporary, and
this all code can undergo drastic changes at any time)
--
Silvio Clécio
My public projects - github.com/silvioprog
___
2013/4/24 silvioprog
> Hello,
>
> There are a multi-thread example using SSockets in FPC?
>
> I'm trying to implement it*, but it's very hard and this work it's
> consuming all my time. The difficulty is to read and write at the same
> time. I'm almost
simultaneous in a socket.
Thank you veru much again!
--
Silvio Clécio
My public projects - github.com/silvioprog
___
fpc-pascal maillist - fpc-pascal@lists.freepascal.org
http://lists.freepascal.org/mailman/listinfo/fpc-pascal
the problems you are trying to solve.
>
> Ludo
Very interesting this information. I'll study more and try to solve this
problem.
Thank you very much Ludo! :)
--
Silvio Clécio
My public projects - github.com/silvioprog
___
fpc-pascal maillist
nd;
end;
procedure TMyThread2.Execute;
begin
while not Terminated do
begin
GlobalSocket.Read ...
end;
end;
MyThread1.Start;
MyThread2.Start;
Thank you!
>>
>> *
>> https://bitbucket.org/**silvioprog/tcpipcomp<https://bitbucket.org/silvioprog/tcpipcomp>
>>
2013/4/25 silvioprog
> [...]
> Yes, I love Synapse, but it is not distributed with Free Pascal. I think
> the Free Pascal need to distribute something like SktComp(
> http://pastebin.com/QBZU89cy) of Delphi. SSockets is not multi-threaded.
>
... and I'm trying to por SktComp
2013/4/25 Michael Schnell
> On 04/24/2013 10:21 PM, silvioprog wrote:
>
>> (no Synapse, LNet or Indy please, I need to use native code)
>>
>
> Indy does provide support for threading (as does AsyncPro, the Socket
> flavor of which could be of interest here). But I d
2013/4/25 Michael Schnell
> On 04/25/2013 05:15 PM, silvioprog wrote:
>
>>
>>
>> Indy has a feature (OnDisconnect property) that notifies you when a
>> client is not online.
>>
>
> Nope.
>
> It notifies you when the other site actively and successf
2013/4/25 Paul Breneman
> silvioprog wrote:
>
>> 2013/4/25 Michael Schnell
>>
>> On 04/25/2013 05:15 PM, silvioprog wrote:
>>>
>>>
>>>> Indy has a feature (OnDisconnect property) that notifies you when a
>>>> client is not on
Very nice article:
http://www.bastisoft.de/programmierung/pascal/pasinet.html
Outdated, but very very nice. :)
--
Silvio Clécio
My public projects - github.com/silvioprog
___
fpc-pascal maillist - fpc-pascal@lists.freepascal.org
http
2013/4/25 silvioprog
> Very nice article:
>
> http://www.bastisoft.de/programmierung/pascal/pasinet.html
>
> Outdated, but very very nice. :)
>
in...:
repeat
put all sockets currently connected in the read set;
put the listening socket in the read set;
Select(read
an observation hehe...
--
Silvio Clécio
My public projects - github.com/silvioprog
___
fpc-pascal maillist - fpc-pascal@lists.freepascal.org
http://lists.freepascal.org/mailman/listinfo/fpc-pascal
2013/4/26 Ludo Brands
> On 04/26/2013 08:58 AM, Michael Van Canneyt wrote:
> > On Thu, 25 Apr 2013, silvioprog wrote:
> >
> >> I do not know where it would be used, it's just an observation hehe...
> >
> > Yes, but the above is what I mean with 'it d
1 - 100 of 623 matches
Mail list logo