🚀 go-pugleaf

RetroBBS NetNews Server

Inspired by RockSolid Light RIP Retro Guy

Thread View: de.comp.lang.pascal.delphi
1 messages
1 total messages Started by Ralf Zimmerningkat Thu, 14 Jan 1999 00:00
rx-libary und ole
#10
Author: Ralf Zimmerningkat
Date: Thu, 14 Jan 1999 00:00
27 lines
1531 bytes
folgende funktion liefert mit delphi1 und word6
die richtigen ergebnisse

{AbrufenFormularFeldergebnis$
liefert den Texteintrag des Formularfeldes zur�ck}
function wAbrufenFormularFeldergebnis(const
Textmarkenname:string):string ;
begin
try
perg:=msword.callfunction('AbrufenFormularFeldergebnis$',[Textmarkenname]);

result:=strpas(perg^.bstrval);
except
result:='Formularfeld '+Textmarkenname+' konnte nicht abgerufen werden';

end;
end;  {function wAbrufenFormularFeldergebnis}

ab der version delphi3 kommt immer eine fehlermeldung
der ausl�ser des fehlers ist die zeile
result:=strpas(perg^.bstrval);
bstrval schein nicht mehr zu exestieren. Leider bekomme ich gar keinen
r�ckgabewert von der funktion

wei� jemand rat

r. zimmerningkat
Thread Navigation

This is a paginated view of messages in the thread with full content displayed inline.

Messages are displayed in chronological order, with the original post highlighted in green.

Use pagination controls to navigate through all messages in large threads.

Back to All Threads