[delphi] wyświetlenie pliku w programie

0

Witam

Robię mini przeglądarkę plików txt będących na serwerze.
Chcę je wczytywać do programu i chciałem zrobić to za pomocą 2 sposóbów

  1. zrobiłem przez podanie pełnej ścieżki do pliku
procedure TForm1.Button4Click(Sender: TObject);

var
 s: string;
begin
IdHTTP1.HandleRedirects:=True;
s:=idHTTP1.Get(url_edit.txt);
memo1.Text:=(s);

ale mam problem z 2 sposobem ponieważ chciałem to zrobić za pomocą pliku php

mam taki plik na serwerze

index.php

 <?php
<b>$plik = 'plik.txt';</b>
$dane = file($plik);
$cnt  = count($dane);
for($i = 0; $i < $cnt; $i++)
{
  echo htmlspecialchars($dane[$i]).'<br />';
}
?>

$plik = 'plik.txt'; w tym miejscu w kodzie mam podaną nazwę pliku, który chcę wczytać na stronie no a potem chciałem zczytać treść strony do memo tak jak w przypadku sposobu 1

z tym, że do $plik = ''; wczytać z edit1 nazwę pliku, który ma się wyświetlić na stronie

i nie wiem jak się odwołać do $plik = '';

i czy w ogóle da się tak zrobić

proszę o pomoc

0
$plik = $_GET['plik'];
s:=idHTTP1.Get(url_edit.txt+'?plik='+plik_edit.txt);
0

ŁF dziękuje bardzo

1 użytkowników online, w tym zalogowanych: 0, gości: 1