moin
und zwar versuche ich gerade einen string mit copy und pos zu bearbeiten
aber irgend wie will das noch nicht so wie ich
hier mal mein source
Delphi-Quelltext
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
| procedure TForm1.Button1Click(Sender: TObject);
var i,
Position1,
Position2 : integer;
checkstring : string;
begin
for i:=0 to memo1.Lines.count -1 do
begin
checkstring := memo1.Lines.Strings[i];
position1 := Pos('CREATE TABLE `',memo1.Lines[i]); position2 := Pos('` (',memo1.Lines[i]); memo2.Lines.Add((Copy(checkstring, Position1+14, position2)));
end;end; |
es soll der string zwischen CREATE TABLE ` und ` ( aus gegeben werden
beispiel
CREATE TABLE `fusion_admin` ( ---> fusion_admin
CREATE TABLE `fusion_articles` ( ---> fusion_articles
CREATE TABLE `fusion_article_cats` ( ---> fusion_article_cats
ps. wolte das so machen er sucht nach CREATE TABLE ` so hat er schon mal die erste position
und mit position2 wolte ich das ende ermitteln also ` (
was is da blos falsch
thx für eure hilfe
