CSDN首页 空间 新闻 论坛 Blog 下载 读书 网摘 搜索 .NET Java 视频 接项目 求职 在线学习 买书 程序员 通知
可用分押宝游戏火热进行中... 专题改版:Java Web 专题
CSDN社区
搜索 收藏 打印 关闭
CSDN社区 >  Delphi >  数据库相关

高分求救,在线急等~!

楼主shabicsdn()2005-04-02 09:24:47 在 Delphi / 数据库相关 提问

////////////////////主表  
  ID     客户名称     客户住址  
  01     张三             内蒙古  
  02     李四             北京  
   
  /////////////////从表  
  ID     电话类型       电话号码  
  01     手机               13552949205  
  01     办公室电话   0837957  
   
  我现在想让一个DBGrid里这样显示,请问如何实现,高分求救。  
  客户名称       联系电话  
  张三               13552949205/0837957 问题点数:0、回复次数:4Top

1 楼coffee36(咖啡)回复于 2005-04-02 10:23:01 得分 0

dbgrid1.datasource:=datasource1;  
  datasource1.dataset:=adoquery1;  
  adoquery1.close;  
  adoquery1.sql.clear;  
  adoquery1.sql.add('select   a.客户名称,b.电话号码   from   主表   a   innor   join   从表   b   on   a.id=b.id');  
  adoquery1.open;  
  Top

2 楼coffee36(咖啡)回复于 2005-04-02 10:24:51 得分 0

不好意思,看错了。不知道怎么做。  
  帮顶。Top

3 楼mengyun5005(梦云)回复于 2005-04-02 11:18:09 得分 0

写这样一个函数,  
   
  create   function   (@ID   varchar(5))   returns   @T   table  
  (id   varchar(5),  
    tel   varchar(255)  
  )  
  as  
  begin  
  declare   @temp   varchar(255),@str   varchar(255)  
  set   @temp=''  
  set   @str=''  
  declare   Cur1   cursor   for   select   从表.电话号码   from   p_odrm   where   isnull(主表.id,'')=@id  
  open   Cur1  
  fetch   from   Cur1   into   @temp  
  while   @@fetch_status=0  
  begin  
      set   @str=@str+@temp+'/'  
      fetch   from   Cur1   into   @temp  
  end  
  select   @id,@str   into   @t  
  close   Cur1  
  deallocate   Cur1  
  end  
   
  用它去合并电话号码Top

4 楼yeeyee(我要换工作!)回复于 2005-04-02 19:24:35 得分 0

////////////////////主表  
  ID     客户名称     客户住址  
  01     张三             内蒙古  
  02     李四             北京  
   
  /////////////////从表  
  ID     电话类型       电话号码  
  01     手机               13552949205  
  01     办公室电话   0837957  
   
  Select   A.ID   A.客户名称     A.客户住址,   B电话类型,B.电话号码   From   Table1   As   A    
  inner   join   Table2   As   B  
  on   A.ID=B.ID  
   
  然后建立一个计算字段  
   
  DataSet.FieldByName('计算字段').AsString:=DataSet.FieldByName('B.手机段').AsString+'/'+DataSet.FieldByName('B.').AsStringTop

相关问题

  • 急,急,急,在线高分求解!!!
  • 在线提问(高分)急
  • 在线急等,高分送!
  • 我急!!!!,高分在线等
  • 急!高分在线等,GRIDVIEW
  • 在线高分急救,急救,急救,急救,急救,急救!!!!!!!!!!
  • 急急!!在线等待!!高分相赠!!
  • 高分求教,在线等(急100分)
  • 高手帮忙,高分求解,在线等待。急急急急
  • 急急急急,高手请近,在线等待,50分奉上。

关键词

  • 客户
  • 手机
  • 主表
  • 电话号码
  • adoquery
  • cur
  • 客户名称
  • 表
  • fieldbyname
  • asstring

得分解答快速导航

  • 帖主:shabicsdn

相关链接

  • Delphi类图书
  • Delphi类源码下载
  • Delphi控件下载

广告也精彩

反馈

请通过下述方式给我们反馈
反馈
提问
网站简介|广告服务|VIP资费标准|银行汇款帐号|网站地图|帮助|联系方式|诚聘英才|English|问题报告
世纪乐知(北京)网络技术有限公司 版权所有, 京 ICP 证 020026 号
北京创新乐知广告有限公司 提供技术支持
Copyright © 2000-2007, CSDN.NET, All Rights Reserved
GongshangLogo