Article View: be.comp.programming
Article #1646Re: Word document en Delphi
From: Robert van de Vijver
Date: Fri, 21 Jan 2005 15:45
Date: Fri, 21 Jan 2005 15:45
64 lines
3491 bytes
3491 bytes
"Wimjan" <news@inventio.nl> schreef in bericht news:MPG.1c5b360bdace0d5998a8f2@news.individual.net... > Robert van de Vijver schreef: >> "Wimjan" schreef >> > JVB schreef: >> >> Hallo groep, ik start vanuit een Delphi applicatie Word op en ik haal >> >> een document op. Ik wil volgende : als ik het document wijzig, wil ik >> >> dit kenbaar maken in de Delphi applicatie ( bijvoorbeeld door een >> >> variabele op True of False te zetten ) >> >> >> >> De vraag is : is dit uberhaupt mogelijk ? en zo ja : wat is de juiste >> >> methode ? >> >> >> > *De* juiste methode lijkt me te veel gevraagd, maar je hebt >> > verschillende >> > mogelijkheden: >> > >> > 1. Kijk of de timestamp van het bestand is veranderd, bijvoorbeeld met >> > FileAge() of FileGetDate(). >> > 2. Bereken checksums voor en na en vergelijk deze. >> > >> > Hierbij ga ik er van uit dat je het bestand pas gaat vergelijken als >> > het >> > daadwerkelijk is opgeslagen op schijf. Als je realtime wilt weten of er >> > een wijziging is geweest dan wordt het uiteraard anders. >> > >> >> Ik ben helemaal geen Delphi-kenner, maar voor het realtime vergelijken, >> kan >> je dan niet het volgende doen: >> De tekst uit het originele bestand opslaan in een string en in een 2e >> string >> de tekst ook opslaan >> > Welke tekst? Hoe ga je die van het scherm van de gebruiker afhalen? > >> en refreshen en dit om de zoveel tijd vergelijken >> > Ik denk niet dat de tekst op het scherm in Word en de tekst zoals die > opgeslagen was in het bestand gelijk zijn. Dat weet ik wel zeker > eigenlijk. De tekst in word is toch de tekst uit het opgeslagen bestand? Je opent Word, je leest de tekst van het scherm. ( Ik heb dit iemand eens zien doen met Excel in Delphi, dus ik ga er vanuit dat het met Word ook kan.) Dan zet je die tekst in stringOriginal. Vervolgens doe je het zelfde maar dan voor stringChanged en om de zoveel tijd of bijvoorbeeld met een knop oid. En dan deze strings vergelijken. Dit moet toch kunnen lijkt mij. Of iets heel anders: Je kijkt of het Word-document, dat je met Delfi geopent hebt, actief is en je controleerd op keyPressed en mouseClicked. Nogmaals ik ben geen Delfi-kenner. Maar ik probeer mee te denken voor een oplossing. Mvg, Robert
Technical Details
Message-ID:
<41f1239b$0$44111$5fc3050@dreader2.news.tiscali.nl>Path:
arc1-ca.pugleaf.net!g2news1.google.com!news2.google.com!news.maxwell.syr.edu!newsfeed.vmunix.org!feed.news.tiscali.de!newsfeed1.ip.tiscali.net!tiscali!transit1.news.tiscali.nl!dreader2.news.tiscali.nl!not-for-mailReferences:
<k16Id.820$3N1.238688@phobos.telenet-ops.be> <MPG.1c5b278dd30071be98a8ea@news.individual.net> <41f11147$0$44084$5fc3050@dreader2.news.tiscali.nl> <MPG.1c5b360bdace0d5998a8f2@news.individual.net>Show Full Headers
Complete Article Headers
X-Google-Thread: fcea4,5ed539f9b0ca0592 X-Google-Attributes: gidfcea4,public X-Google-Language: DUTCH,ASCII-7-bit Path: arc1-ca.pugleaf.net!g2news1.google.com!news2.google.com!news.maxwell.syr.edu!newsfeed.vmunix.org!feed.news.tiscali.de!newsfeed1.ip.tiscali.net!tiscali!transit1.news.tiscali.nl!dreader2.news.tiscali.nl!not-for-mail From: "Robert van de Vijver" <robert101083@hotmail.com> Newsgroups: be.comp.programming References: <k16Id.820$3N1.238688@phobos.telenet-ops.be> <MPG.1c5b278dd30071be98a8ea@news.individual.net> <41f11147$0$44084$5fc3050@dreader2.news.tiscali.nl> <MPG.1c5b360bdace0d5998a8f2@news.individual.net> Subject: Re: Word document en Delphi Date: Fri, 21 Jan 2005 16:45:36 +0100 X-Priority: 3 X-MSMail-Priority: Normal X-Newsreader: Microsoft Outlook Express 6.00.2900.2527 X-MimeOLE: Produced By Microsoft MimeOLE V6.00.2900.2527 X-RFC2646: Format=Flowed; Original Lines: 66 Message-ID: <41f1239b$0$44111$5fc3050@dreader2.news.tiscali.nl> Organization: Tiscali bv NNTP-Posting-Date: 21 Jan 2005 16:45:32 CET NNTP-Posting-Host: 82.171.21.236 X-Trace: 1106322332 dreader2.news.tiscali.nl 44111 82.171.21.236:29546 X-Complaints-To: abuse@tiscali.nl