versteh ich nicht
also, hier mein source:
Delphi-Quellcode:
procedure TCopyDataForm.FormCreate(Sender: TObject);
var
aCopyData: TCopyDataStruct;
p: PChar;
begin
p := '
ganz'#13#10'
langer string';
with aCopyData
do
begin
dwData := 0;
cbData := StrLen(p) + 1;
lpData := p;
end;
SendMessage(StrToInt(Copy(ParamStr(1), 4, Length(ParamStr(1)) - 3)), WM_COPYDATA,
LongInt(
Handle), LongInt(@aCopyData));
end;
macht natürlich keinen sinn so, aber ich habs mal ein wenig gekürzt. normalerweise will ich reagieren, wenn ich mein programm mit /s:
handle aufgerufen wurde und an den angegebenen
handle was senden, aber wie gesagt, die prüfungen hab ich rausgeschmissen