Odczyt danych strumienia

Odczyt danych strumienia
mkaz
  • Rejestracja:ponad 17 lat
  • Ostatnio:około rok
0

Witam wszystkich.
Mam taki problem - wczytałem treści zawarte w Memo do strumienia i chciałbym je otworzyć/podejrzeć np w Notatniku ale bez zapisu do pliku i otwierania przez "ShellExecute". Możecie pomóc?

Riddle
Ale że chodzi o to żeby otworzyć notatnik już z wpisanym tym co masz?
Riddle
Administrator
  • Rejestracja:prawie 15 lat
  • Ostatnio:22 minuty
  • Lokalizacja:Laska, z Polski
  • Postów:10075
0
Kopiuj
Zmienna := Strumien.DataString[I];

gdzie I to numer linii.

olesio
  • Rejestracja:około 17 lat
  • Ostatnio:około 3 lata
  • Lokalizacja:Szczecin
  • Postów:4191
0

@mkaz: jedynie co przychodzi mi do głowy to wysłać ten tekst do kontrolki edycyjnej z treścią w Notatniku, na przykład tak:

Kopiuj
var
  S : string;
  EditH : HWND;
begin
  EditH := FindWindowEx(FIndWindow('Notepad', nil), 0, 'Edit', nil);
  if EditH > 0 then
  begin
    S := 'to tylko test';
    SendMessage(EditH, WM_SETTEXT, 0, integer(PChar(S)));
  end;
end;

Pozdrawiam.
mkaz
  • Rejestracja:ponad 17 lat
  • Ostatnio:około rok
0

@TomRiddle: Tak chodzi mi o to aby odpalił się notatnik a w jego oknie widniała treść która jest w strumieniu lub jeśli w strumieniu znajduje się plik *.exe to aby on się uruchomił.

edytowany 1x, ostatnio: mkaz
olesio
  • Rejestracja:około 17 lat
  • Ostatnio:około 3 lata
  • Lokalizacja:Szczecin
  • Postów:4191
0

No to sposób z wstawieniem tekstu do notatnika już masz. Jeżeli treść "siedzi" w Streamie to można zapisać ją do TStringList albo do zmiennej typu string tak jak poniżej. A uruchomienie exeka ze streama - na przykład z zasobów - masz pokazane w kodzie dołączonym przeze mnie do tego posta.

Kopiuj
var
  S : string;
begin
  // wcześniej wczytanie do SomeStream, a później...
  SetLength(S, SomeStream.Size);
  Document.Read(PChar(S)^, Length(S));
end;

Pozdrawiam.
mkaz
  • Rejestracja:ponad 17 lat
  • Ostatnio:około rok
0

@olesio dziękuję, zawsze można na ciebie liczyć. Pozdrawiam wszystkich i dziękuję.

Zarejestruj się i dołącz do największej społeczności programistów w Polsce.

Otrzymaj wsparcie, dziel się wiedzą i rozwijaj swoje umiejętności z najlepszymi.