根据用户修改学号姓名学分1学分1再保存到原记录,就是更新操作
如何将分离listbox1中的信息,读取st.dat内的信息如下:
信息是以[逗号/,]分离的
10000001,王一,85,75
10000004,上官飞一,65,75
选中listbox1时,如何根据信息分别发送给Edit中如下,
若选中10000001,王一,85,75时:
Edit1.text=10000001
Edit2.text=王一
Edit3.text=85
Edit4.text=75
若选中10000004,上官飞一,65,75时:
Edit1.text=10000004
Edit2.text=上官飞一
Edit3.text=65
Edit4.text=75
//根据用户修改[学号][姓名][学分1][学分1]
再保存到原记录,就是更新操作==============>>>>>>>>>>>>>>

解决方案 »

  1.   

    就是数据库的基本操作=======>>>修改/更新操作
      

  2.   

    可以这样吗?你存取到.DAT文件中的时候让他们以不同的标记分割不行么?
    这样的话你导入到listbox中去的时候再分离出来不就容易了啦
      

  3.   

    我现在问题是:
    程序在运行时,自动将记录信息加载到ListBox1,根据点击选中ListBox1中的信息返回
    Edit1.text=10000004 
    Edit2.text=上官飞一 
    Edit3.text=65 
    Edit4.text=75
    功能:添加\删除 两个功能已完成
      

  4.   

    1、TListBox、TEdit等操作可查帮助看例子
    2、字符串列表处理可用TStringList,具体可参考下面帖子中一段代码:http://topic.csdn.net/u/20091222/19/193d452c-2ff9-4966-bc7b-9ea14e2f4a4f.html
    3、保存的操作,拼好字符串,直接使用SQL语句提交
      

  5.   

    唉,我就默认是只有名字的长度不一样吧;
    var
      i:Integer;
      temp:string;
    begin
      for i :=0 to ListBox1.Count-1 do
      begin
        if ListBox1.Selected[i] then
        temp:=ListBox1.Items.Strings[i];
        edit1.Text:=copy(temp,1,8);
        edit2.Text:=copy(temp,10,length(temp)-15);
        edit3.Text:=copy(temp,length(temp)-4,2);
        edit4.Text:=copy(temp,length(temp)-2,2);
      end;
    end;
      

  6.   

    //这是数据结构
    type        //定义记录集[结构]
        studentrecord=record
        xh,xm:string[8];        //学号,姓名
        yw,sx:integer;        //定义科目
    end;
      

  7.   

    刚去研究了一下那段string,再次感谢6楼的!受教了!
    楼主的问题这样解决比较容易一点:
    procedure TForm1.ListBox1Click(Sender: TObject);
    var
      AList: TStringList;
      i:Integer;
      temp:string;
    begin
      for i :=0 to ListBox1.Count-1 do
      begin
        if ListBox1.Selected[i] then
        begin
          temp:=ListBox1.Items.Strings[i];
          AList := TStringList.Create;
          try
            AList.Delimiter := ',';
            AList.DelimitedText :=temp;
            Edit1.Text:=AList.Strings[0];
            Edit2.Text:=AList.Strings[1];
            Edit3.Text:=AList.Strings[2];
            Edit4.Text:=AList.Strings[3];
          finally
            AList.Free;
          end;
        end;
      end;
    end;
      

  8.   

    如果要进行数据库的更新操作的话那就在finally之前加上你要的操作就可以了,不变的一个是学号吧。SQL语句就不说了。呵呵~
      

  9.   

    suuuu
    (delphi追求者) :加我QQ号405418144
      

  10.   

    我想修改未指定的用户信息,除学号以外,其它的
    [姓名][学分1][学分1]都可以修改,并再将修改的信息
    也保存到文件中st.dat
      

  11.   

    操作用户信息时插入,删除,更新,查询等操作,必须是与
    Listbox1同步,信息也同时校验
      

  12.   

    程序在运行时,自动将记录信息加载到ListBox1楼主能否分享一下,如何自动把记录信算从dat加载到listbox中?
      

  13.   

    修改功能已完成,但是............. 
    //===================================================
    请看一下这个帖子,先谢谢了
    数据库在编写删除功能操作时能成功的删除指定的记录, 
    记录也能成功向前移动,可是最后的那条源记录如何删除呀
    http://topic.csdn.net/u/20091223/16/f037a9c8-af31-43a1-9920-29614cce302d.html
      

  14.   

    修改功能已完成,但是............. 
    //===================================================
    请看一下这个帖子,先谢谢了
    数据库在编写删除功能操作时能成功的删除指定的记录, 
    记录也能成功向前移动,可是最后的那条源记录如何删除呀
    http://topic.csdn.net/u/20091223/16/f037a9c8-af31-43a1-9920-29614cce302d.html