TIdSync get variable from main thread

Article View: borland.public.cppbuilder.internet.socket

Article #1085

Back to borland.public.cppbuilder.internet.socket Previous Next

#1085

From: column.column
Date: Fri, 04 May 2007 14:41

38 lines
1965 bytes

Hello,

How to get data from  main thread using TIdSync class? Sample I found does 
not return any information back. And it doesn't looks thread safe to add 
ReturnInfo variable and read information from it after Write method called.

type
        TLogSync = class(TIdSync)

            ReturnInfo: String;
        private
            fDirection: String;
            fLine: String;
            fIPAddress: String;
            procedure DoSynchronize; override;
        public
            procedure Write(const ADirection, ALine, AIPAddress:
String);
        end;


    procedure TLogSync.DoSynchronize;
    begin
        // write fDirection, fLine, and fIPAddress to TRichEdit as
needed...

    ReturnInfo:=.
    end;


    procedure TLogSync.Write(const ADirection, ALine, AIPAddress:
String);
    begin
        fDirection := ADirection;
        fLine := ALine;
        fIPAddress := AIPAddress;
        Synchronize;
    end;

Technical Details

Message-ID: <463b462d@newsgroups.borland.com>

Path:

arc1-ca.pugleaf.net!g2news1.google.com!news1.google.com!border1.nntp.dca.giganews.com!nntp.giganews.com!newshub.sdsu.edu!newscon04.news.prodigy.net!prodigy.net!newsfeed.telusplanet.net!newsfeed.telus.net!xmission!ucberkeley!news-hog.berkeley.edu!203.109.252.33.MISMATCH!newsfeeds.ihug.co.nz!ihug.co.nz!newsgroups.borland.com!not-for-mail

Show Full Headers

Complete Article Headers

X-Google-Thread: 11508e,9e9a94befee4f1e1,start
X-Google-Attributes: gid11508e,public
X-Google-Language: ENGLISH,ASCII-7-bit
From: <column.column@gmail.com>
Newsgroups: borland.public.cppbuilder.internet.socket
Subject: TIdSync get variable from main thread
Date: Fri, 4 May 2007 17:41:49 +0300
Lines: 40
X-Priority: 3
X-MSMail-Priority: Normal
X-Newsreader: Microsoft Outlook Express 6.00.2900.3028
X-MimeOLE: Produced By Microsoft MimeOLE V6.00.2900.3028
X-RFC2646: Format=Flowed; Original
NNTP-Posting-Host: 82.135.244.123
Message-ID: <463b462d@newsgroups.borland.com>
X-Trace: newsgroups.borland.com 1178289709 82.135.244.123 (4 May 2007 07:41:49 -0700)
Path: arc1-ca.pugleaf.net!g2news1.google.com!news1.google.com!border1.nntp.dca.giganews.com!nntp.giganews.com!newshub.sdsu.edu!newscon04.news.prodigy.net!prodigy.net!newsfeed.telusplanet.net!newsfeed.telus.net!xmission!ucberkeley!news-hog.berkeley.edu!203.109.252.33.MISMATCH!newsfeeds.ihug.co.nz!ihug.co.nz!newsgroups.borland.com!not-for-mail