SimplaDataSet.DataSet.CommandText:='select * from tabelu';
SimpleDataSet.Open;
while not SimpleDataSet.eof do
begin
Polje1.text:=SimpleDataSet.FieldByName('Polje1').asString;
Polje2.text:=SimpleDataSet.FieldByName('Polje2').asString;
Polje3.text:=SimpleDataSet.FieldByName('Polje3').asString;
Polje4.text:=SimpleDataSet.FieldByName('Polje4').asString;
Polje5.text:=SimpleDataSet.FieldByName('Polje5').asString;
end;
Kako da uprostim ovo? Kako da iz rekorda da izvadim Fields i da iste iskoristim kao ime objekta u Delphiu? Nesto u stilu:
while Not SimpleDataSet.Eof do
begin
// u php bi izgledalo ovako:
foreach($Fields as $Name=>$Value) {
$$Fields->Text:=$Valule;
}
end;
Nada se da sam jasan.
routing protocols enable routers to route routed protocols!